wie kann ich nur Integer in Edit erlauben?

Hallo

ich versuche Fehlermeldungen zu vermeiden "bla bla ist kein Integer"
ich habe folgendes gemacht :

Delphi-Quellcode:

			procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);

begin

// Teil 1 :

if NOT (key IN ['0'..'9', '-', #13, #8]) then begin

   key := #0;

   exit;

   end;

// Teil 2: here möchte ich das minus Zeichen nur am Anfang haben,

// weil ich zahlen mit minus Zeichen benötige

...

Wie kann ich das erste Character überprüfen und das "-" zeichen nur am Anfang
erlauben ?

wie kann ich nur Integer in Edit erlauben?

wie kann ich nur Integer in Edit erlauben?

Forumregeln