Hallo,
Ich habe versucht das Spiel "Die Magische 21 zu programmieren" Nur irgendwie funktioniert das nicht richtig.
Hier der Quellcodeausschnitt:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var wAugenzahl,
wSumme,
wVorher : real;
begin
wAugenzahl:=random(6)+1;
wVorher:=StrToFloat(Edit1.Text);
wSumme:=wVorher + wAugenzahl;
ESumme.Text:=FloatToStr(wSumme);
Edit1.Text:=FloatToStr(wAugenzahl);
end
Ich hoffe, dass mir jemand weiterhelfen kann!
MfG