■Format 形式化された文字列を返す
例)20060130 → 2006/01/30
   sSyuDate := Format('%4s/%2s/%2s',[Copy(pSyukkaDate,1,4),Copy(pSyukkaDate,5,2), Copy(pSyukkaDate,7,2)]);
                                          {コンソールに表示されたもの}
  Writeln(FormatDateTime('yymmdd',Now));  {970228}
  Writeln(FormatDateTime('m"/"d "("aaa")"',Now));{2/28 (金)}
  Writeln(FormatDateTime('yy/mm/dd',Now));{97/02/28}
  Writeln(FormatDateTime('dddd, mmmm d, yyyy',Now));
                                          {金曜日, 2月 28, 1997}
  Writeln(FormatDateTime('yyyy/mm/dd',Now));{1997/02/28}
  Writeln(FormatDateTime('aaa',Now));     {金}
  Writeln(FormatDateTime('aaaa',Now));    {金曜日}
  Writeln(FormatDateTime('ddd',Now));     {金}
  Writeln(FormatDateTime('dddd',Now));    {金曜日}
  Writeln(FormatDateTime('yyyy/mm/dd hh:nn:ss  ',Now));
                                          {1997/02/28 14:45:52}
  Writeln(FormatDateTime('yy/mm/dd hh/nn/ss',Now));
                                          {97/02/28 14/45/52}
  Writeln(FormatDateTime('aaa',Now));     {金}
  Writeln(FormatDateTime('dddddd',Now));  {1997年2月28日}
  Writeln(FormatDateTime('yyyy"年"mm"月"dd"日"',Now));
                                          {1997年02月28日}
  Writeln(FormatDateTime('gg.ee.mm.dd',32516));{平.01.01.08}
  Writeln(FormatDateTime('yyyy.mm.dd',Now));   {1997.02.28}
  Writeln(FormatDateTime('yymmddhhnnss',Now)); {970228144553}
  Writeln(FormatDateTime('yy"年"mm"月"dd"日"(aaa)',Now));
                                          {97年02月28日(金)}
  Readln;

■日付型をフォーマットしてStringに
FormatDateTime('YYYY"/"MM"/"DD hh:nn:ss',Now)

■３桁０詰
      CNum := Format('%.3d',[i]);
  sPrice := FormatFloat('#,##0', FieldByName('YEN').AsFloat);
  sPrice := FormatFloat('#,##0.00', FieldByName('EURO').AsFloat);
例） %S に、第二引数の文字列をセットします。
Format('%s のデータを削除しますか？' ,[FieldByName('CODE').AsString])