Thema: Delphi Zufallszahlenproblem

Einzelnen Beitrag anzeigen

Uceo

Registriert seit: 12. Jan 2004
39 Beiträge
 
Delphi 7 Enterprise
 
#1

Zufallszahlenproblem

  Alt 19. Jan 2004, 09:07
Hallo, ich habe ein Problem mit Zufallszahlen! Hier ein kleiner Abschnitt aus dem Code:

Delphi-Quellcode:
randomize;
aktie1 := random(200) + 1;
label2.Caption := IntTostr(aktie1) + '';
aktie2 := random(200) + 1;
label5.Caption := IntTostr(aktie1) + '';
aktie3 := random(200) + 1;
label8.Caption := IntTostr(aktie1) + '';
aktie4 := random(200) + 1;
label11.Caption := IntTostr(aktie1) + '';
Ich bekomme jetzt aber immer für jede der 4 Variablen die gleiche Zufallszahl. Da Delphi ja für Zufallszahlen die Uhr zu Hilfe nimmer, habe ich es schon zwischen den einzelnen Abschnitten mit Sleep probiert, aber es will nicht gehen! Wie kann ich das machen? Danke!
  Mit Zitat antworten Zitat