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

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

if Var1(0.01) > Var2(0.01) = True [D4, Win95/98, Win2k]


proc ©   (2002-08-05 15:19:00) 

Такой финт:

var
V1: Real;
V2: Currency;

begin
V1 := 0.01;
V2 := 0.01;
if V1 > V2 then DoSom;
end;

Почему V1 > V2? и как это исправить.

Спасибо


PVOzerski   (2002-08-05 19:28:00) [1]

>Сравнивать числа с заданной точностью.
Т.е. умножать, скажем, на 100 (если нужна точность до 2-го знака), брать trunc"и и сравнивать получившиеся целые числа.


kull   (2002-08-05 18:45:00) [2]


> ... и как это исправить.

Сравнивать числа с заданной точностью.


MBo   (2002-08-05 15:38:00) [3]

delphi.vitpc.com
hello world
Неочевидные особенности вещественных чисел


Наверх

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