| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как отсоеденить сотую часть!!!!!!!! [D7, XP]
OLGA © (2008-05-14 17:10:00)Например при расчетах в edit заносится результат расчета округленный до сотых, допустим 55,89. И мне необходимо сотую часть этого числа отделить, в данном случае девятку, для дальнейших действий.Как это сделать.Помогите пожалуйста!!!!!
Anatoly Podgoretsky (2008-05-14 21:10:00) [1]Сотая это не 9, а 0,5589
А отделить ты хочешь не сотою, а позицию 10Е-2
А это просто, если не вдаваться в особенности чисел с плавающей запятой.
Trunc(a*10) / 10
Vlad Oshin (2008-05-14 17:36:00) [2]label1.Caption:=FormatFloat('#,###,###.0',StrToFloat(label1.Caption))
Palladin (2008-05-14 17:16:00) [3]математически: нужно отнять 55,80
метафизически оперируя строками: найти позицию десятичного разделителя, скопировать 1 символ/все символы начиная с найденой позиции+2, добавить к скопированному спереди '0,0';
evgenij (2008-05-14 17:14:00) [4]RightStr(Edit.Text,1) //StrUtils
| |
