Delphi 11 kein RandomRange für 64-bits?

[softtouch]

Zitat von Uwe Raabe:

Vielleicht klappt dies besser:

Delphi-Quellcode:

Function RandomRange(Const AFrom, ATo: UInt64): UInt64;
Begin
  Result:= Round(Random*(ATo - AFrom)) + AFrom;
End;

Dies scheint soweit die bisher einzige Lösung zu sein, die funktioniert und doch angenehm kurz ist. Ich denke, damit kann ich leben. Danke dafür.