belibig oftes Würfeln

[passsy]

machs doch mit nem integer .

Delphi-Quellcode:

i:integer; //anzahl der würfelrunden
a:integer; //was im edit steht


a:=edit1.text;
if i<a then
begin
label1.caption:=random(5)+1;
i:=i+1;
end;