Zitat von
Y-Fritz:
Delphi-Quellcode:
try
h:=strtoint(edit1.text);
except
MessageDlg ('Bitte nur Zahlen eingeben!', mtwarning,[mbOK],0);
edit1.setfocus;
exit;
end;
Gibts da noch ne andere Möglichkeit? Zum Beispiel mit "if Buchstabe do begin"?
schau mal nach trystrtoint oder du musst die eingabe direkt abfangen!