xe10 可以跨平台,32位和64位计算怎么不一样呢
xe10 生成的32位程序运算
edit3.Text:=FloatToStr(StrToFloat(edit1.Text)-strtofloat(edit2.text));
如果
edit1.text:=10.2;
edit2.text:=10;
计算出edit3为0.2
=============
xe10 生成的64位程序运算
edit3.Text:=FloatToStr(StrToFloat(edit1.Text)-strtofloat(edit2.text));
如果
edit1.text:=10.2;
edit2.text:=10;
计算出edit3为0.199999999999999
必须用roundto才行 edit3.Text:=FloatToStr(roundto((StrToFloat(edit1.Text)-strtofloat(edit2.text)),-2));
为什么必须加个裤衩呢