Source position: locale.pas line 290
procedure FormatDate(
Locale: PLocale;
FmtTemplate: PChar;
Date: PDateStamp;
PutCharFunc: PHook
);