Source position: locale.pas line 274
procedure FormatDate(
locale: pLocale;
fmtTemplate: pCHAR;
date: pDateStamp;
putCharFunc: pHook
);