|
Registriert seit: 17. Jan 2004
20 Beiträge
|
will randomzahlen aufaddieren
17. Jan 2004, 21:44
so, nocheinmal mein problem, nachdem ich es schon an der falschen stelle geschildert habe...
also, ich will randomzahlen aufadieren. jetzt habe ich es soweit geshaft:
zufallszahl:=random(5)+1;
edit1.Text:=inttostr(zufallszahl);
if zufallszahl=1 then summe:=summe-summe
else summe:=summe+zufallszahl;
aber es funktioniert nicht...
|