Einzelnen Beitrag anzeigen

Stef

Registriert seit: 17. Okt 2007
2 Beiträge
 
#1

[Rechentrainer] Fehlermeldungen

  Alt 17. Okt 2007, 20:23
Hi Leute,
ich bin ein ziemlich blutiger Anfänger in Delphi, habe bisher nur Erfahrungen mit PHP und CSS gesammelt.
Ich habe ein kleines Projekt angefangen. Es soll eine Art Rechentrainer werden, der einem immer zufällige Aufgaben stellt mit verschiedenen Einstellungsmöglichkeiten (Schwierigkeitsgrad usw)

Jetzt kommen bei mir dummerweise ein Haufen unerklärlicher Fehlermeldungen:


Delphi-Quellcode:
procedure TForm1.okClick(Sender: TObject);
var ergebnis, Ezahl1, Ezahl2, eingabe : real; rechenart :string;
begin
Ezahl1 := StrToFloat(Zahl1.caption);
Ezahl2 := StrToFloat(Zahl2.caption);
rechenart := Rechenzeichen.caption;

if rechenart = '+then
   begin
   ergebnis := Ezahl1 + Ezahl2;
   end
else
    begin
    if rechenart = '-then
       begin
       ergebnis := Ezahl1 - Ezahl2;
       end
    else
        begin
        if rechenart = '*then
           begin
           ergebnis := Ezahl1 * Ezahl2;
           end
        else
        begin
        ergebnis := Ezahl1 / Ezahl2;
        end
        end
    end
end;

eingabe := StrToFloat(Erg.caption);
if input = ergebnis then
   begin
   info.Visible := True;
   info.caption := 'Das Ergebnis' input ' ist richtig!';
   end
else
    begin
    info.Visible := True;
    info.caption := 'Das Ergebnis ist falsch!!';
    end;
end;

end;
Bei der Letzten If-Abfrage kommt folgende Fehlermeldung: [Fehler] Unit1.pas(131): Deklaration erwartet, aber Bezeichner 'eingabe' gefunden

Woran liegt das? Hab ich mich mit den "end/;-s" vertan??

Wäre echt super, wenn ihr mir helfen könntet

Gruß

Stef