Как проверить, является ли что -то только цифры в Delphi
if TryStrToInt(Edit1.Text, Value) then
DoSomethingWithTheNumber(Value)
else
HandleNotANumberError(Edit1.Text);
Helpless Herring