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

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

Округление до двух знаков... [D5]


First ©   (2006-01-19 15:04:00) 

Скажите, а как округлить число типа currency до двух знаков после запятой?


Asail   (2006-01-19 18:21:00) [1]

А чем плохо:

var x: currency;
...
x:=RoundTo(x,-2)
...


SergP.   (2006-01-19 17:11:00) [2]

var
y:currency;
...

y:=x/100;
y;=y*100;


msguns   (2006-01-19 16:46:00) [3]

round(x*100)/100


Gero   (2006-01-19 16:44:00) [4]

uses Math

RoundTo


Наверх

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