Delphi格式化函数Format、FormatDateTime和FormatFloat详解

转自：http://outofmemory.cn/code-snippet/7631/Delphi-format-hua-function-Format-FormatDateTime-FormatFloat-explainindetail

1.Format 根据指定所需要的格式，格式化字符串。 原型： function Format(const Format: string const Args: array of const): string 例子：

var 
  s: string; 
begin 
  //指令类型 type 

  s := Format('最大整数是: %d; 最小整数是: %d',[MaxInt,Low(Integer)]); 
  //返回: 最大整数是: 2147483647; 最小整数是: -2147483648 
  { 提示: 格式指令必须以 % 开始, 不区分大小写, %d 代表一个整数; 第二个参数是一个变体数组 } 

  s := Format('最大的无负号整数是: %u',[High(Cardinal)]); 
  //返回: 最大的无负号整数是: 4294967295 
  { %u表示一个无负号整数 } 

  s := Format('输入-2的结果是: %u',[-2]); 
  //返回: 输入-2的结果是: 4294967294 
  { 如果对应 %u 的是个负数, 则返回: 无负号整数最大值 - 这个数的绝对值 + 1 } 

  s := Format('%s! %s',['你好','我是万一']); 
  //返回: 你好! 我是万一 
  { %s 表示字符串 } 

  s := Format('%f',[Pi]); 
  //返回: Pi的值是: 3.14 
  { %f 表示浮点数, 保留或凑够两位小数点 } 

  s := Format('%g',[01.2345000]); 
  //返回: 1.2345 
  { %g 表示浮点数, 会去掉多余的 0 } 

  s := Format('%n',[12345.6789]); 
  //返回: 12,345.68 
  { %n 表示浮点数, 整数部分使用千位分隔符, 保留两位小数点 } 

  s := Format('%m',[12345.6789]); 
  //返回: ￥12,345.68 
  { %m 表示浮点数, 加货币记号, 转换结果取决于系统的地域设置 } 

  s := Format('%e',[12345.6789]); 
  //返回: 1.23456789000000E+004 
  { %e 用科学计数法表示整数或浮点数 } 

  s := Format('%p',[@Self]); 
  //返回: 0012F5BC 
  { %p 表示指针地址, 用十六进制表示 } 

  s := Format('%x',[255]); 
  //返回: FF 
  { %x 用十六进制表示一个整数 } 

  //Index 

  s := Format('%s%s',['万','一']); 
  s := Format('%0:s%1:s',['万','一']); 
  //返回: 万一 
  { 上面两行的结果是一样的, 0: 对应数组中的第一个值; 1: 对应数组中的第二个值 } 

  s := Format('%1:s%0:s',['万','一']); 
  //返回: 一万 
  { 翻转了一下顺序 } 

  s := Format('%1:s%0:s%0:s%1:s',['万','一']); 
  //返回: 一万万一 
  { 反复使用 } 

  //Width 与对齐方式 

  s := Format('%d,%8d,%d',[1,2,3]); 
  //返回: 1,       2,3 
  { 给第二个值指定了8个字符的宽度, 缺少的用空格填充; 如果指定少了则无效 } 

  s := Format('%d,%-8d,%d',[1,2,3]); 
  //返回: 1,2       ,3 
  { - 表示左对齐, 默认是右对齐的; - 符号在 Width 前面、Index 后面 } 

  //指定精度 prec 

  s := Format('%.9f',[Pi]); 
  //返回: 3.141592654 
  { 指定小数点的位数, 取值范围1-9, 输入0也当1用 } 

  s := Format('%.5d',[12]); 
  //返回: 00012 
  { 这是给整数指定位数, 如果小了则无效 } 

  s := Format('%.3s',['Format']); 
  //返回: For 
  { 给字符串指定位数, 如果大了则无效 } 

  s := Format('%.3e',[123.456]); 
  //返回: 1.23E+002 
  { 给科学计数法指定位数 } 

  //指令顺序: 

  { "%" [index ":"] ["-"] [width] ["." prec] type } 

  ShowMessage(s); 
end;
2. FormatFloat
 2. FormatFloat 格式化浮点数 原型：function FormatFloat(const Format: string Value: Extended): string 例子：

var 
  s: string; 
begin 
  //FormatFloat 的参数1是 String 格式指令, 参数2是实数类型 Extended 

  s := FormatFloat('###.###',12.3456); 
  //返回: 12.346 
  s := FormatFloat('000.000',12.3456); 
  //返回: 012.346 

  s := FormatFloat('#.###',12.3); 
  //返回: 12.3 
  s := FormatFloat('0.000',12.3); 
  //返回: 12.300 

  s := FormatFloat('#,#.#',1234567); 
  //返回: 1,234,567 
  s := FormatFloat('0,0.0',1234567); 
  //返回: 1,234,567.0 

  s := FormatFloat('0.00E+0',1234567); 
  //返回: 1.23E+6 
  s := FormatFloat('0.00E+00',1234567); 
  //返回: 1.23E+06 

  //在科学计数法中使用 # 好像不合适? 

  ShowMessage(s); 
end;