Registriert seit: 9. Dez 2004
13 Beiträge
|
Re: Lotto HILFE´!!!
9. Dez 2004, 12:08
hallo,
also wenn man das so versucht- klappts leider nicht--- unendlich viele zahlen in der listbox erscheinen dann.
begin
for i:= 1 to 6 DO
repeat
Y:= random(49)+1;
ListBox1.Items.Add(inttostr(y));
until not ListBox1.Items.IndexOf(IntToStr(y))=-1;
end;
danke!
grüße
lisa
|