Описание:
Переменная CurrencyDecimals задает число десятичных разрядов по умолчанию в фунции Format и подобных.
Пример кода:
var
amount : Double;
begin
amount := 1234.567;
//
Display the amount using the default decimal digits (2)
ShowMessage('Amount = '+Format('%m', [amount]));
//
Redisplay the amount with 4 decimal digits
CurrencyDecimals :=
4;
ShowMessage('Amount = '+Format('%m', [amount]));
end;
Результат выполнения:
Amount = ?1,234.57
Amount = ?1,234.5670