[Drozh]

Функция TryStrToInt возвращает True если преобразование удалось

Код:

 if TryStrToInt(Edit1.Text, X) then
 begin
  ShowMessage('Цифры')
// В Х содержится требуемо число
 end
 else
  ShowMessage('Что-то другое');