Описание:
Delphi процедура
GetLocaleFormatSettings передаёт значение местной валюты и измерений окна LCID в
запись TFormatSettings.
Эта запись -
TFormatSettings используется многими конверсионными функциями. Смотри пример
Пример кода:
var
formatSettings :
TFormatSettings;
begin
// Furnish the locale format
settings record
GetLocaleFormatSettings(LOCALE_SYSTEM_DEFAULT,
formatSettings);
// And use it in the thread safe form of
CurrToStrF
ShowMessage('1234.56 formats as = '+
CurrToStrF(1234.56,
ffCurrency, 4, formatSettings));
end;
Результат выполнения:
1234.56 formats as $1,234.5600