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

КАК округлить число??   Найти похожие ветки 

← →
CCCatch   (2002-08-21 12:03) [0]

Скажите, вот имеется примерно такое число: 45684778,99999994
Как в Edit2 занести его округлённое значение 45684779


← →
Skier ©   (2002-08-21 12:04) [1]

>CCCatch
Trunc(...) ?


← →
KPY ©   (2002-08-21 12:05) [2]

FloatToStrF();


← →
Anatoly Podgoretsky ©   (2002-08-21 12:05) [3]

Ты хоть какие нибудь книги по Паскалю читал, ну ладно, а слово Округлить не пытался перевести?


← →
Alx2 ©   (2002-08-21 12:06) [4]

см. round


← →
evgeg ©   (2002-08-21 12:06) [5]

trunc (x+0.5)


← →
CCCatch   (2002-08-21 12:08) [6]

2Anatoly Podgoretsky

Ещё нет, но собираюсь, т.к. вижу, что если так будет и дальше, то далеко не пойду :)

2All

Блин, какие вы быстрые :)))
Спасибо всем!!!


← →
CCCatch   (2002-08-21 12:17) [7]

А вот ещё в чём проблема: число то для округления стоит у меня в Edit1 :((


← →
Skier ©   (2002-08-21 12:18) [8]

>CCCatch
Ты издеваешься что ли !?
StrToFloat(...) ?


← →
CCCatch   (2002-08-21 12:20) [9]

Вобщем задача такая:
В Edit1 есть число типа 34544.9999932
При клике на кнопку, нужно его округлить и поместить результат в Edit2


← →
KPY ©   (2002-08-21 12:21) [10]

Фараонов В.В.
Delphi5 учебный курс


← →
Skier ©   (2002-08-21 12:23) [11]

Пора вводить форум "КМБ" :)


← →
BOA_KAA ©   (2002-08-21 12:32) [12]

Вопрос, кстати, не такой уж тривиальный:-)
Ежели конечное число получится больше, чем Integer, то угадайте, что получится? Все-таки лучше FloatToStrF(Edit1.Text, ffFixed, 10, 0);


← →
Anatoly Podgoretsky ©   (2002-08-21 12:36) [13]

Получится нормально, исключение с должным сообщением


← →
Skier ©   (2002-08-21 12:40) [14]

>BOA_KAA
Вопрос самый тривиальный.
С таким же успехом можно в Edit ввести что-то
типа hello, world. И если не использовать try-except-end,
но тогда вообще всё рухнет...


← →
CCCatch   (2002-08-21 12:42) [15]

Спасибо всем!! Уже всё работает :))



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

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



Память: 0.47 MB
Время: 0.009 c
14-3605
Night cold
2002-08-05 11:41
2002.09.02
Pleaseeee!!!!UNIX


1-3340
EugenCFG
2002-08-21 18:39
2002.09.02
В чём ошибка??? Подскажите ПЖ!


14-3585
vajo
2002-08-02 11:22
2002.09.02
Upgrade сервера


6-3547
dd
2002-06-21 13:59
2002.09.02
RunTime and WebBrowser


1-3511
zamiran
2002-08-21 14:34
2002.09.02
Подскажите пожалуйста




   Наверх