What is the source of Delphi's random() ?. It used to be fairly weak in the old days. If it still is weak, like visual C rand(), take a look at CryptGenRandom() and CryptAcquireContext() from Advapi32.dll. It complies with FIPS 186-2. There's also some source on MSDN to configure it to use the intel cpu RDRAND instruction which "uses the quantum unpredictability of the thermal noise of the chipset die itself" according to MSDN
Git