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