如何让一个实数只显示以为小数??急等 如何让一个实数只显示以为小数??急等 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Edit1.Text:=FormatFloat('0.0',12.3456); FloatToStrF(A, ffNumber, 3, 2); procedure TForm1.Button1Click(Sender: TObject);beginedit1.Text:='124.5678';edit2.Text:=FloatToStrF(strtofloat(edit1.Text),ffNumber,4,1);//floattostrf函数第二个参数可以为:ffGeneral, ffExponent, ffFixed, ffNumber, ffCurrency//数字5代表总位数//数字2代表小数位数edit3.Text:=format('%.1f',[strtofloat(edit1.Text)]);//两个函数都是四舍五入后显示以1位小数 TreeView如何使用 delphi quary查询问题 主从表增加问题 请教:在ListView中怎样可以任意拖动这些图标呢?多谢! 下面的查询该怎么样去写。。 50分的问题:为什么我的sorketconnection总是找不到servername呢? 图像显示问题 关于数据库数据转XML格式的文件求助 有没有关于BA的中间件???帮帮忙谢谢! 此种情形,如何访问ACCESS数据库 菜鸟,请教各位高手,帮忙看看这段程序,不够再加~~~~~~~感激!! pascal怎么这么烦啊?
beginedit1.Text:='124.5678';edit2.Text:=FloatToStrF(strtofloat(edit1.Text),ffNumber,4,1);
//floattostrf函数第二个参数可以为:ffGeneral, ffExponent, ffFixed, ffNumber, ffCurrency
//数字5代表总位数
//数字2代表小数位数edit3.Text:=format('%.1f',[strtofloat(edit1.Text)]);//两个函数都是四舍五入后显示以1位小数