数值加上千位分割符

字体大小: 中小 标准 ->行高大小: 标准 中 大 
procedure TForm1.Button1Click(Sender: TObject);
var n : DOUBLE ; 
begin
n:=12345678.99;
ShowMessage(Format('%*.*n',[10,2,n]));
end;

此文章由 http://www.ositren.com 收集整理 ,地址为: http://www.ositren.com/htmls/67945.html