你把你这个长串分开测试下看看哪里错了:例var定义几个float例:a1:float....begina1:=strtofloat(edit1.Text);showmessage(a1); //打印看下.....最后打印总的....你就按这个思路来吧！这个提示你float语法错误!
检查你的edit1.text中是否给了空串，逐一检查每个函数传入的参数类型，主要是检查整数类型和浮点类型。
