Delphi 运行时出现Invalid floating point operation错误

做了一个计算器,求arcsin,显示在edit1中,语句:

edit1.Text:=floattostr(arctan(strtofloat(edit1.Text)/Sqrt(1-Sqr(strtofloat(edit1.Text))))*180/pi);

你把你这个长串分开测试下看看哪里错了:例
var
定义几个float
例:a1:float
....
begin
a1:=strtofloat(edit1.Text);

showmessage(a1); //打印看下
.....
最后打印总的....
你就按这个思路来吧!这个提示你float语法错误!
温馨提示:答案为网友推荐,仅供参考
第1个回答  2013-12-15
检查你的edit1.text中是否给了空串,逐一检查每个函数传入的参数类型,主要是检查整数类型和浮点类型。
相似回答