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

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

Округление числа с заданной точностью [D6, WinXP]


Kubic ©   (2005-02-16 16:32:00) 

Как округлить число с заданной точностью и результат поместить в TEdit


Anatoly Podgoretsky   (2005-02-16 19:38:00) [1]

Читать можно если хорошо знаешь Дельфи, но тогда и не нужно.


kaZaNoVa   (2005-02-16 18:29:00) [2]

Stilgar ©   (16.02.05 16:36) [1]

> P.S. Рекомендую книгу А. Я. Архангельского"Delphi 7.
> Справочное пособие". Тогда такие вопросы сразу
> пропадают.

сейчас скажут, что не следует читать этого автора ...  ))


Ольга   (2005-02-16 17:04:00) [3]


> выводит в Edit: 23! Почему, не пойму!!!

В самом деле удивительно, должно выводить 0.
Округляете не в ту сторону, правильно будет так:
edit1.text:=floattostr(roundto(k,-2));


vakir   (2005-02-16 16:43:00) [4]

FloatToStrF

function FloatToStrF(Value: Extended; Format: TFloatFormat; Precision, Digits: Integer): string; overload;


Kubic   (2005-02-16 16:42:00) [5]

Пробовал:
пишу:
k=23,15627
edit1.text:=floattostr(roundto(k,2));

выводит в Edit: 23! Почему, не пойму!!!


Stilgar   (2005-02-16 16:36:00) [6]

RoundTo, читать help.
FloatToStr, help всегда полезен.
P.S. Рекомендую книгу А. Я. Архангельского "Delphi 7. Справочное пособие". Тогда такие вопросы сразу пропадают.


Наверх

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