Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.09.02;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "Основная";
Текущий архив: 2002.09.02;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.01 c
4-3664
prasaleff
2002-07-01 13:25
2002.09.02
Не всегда удается запустить другую программу через ShellExecute


1-3471
Eugie
2002-08-21 08:07
2002.09.02
Горячие клавиши в главном меню


4-3677
Max2000
2002-06-28 13:55
2002.09.02
Мастера!!! Подскажите как это сделать на API? Без TCanvas?


14-3582
AL2002
2002-08-06 13:35
2002.09.02
Ай! Удалили мою загадку.


1-3335
lenin
2002-08-21 13:51
2002.09.02
NMSMTP





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский