Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как лучше округлять денежные значения ? [D7, Win95/98, WinME, NT4, Win2k, WinXP]


Alpine ©   (2005-09-07 11:28:00) 

Надо округлять денежные значения

Округлить до 0.01
Округлить до 0.10
Округлить до 0.50
Округлить до 1
Округлить до 5
Округлить до 10
Округлить до 100
Округлить до > целого
Округлить до < целого

Как мне получше это делать ?


Alpine   (2005-09-07 12:34:00) [1]

Спасибо


isasa   (2005-09-07 11:43:00) [2]

См. Delphi Help

RoundTo function
Unit
Math

function RoundTo(const AValue: Double; const ADigit: TRoundToRange): Double;

Expression Value

RoundTo(1234567, 3) 1234000
RoundTo(1.234, -2) 1.23
RoundTo(1.235, -2) 1.24
RoundTo(1.245, -2) 1.24


Наверх

Титульная страница Поиск, карта сайта Написать письмо