Taschenrechner - Anfängerproblem

[Daniel B]

Macht doch beidesmal das gleiche:

Delphi-Quellcode:

procedure Zahlenmerken; //Hier müsste irgendwas falsch sein, aber ich weiß nicht was!?
begin
  if Eingabemodus = emZahleneingabe then  {Bei Eingabe merkt sich Zahl1 die Zahl in Edit}
  begin
    Zahl1 := strToInt(Edit1.text);
    Zahl2 := strToInt(Edit1.text);
  end;
  Eingabemodus := emLoeschen;             {Zahl wird gelöscht}
end;