DruckenMister WongFacebook

Zufallszahlen generieren

System Win9x, WinNT, Win2000, WinXP, Vista, Win7
Ab Delphi-Version Delphi 1
Letzte Änderung 28.09.2010

Die Zufallszahlen, die ein Computersystem erstellen kann, sind natürlich keine echten Zufallszahlen.Sie werden aus der Systemzeit berechnet.Der Zufallsgenerator sollte beim Programmstart initialisiert werden:


procedure TForm1.CreateForm(Sender: TObject);
begin
  Randomize;
end;
 

Jetzt können eigentlich recht problemlos Zufallszahlen erstellt werden und zwar mit dem Befehl Random:


procedure TForm1.Button1Click(Sender: TObject);
const
  ZufallBereich = 5;
begin
  Caption:=IntToStr(Random(Zufallsbereich));
end;
 

Es wird jetzt eine Zufallszahl erstellt, die größer gleich 0 und kleiner 5 ist.