Summe einer Serie von Zahlen mit Hilfe von 2 Edit-boxen

[shmia]

Ich hätte da noch einen ganz heissen Tipp für Dich:
Benütze Zwischenvariablen!
Mit Zwischenvariablen wird der Code besser lesbar und besser zu debuggen.
Ausserdem wird es schneller.

Delphi-Quellcode:

procedure TForm1.Edit1Change(Sender: TObject);
var
  akt_zahl: integer;
begin
  if Edit1.Text <> '' then
  begin
    akt_zahl := StrToInt(Edit1.Text);
    // und ab jetzt wird nur noch mit akt_zahl weitergerechnet

    if (akt_zahl/10) >=1 then
       ....
end;