hallo,
ich hab folgendes problem, ich möchte mir mit
dec eine zufalls zahl ausgeben lassen und zwar so wie mit dem random von delphi.
im moment mach ich das so, was aber sehr unschön ist, hat jemand eine bessere idee.
Delphi-Quellcode:
function GetRandom(range: Byte): integer;
var
i: Byte;
begin
Result := -1;
RandomSeed;
repeat
RandomBuffer(i, sizeof(i));
until
(i < range) and (i <> -1);
Result := i;
end;
für alle tips wär ich dankbar.
Gruss,
cookie