problem mit random

Beiträge: 287 XP SP2 Delphi 7

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 · Beiträge: 682 Mac OS X Snow Leopard Xcode 3.1

markieren

Delphi-Quelltext

1:	Randomize;

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

_________________
Ich streite einsam mich mit dieser Oberflächenwelt
Gutes sei ein löblich Brot von dem ich zehre - bis zum Tod [Das Ich - Im Ich]

Horst_H · Verfasst: 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 www.delphibasics.co....L.asp?Name=Randomize )

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

...
begin
  randomize;
  ...
  ..Mach was mit den Zufallszahlen
  ..
end;

Gruß Horst

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme