Random mit LongWord anstatt Integer liefert Exception

[gammatester]

Nimm ein Dummy-Random und einen Typecast:

Delphi-Quellcode:

lw := random(1);  //Dummy
lw := longword(Randseed);