Question

在delphi中怎样判断edit1.text中输入的是否为数值型数据?

.

Answer 1

var
E: Extended;
begin
if TryStrToFloat(Edit1.Text, E) then
ShowMessage('是数字')
else
ShowMessage('不是数字');
end;