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 ?