Ratezahl 2 Delphi (leicht)

[andiak]

eine frage noch außer das mit dem Button für neues spiel
warum wird mein PAntwort Button immer grün auch wenn die zahl zu groß oder zu klein ist normalerweiße sollte er nur grün werden wenn die iengegebene Zahl richtig ist:

if StrToInt(EEingabe.Text) > Zahl then
begin
PAntwort.Caption := 'zu groß!';
PAntwort.Color := clred
end;
begin
if StrToInt (EEingabe.Text) < Zahl then
begin
PAntwort.Caption := 'zu klein';
PAntwort.Color := clred
end;
begin
if StrToInt (EEingabe.Text) = Zahl then
PAntwort.Caption := 'Richtig!';
PAntwort.Color := cllime
end