这个计算公式哪错了

Question

DBNumberEditEh5的onchange事件DBNumberEditEh5.text =(strtofloat(DBNumberEditEh4.Text)-0.00146*(strtofloat(DBNumberEditEh1.Text)+5))*1000/(strtofloat(DBNumberEditEh1.Text) * strtofloat(DBNumberEditEh3.Text));

Answer 1

。。
什么公式？神仙知道有没有错。
不过，语法是有错。浮点数赋值给字符串类型要转换下。DBNumberEditEh5.text =Format('%.2f',[(strtofloat(DBNumberEditEh4.Text)-0.00146*(strtofloat(DBNumberEditEh1.Text)+5))*1000/(strtofloat(DBNumberEditEh1.Text) * strtofloat(DBNumberEditEh3.Text))]);

Answer 2

[Error] bom5pas.pas(221): ':=' expected but '=' found

Answer 3

那不就该这样了DBNumberEditEh5.text :=(strtofloat(DBNumberEditEh4.Text)-0.00146*(strtofloat(DBNumberEditEh1.Text)+5))*1000/(strtofloat(DBNumberEditEh1.Text) * strtofloat(DBNumberEditEh3.Text));

Answer 4

如果再考虑到语法有错误,那就该改为DBNumberEditEh5.text: =floattostr((strtofloat(DBNumberEditEh4.Text)-0.00146*(strtofloat(DBNumberEditEh1.Text)+5))*1000/(strtofloat(DBNumberEditEh1.Text) * strtofloat(DBNumberEditEh3.Text)));

Answer 5

那不就该这样了DBNumberEditEh5.text :=(strtofloat(DBNumberEditEh4.Text)-0.00146*(strtofloat(DBNumberEditEh1.Text)+5))*1000/(strtofloat(DBNumberEditEh1.Text) * strtofloat(DBNumberEditEh3.Text));提示[Error] bom5pas.pas(221): Incompatible types: 'String' and 'Extended'

Answer 6

如果再考虑到语法有错误,那就该改为DBNumberEditEh5.text: =floattostr((strtofloat(DBNumberEditEh4.Text)-0.00146*(strtofloat(DBNumberEditEh1.Text)+5))*1000/(strtofloat(DBNumberEditEh1.Text) * strtofloat(DBNumberEditEh3.Text)));
[Error] bom5pas.pas(221): ':=' expected but ':' found