Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - problem mit random


110022 - Do 17.01.08 20:26
Titel: problem mit random
wenn man den qt

Delphi-Quelltext
1:
label1.caption:=inttostr(random(7));                    

benutzt und man das programm startet kommen immer die selben zahlen.
start
random ist gleich
start
random ist gleich
start
random ist gleich
start
random ist gleich
...

wie kann man das beheben?


Dunkel - Do 17.01.08 20:34
Titel: Re: problem mit random

Delphi-Quelltext
1:
Randomize;                    

beim Starten des Programms einmalig aufrufen, z.B. im OnFormCreate. Damit wird der Zufallsgenereator von Delphi initialisiert.


Horst_H - Do 17.01.08 20:36

Hallo,

den Zufallszahlengenerator mal zum Start eine zufällige Zahl erzeugen lassen.
Dies geht mit randomize. (In delphi Hilfe schauen oder bei OBI http://www.delphibasics.co.uk/RTL.asp?Name=Randomize )


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
...
begin
  randomize;
  ...
  ..Mach was mit den Zufallszahlen
  ..
end;


Gruß Horst