Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 27.08.2009, 19:52   #1
Polotenchik
Форумчанин
 
Аватар для Polotenchik
 
Регистрация: 04.12.2008
Сообщений: 260
По умолчанию Округление RoundTo с числами типа: E-5

У меня получилось число: 1,06722E-5.
Как мне его превратить в вид: 1,07E-5 ?

П.С. В принципе можно и не методом RoundTo... Любым способом.
Я бы изменил мир, но Бог не дает исходники...
Polotenchik вне форума Ответить с цитированием
Старый 27.08.2009, 22:13   #2
Terran
Участник клуба
 
Аватар для Terran
 
Регистрация: 28.11.2007
Сообщений: 1,521
По умолчанию

Можете сделать так:
Код:
Uses
  Math,...
...
Procedure TForm1.Button1Click(Sender: TObject);
Begin
Label1.Caption:=FloatToStr(RoundTo(1.06722E-5,-7));
End;
Всегда рад помочь!
Terran вне форума Ответить с цитированием
Старый 27.08.2009, 22:17   #3
Polotenchik
Форумчанин
 
Аватар для Polotenchik
 
Регистрация: 04.12.2008
Сообщений: 260
По умолчанию

Число может быть разным. Например
1,0672E-5
1,067224E-5
1,067E-5

И мне бы его сократить. Семь знаков после запятой тоже не катит. Тогда просто нет смысла.
Я бы изменил мир, но Бог не дает исходники...
Polotenchik вне форума Ответить с цитированием
Старый 27.08.2009, 22:30   #4
Terran
Участник клуба
 
Аватар для Terran
 
Регистрация: 28.11.2007
Сообщений: 1,521
По умолчанию

Цитата:
Число может быть разным.
Это ничего. RoundTo Сокращает всё)
Цитата:
И мне бы его сократить. Семь знаков после запятой тоже не катит. Тогда просто нет смысла.
Семи знаков не будет.
Всегда рад помочь!
Terran вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Округление чисел Vikelf Помощь студентам 1 01.06.2009 12:16
Округление числа Pinya Microsoft Office Excel 2 18.09.2008 18:01
округление Toxa Общие вопросы Delphi 4 15.01.2007 19:15