необходимо сообщение - "не введено число", если вводится слово

[Sour]

вот у меня формула и там переменные вводятся с edit'ов, что и где надо написать чтоб высвечивалось "не введено число", если вводится слово

[Awar]

Может быть

var i:integer;
begin
try
i:=strtoint(edit1.text);
except label1.caption:='Ne vvedeno chislo'; end;
end;

[pu4koff]

TryStrToInt

[Nemon]

if edit1.text is null = true then
showmessage ('В поле не введено значение')
else
end;
Можешь написать это например на нажатие кнопки типа "посчитать"

Вроде так...

[SereJa1020]

Сообщение от Nemon

if edit1.text is null = true then
showmessage ('В поле не введено значение')
else
end;
Можешь написать это например на нажатие кнопки типа "посчитать"

Вроде так...

И чего?
ето лишь проверит пустой едит или нет, а на корректность данных только исключениями
try
....
except

[_SERGEYX_]

try
i:=strtoint(edit1.text);
except
label1.caption:='Ne vvedeno chislo';
end;

Правильно. Именно так.
Но такой способ дерьмовый. Лучше запретить ввод букв.... т.е. тольно цифры, знак минус, разделитель....

[mutabor]

n:=StrToIntDef(Edit1.Text,-1);
if n = -1 then ShowMessage('Системная ошибка. Нажмите ОК для перезагрузки');
вместо -1 поставь свое число к-рое точно не введут как данные, доступен весь диапазон integer