Thema: Delphi Zufallszahlenproblem

Einzelnen Beitrag anzeigen

mark250678

Registriert seit: 31. Okt 2003
Ort: Teublitz
10 Beiträge
 
#2

Re: Zufallszahlenproblem

  Alt 19. Jan 2004, 09:18
Hallo,

Probiers mal so
Delphi-Quellcode:
randomize;
aktie1 := random(200) + 1;
label2.Caption := IntTostr(aktie1) + '';
aktie2 := random(200) + 1;
label5.Caption := IntTostr(aktie2) + '';
aktie3 := random(200) + 1;
label8.Caption := IntTostr(aktie3) + '';
aktie4 := random(200) + 1;
label11.Caption := IntTostr(aktie4) + '';
Hab´s auch erst beim 2. mal hinsehen gemerkt...

Schöne Grüße

Markus
  Mit Zitat antworten Zitat