Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.03.27;
Скачать: CL | DM;

Вниз

отделение одно цифры запятой   Найти похожие ветки 

 
Begemot   (2003-03-13 17:54) [0]

Подскажите, если не трудно, как от числа отделить одну цифру запятой.


 
Palladin ©   (2003-03-13 18:09) [1]

хм... я понимаю что тебе предельно ясен твой вопрос, тока я нифига не пойму...

может это?
strNumber:=inttostr(nNumber div 10)+","+inttostr(nNumber mod 10);


 
Anatoly Podgoretsky ©   (2003-03-13 18:19) [2]

Begemot (13.03.03 17:54)
Раздели на 10


 
Begemot   (2003-03-13 20:47) [3]

Я неправильно вопрос задал. О делении на 10 я сразу и подумал. Только мне надо от округлённого числа одну цифру отделить.
Так не делится
round(StrToInt(X.Text)*26) / 10
делю так
round(StrToInt(X.Text)*26) div 10 , но после деления он все цифры после запятой выкидывает.
Например: x=1
round(StrToInt(X.Text)*26) div 10 = 2, а должно
быть 2,6 вроде.


 
veb   (2003-03-13 23:38) [4]

Народ, кто-нибудь что-нибудь понимает чего он хочет?

label1.Caption := FloatToStr(round(StrToInt(edit1.text)*26)/10);

ради прикола проверил.


 
Jeer ©   (2003-03-14 00:31) [5]

if length(s)>1 then insert(",",s,length(s));



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

Текущий архив: 2003.03.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.012 c
8-88080
rubaxa
2002-11-29 17:54
2003.03.27
Яркость, контрастность, четкость


3-87841
bytebutcher
2003-03-06 18:37
2003.03.27
BatchMove но с ProgressBarом


1-87990
Inan61
2003-03-12 22:03
2003.03.27
ComboBox и MaxLength


1-87949
ArtyomW`
2003-03-17 18:28
2003.03.27
Программное нажатие кнопки


1-88030
id_privin
2003-03-14 14:56
2003.03.27
Как запистить утилитку и получить текст который она выдаст