Справочник функций и процедур Delphi: Currency

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

Currency
Тип
Тип с плавающей запятой с 4 десятичными числами, используемыми для финансовых значений System unit
  type Currency;

Delphi Sources

Описание
Тип Currency предназначен для использования в финансовых приложениях. Он поддерживает 4 десятичных места с не менее 53 битами точности.
Примечания
* Зависит от точности плавающей запятой процессора.

Очень большие значения Currency будут терять точность с некоторыми из StrUtils функций.
Похожие команды
CurrToStr  Преобразует денежную величину в строку

CurrToStrF  Преобразует денежную величину в строку с форматированием

Double  Тип с плавающей запятой, поддерживающий приблизительно 15 цифр точности

Extended  Тип с плавающей запятой обладающий самой высокой точностью и вместимостью

PCurrency  Указатель на значение Валюты (Currency)

Single  Тип числа с плавающей запятой обладающий наименьшей вместимостью и точностью

StrToCurr  Преобразует числовую строку в денежное выражение

 
Пример кода : Окружение вниз и вверх количества валюты
var
  account1, account2, account3 : Currency;
begin
  account1 := 123.456749;   // Слишком много десятичных чисел - будут округлены вниз
  account2 := 123.456750;   // Слишком много десятичных чисел - будут округлены вверх
  account3 := account1 + account2;

  ShowMessage('Account1 = '+CurrToStr(account1));
  ShowMessage('Account2 = '+CurrToStr(account2));
  ShowMessage('Account3 = '+CurrToStr(account3));
end;

Account1 = 123.4567
Account2 = 123.4568
Account3 = 246.9135
 


Последние добавленные на сайт исходники

TDictionary Custom Sort

Fast Watermark Sources

3D Designer

Sik Screen Capture

Patch Maker

Айболит (remote control)

 

ListBox Drag & Drop

Доска для игры Реверси

Графические эффекты

Рисование по маске

Перетаскивание изображений

Canvas Drawing

 

Copyright © 2004-2024 "Delphi Sources" by BrokenByte Software (источник – "DelphiBasics")

Группа ВКонтакте