Verwende doch try-except. Damit kannst du dir deine eigene Fehlermeldung ausgeben lassen.
Delphi-Quellcode:
try
a := StrToInt(Edit1.Text); //Datentyp umwandeln
except
ShowMessage('Sie haben einen Falschen Wert eingegeben'); //Meldung bei Fehler ausgeben
end;