Forum: Multimedia
Delphi
by jbg,
13. Nov 2002
Natürlich. Randomize benutzt die Uhrzeit als Startwert für den Zufallsgenerator. Wenn du nun folgendes machst:
repeat
Randomize;
Memo1.Lines.Add(IntToStr(Random(1000));
until Memo1.Lines.Count >= 10;
Dann bekommst du 10x dieselbe Zahl, da sich die Uhrzeit nicht verändert hat (zumindest für Randomize nicht ermittelbar).
Man sollte Randomize nur ein mal im Programm aufrufen. Z.B. im...
Forum: Multimedia
Delphi
by jbg,
13. Nov 2002
Mein TFT lässt das schon gar nicht zu.
Forum: Multimedia
Delphi
by jbg,
13. Nov 2002
Sag mal, hast du mal daran gedacht, dass nicht jeder die Auflösung 1600x1200x8Bit zur Verfügung hat?
Folgendes habe ich auch noch bemerkt:
Programm beenden mit: halt(0); Sollte wohl eher Close; sein.
Warnungen missachtet: "FOR-Schleifenvariabe muß eine einfache lokale Variable sein"
Zeile 172: Randomize Aufruf innerhalb einer Schleife. Dadurch werden immer wieder diesselben Zufallszahlen...