Immer +1 nehmen

[Sereby]

Delphi-Quellcode:

edit2.Text := str; 
zahl1 := strtofloat(edit1.text); 
zahl2 := strtofloat(edit2.text); 
ergebnis := Inc(zahl1,zahl2); 
edit3.text := floatToStr(ergebnis);