floattostrf()
()里面是怎么写的 
来个例子。

解决方案 »

  1.   

    FloatToStrF(123.123, ffCurrency, 5, 2)  //结果:¥123.12看你实际需要了
      

  2.   

    首部   function Format(const Format: string; const Args: array of const): string; $[SysUtils.pas功能    返回按指定方式格式化一个数组常量的字符形式 说明    这个函数是我在 Delphi 中用得最多的函数 ,现在就列举几个例子给你个直观的理解 "%" [ 索引  ":"] ["-"] [ 宽度 ] ["."  摘要 ]  类型 Format('x=%d', [12]); //'x=12' // 最普通 Format('x=%3d', [12]); //'x= 12' // 指定宽度 Format('x=%f', [12.0]); //'x=12.00' // 浮点数 Format('x=%.3f', [12.0]); //'x=12.000' // 指定小数 Format('x=%.*f', [5, 12.0]); //'x=12.00000' // 动态配置 Format('x=%.5d', [12]); //'x=00012' // 前面补充 0Format('x=%.5x', [12]); //'x=0000C' // 十六进制 Format('x=%1:d%0:d', [12, 13]); //'x=1312' // 使用索引 Format('x=%p', [nil]); //'x=00000000' // 指针 Format('x=%1.1e', [12.0]); //'x=1.2E+001' // 科学记数法 Format('x=%%', []); //'x=%' // 得到 "%"S := Format('%s%d', [S, I]); //S := S + StrToInt(I); // 连接字符串 参考   proceduer SysUtils.FmtStr例子   Edit1.Text := Format(Edit2.Text, [StrToFloatDef(Edit.3.Text, 0)]);