Ich gehe davon aus, dass der Fehler beim Füllen der ListBox auftritt, denn da hast du einige Denkfehler drinnen. So müsste das aussehen:
Delphi-Quellcode:
begin
ListBox1.Clear;
for i := 1 to 10 do
begin
begin
ListBox1.Items.Add(IntToStr(Random(1000)+1));
Zahl[i] := StrToInt(ListBox1.Items[i-1]);
end;
end;
end;
Zitat von
flac:
Ich hoffe Sie meinen diese Stelle
Und ich hoffe, du siezt uns hier nicht.
