Oder versuchs mal so
Du hast nämlcih 53434 nicht als variable also musst du es in '' setzenCode: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.