格式化輸出函數(1): Format

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;