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!