Delphi 日期時間與字串轉換完全手冊：FormatDateTime 格式化代碼速查表

前言

Delphi SysUtils 單元提供豐富的日期時間轉換函數，掌握 FormatDateTime 格式化代碼是處理國際化介面、報表輸出、日誌記錄的基礎技能。

核心轉換函數分類

FormatDateTime 格式代碼完整表

實戰範例

uses SysUtils, DateUtils;

procedure TForm1.FormCreate(Sender: TObject);
var
  D: TDateTime;
  S: string;
  Fmt: TFormatSettings;
begin
  D := StrToDateTime('2009-5-21 11:22:33');

  // 1. 預設區域格式
  S := DateTimeToStr(D);
  ShowMessage(S); // 2009/5/21 11:22:33 (視系統設定)

  // 2. 自訂 FormatSettings (執行期切換格式)
  GetLocaleFormatSettings(GetThreadLocale, Fmt);
  Fmt.DateSeparator := '/';
  Fmt.TimeSeparator := '_';
  Fmt.ShortDateFormat := 'dd/mm/yyyy';
  Fmt.ShortTimeFormat := 'hh:nn:ss';
  S := DateTimeToStr(D, Fmt);
  ShowMessage(S); // 21/05/2009 11_22_33

  // 3. 完整自訂格式字串
  DateTimeToString(S, 'yyyy"年"m"月"d"日" h"時"n"分"s"秒"', D);
  ShowMessage(S); // 2009年5月21日 11時22分33秒

  // 4. FormatDateTime 進階用法
  S := FormatDateTime('yyyy-mm-dd hh:nn:ss.zzz', D); // 2009-05-21 11:22:33.000
  S := FormatDateTime('"Week "ww", Day "d', D);      // Week 21, Day 21
end;

常見陷阱與最佳實務

• 分隔符硬編碼風險：不要寫 'yyyy/mm/dd'，應用 'yyyy' + DateSeparator + 'mm' + DateSeparator + 'dd' 或 FormatSettings。
• mm vs nn：m 系列為月份，n 系列為分鐘，極易混淆。
• 兩位數年份：yy 會依據 TwoDigitYearCenturyWindow 解釋世紀，跨世紀資料請用 yyyy。
• 執行緒安全：GetLocaleFormatSettings 取得當前執行緒 Locale，多執行緒環境下各執行緒可獨立設定。
• 效能：大量格式化時，重複使用 TFormatSettings 實例避免重複呼叫 GetLocaleFormatSettings。

// ISO 8601 完整格式
FormatDateTime('yyyy-mm-dd"T"hh:nn:ss.zzz', Now); // 2024-01-15T14:30:45.123
// UTC 時區標記
FormatDateTime('yyyy-mm-dd"T"hh:nn:ss.zzz"Z"', UTCTime);
// 帶時區位移
FormatDateTime('yyyy-mm-dd"T"hh:nn:ss.zzz"+hh:nn"', LocalTime);