使用kbmmw中的隨機數替換delphi 10.3 自帶的隨機數

咱們在開發中常常會使用隨機數模擬各類隨機條件，例如生成惟一的密碼和令牌。

在計算機中，通常採用PRNG(僞隨機序列發生器)模擬真實隨機數。既然是隨機，就要要沒有任何規律，

在取值範圍內均勻、獨立。以確保儘可能不重複。不然生成的密碼和令牌碰撞的概率就很是大。

delphi自帶的隨機數函數，看似隨機，實際上當產生次數足夠多的話，就會發現重複性很是大，並且向中心域

集中。若是咱們用delphi自帶的隨機數生成一個區域的點，就會很方便的發現這個問題。

kbmmw 5.8裏面 提供了好幾種流行的隨機數生成實現。例如PCG、 Mersenne Twister、SplitMix、Xoroshiro等。

甚至提供了幾個利用CPU 自身功能生成僞隨機數的函數。

咱們能夠明顯的看出來，這兩個圖中的點很是隨機、均勻。所以，咱們在開發中儘可能使用kbmmw 提供的隨機函數。

喜大普奔，delphi10.3 裏面提供了可替換隨機數生成的功能。

咱們能夠很方便的讓delphi 不用更改代碼（或者沒有代碼的狀況一下），就能夠享受這些好的功能和算法。

首先，咱們作一個函數，固然記住要引用kbmMWRandom。

function xalionrandom32:UInt32;
begin result:= kbmMWRandom32.Random;

end;

而後在工程文件裏面加上三行。

 Application.Initialize;
//加上這三行
  {$IF CompilerVersion >= 33}
     Random32Proc:= xalionrandom32;
  {$ENDIF}

ok, 咱們的程序就能夠享受這個福利了。