Einzelnen Beitrag anzeigen

Benutzerbild von Michael Habbe
Michael Habbe

Registriert seit: 10. Aug 2005
264 Beiträge
 
Turbo Delphi für Win32
 
#3

Re: Taschenrechner - Anfängerproblem

  Alt 23. Aug 2006, 14:03
Also, ich denke Du hast da ein paar begins und ends vergessen. Mal die Korrektur hier:

Delphi-Quellcode:
//Selbstdefinierte Procedure - Soll sich die Beiden Zahlen merken
procedure TForm1.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);
      Eingabemodus := emLoeschen;
    end;
end;
edit: Nochmal korrigiert, der Eingabemodus darf natürlich erst geändert werden, wenn die Auswertung vollzogen ist.
  Mit Zitat antworten Zitat