树 树熊131 Unregistered / Unconfirmed GUEST, unregistred user! 2001-06-18 #1 在delphi中判断输入值是否是整型,浮点型等的函数是什么
T tianhf Unregistered / Unconfirmed GUEST, unregistred user! 2001-06-18 #5 似乎没有现成的函数: try aa:=StrToFloat(s); if pos('.',s)>0 then 浮点数 else 整数 except 不是数值 end;
J Jamw Unregistered / Unconfirmed GUEST, unregistred user! 2001-06-18 #6 用TRY挺好的。 VAR TMP1:INTEGER;TMP2:REAL; BEGIN TRY TMP1:=输入的值 EXCEPT TMP2:=输入的值 END; END;