Oder versuchs mal so

Code:
procedure TForm1.Button1Click(Sender: TObject);
begin
   try
     Eingabe := StrToInt (Edit1.Text);
     if Eingabe = '53434' then Label1.Caption := 'Richtig getippt!';
   except
     Label1.Caption := 'FALSCH!';
end;

end.
Du hast nämlcih 53434 nicht als variable also musst du es in '' setzen