[SemKam]

Как проверить, является ли текст в Edit1 - integer? Делаю фильтрацию по разным критериям, один из них - как раз integer. Если в Edit1 текст не будет числовым, программа накрывается. А охота бы сделать мессагу, мол "Чё ты в самом-то деле, поле в базе числовое, а ты, ***** чё пишешь?!"
Кста, пробовал сделать try... except, но вот чё писать в этом except?
"Поможите, люди добрые, чем сумеете..."

Добавлено:

чтоб было понятнее -
try begin
Table1.Filtered := False;
Table1.Filter := 'Id = ' + QuotedStr(Edit1.Text); --> На этой строке останавливается и рапортует об ошибке....
Table1.Filtered := True;
end;
except
begin
MessageDlg('Error', mtError, [mbOK], 0);
exit;
end;
end;