5,931
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
masterdelphi 2002-07-18
- 打赏
- 举报
formatfloat('#,###,##0.00',123456789.12);
codingfans 2002-07-18
- 打赏
- 举报
见以下方法:
procedure TForm1.Button1Click(Sender: TObject);
var n : DOUBLE ;
begin
n:=12345678.99;
ShowMessage(Format('%*.*n',[10,2,n]));
end;
procedure TForm1.Button1Click(Sender: TObject);
var n : DOUBLE ;
begin
n:=12345678.99;
ShowMessage(Format('%*.*n',[10,2,n]));
end;
