[F] Programm zum schätzen

[Time2Play]

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

end.

mfg

[mike1010]

Time2Play's Variante is die einzige die geht THX Time2Play...

also Intenger ...... Nur Zahlen
und welche Variblae brauch ich um auch bauchstaben einfügen zu können??

mfG
mike