Source position: fpsnumformat.pas line 308
procedure BuildCurrencyFormatList(
AList: TStrings;
APositive: Boolean;
AValue: Double;
const ACurrencySymbol: string
);