Вниз
Скачать: CL | DM;

Плюсовая округлялка   Найти похожие ветки 

 
WhiteGuy ©   (2005-01-13 13:38) [0]

Здорово, ребята!!
Как округлить число в плюсовую сторону?
Т.е. 1,1 = 2, 3,0001=4
Подскажите!


 
TUser ©   (2005-01-13 13:43) [1]

SetRoundingMode(rmUp);
result:=round(i);


 
wicked ©   (2005-01-13 13:44) [2]

навскидку - добавлять 0,4999(9) и округлять, как обычно...
могу быть и не прав...


 
WhiteGuy ©   (2005-01-13 13:44) [3]

2ТЮзверь
Спасиб, мэн!


 
MBo ©   (2005-01-13 13:44) [4]

Надо полагать, хоть какая-то "округлялка" тебе известна.
Зайди в хелп по ней, перейди в раздел Category arithmetic routines, и покопайся там


 
MacroDenS ©   (2005-01-13 13:48) [5]

Берешь то что некруглое, и обрабатываешь напильником до степени круглости, если нужно с плюсовым эффектом - тогда сначала нарашиваешь предмет до состояния +, а потом напильником....


 
Stefan   (2005-01-13 13:52) [6]

Result := inc(int(i));


 
WhiteGuy ©   (2005-01-13 13:57) [7]

2MacroDenS
Базаришь вещи, чувак! :)


 
MacroDenS ©   (2005-01-13 13:58) [8]

[7]
ёу чувак


 
TUser ©   (2005-01-13 14:16) [9]


> Result := inc(int(i));

Result(3) = 4


 
Anatoly Podgoretsky ©   (2005-01-13 14:51) [10]

Ceil


 
WhiteGuy ©   (2005-01-14 12:22) [11]

2 TUser [1]
А функции SetRoundingMode нету!


 
begin...end ©   (2005-01-14 12:27) [12]

> [11] WhiteGuy ©   (14.01.05 12:22)

SetRoundMode


 
WhiteGuy ©   (2005-01-14 12:29) [13]

2 begin...end
SetRoundMode(rmUp)???
Щас просто под рукой Делфи нету!


 
begin...end ©   (2005-01-14 12:30) [14]

> [13] WhiteGuy ©   (14.01.05 12:29)

Да.


 
TUser ©   (2005-01-14 12:30) [15]


> А функции SetRoundingMode нету!

Ой, звиняй. F1 лениво жать было :)


 
WhiteGuy ©   (2005-01-14 12:54) [16]

Всё равно, извините за ламерство :-), компилятор пишет, что чёто там не продекларировано... 8D


 
begin...end ©   (2005-01-14 12:55) [17]

> [16] WhiteGuy ©   (14.01.05 12:54)

uses Math


 
WhiteGuy ©   (2005-01-14 12:58) [18]

2 begin...end  [17]
Oki, попробуем!



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.021 c
1-1105870166
DimDim
2005-01-16 13:09
2005.01.30
Копировать каталог


3-1104240741
Aleksandr.
2004-12-28 16:32
2005.01.30
Киньте ссылкой на dll типа локального fireBird!


1-1106019429
ZAlex
2005-01-18 06:37
2005.01.30
Переход на Delphi 2005


9-1097928173
NightFire
2004-10-16 16:02
2005.01.30
Вопрос про ваши игры


3-1103778551
Nexel
2004-12-23 08:09
2005.01.30
BDE и InterBase




   Наверх