Zufallszahlenproblem

[MikeS]

Du hast beim kopieren vergessen die zuweisung auf deine Label zu ändern!
Sonst hättest du auch überall andere Zahlen!

Zitat:

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) + ' €';

das sollte eher so aussehen!

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) + ' €';

da war wohl jemand schneller!