Glücksspiel

[Klaus01]

Delphi-Quellcode:

begin
  Zahl:=strtoint(edit1.text);
  Kapital:=strtoint(edit2.text);
  Einsatz:=strtoint(edit3.text);
  Runden:=strtoint(edit4.text);

Hier nimmst Du das Kapital aus Edit2.text,
während des Programmlaufs wird aber nirgendwo
der aktualisierte Wert in Edit2.text zurückgeschrieben.

Grüße
Klaus