Клуб программистов

    Переменная CurrencyString используется в функциях вывода на экран денежных величин. Она используется в качестве префикса или суффикса к денежной величине.

    Например, для Великобритании значение этой переменной по умолчанию ?, таким образом 1.23 будет отображаться по умолчанию как ?1.23.

var
   amount : Currency;

begin
   amount := 12; // 12 pounds

   // Display with the default currency string
   ShowMessage('Amount = '+CurrToStrF(amount, ffCurrency, 0));

   // Display with the currency shown as a word after the amount
   CurrencyString := 'Pounds';
   CurrencyFormat := 4; // 4 means after with a space
   ShowMessage('Amount = '+CurrToStrF(amount, ffCurrency, 0));
end;

Amount = ?12
Amount = 12 Pounds