Вниз
Скачать: CL | DM;

Маска у FormatMaskText   Найти похожие ветки 

← →
Байрам   (2006-02-21 18:38) [0]

Здравствуйте.
Никак не получается привести подобный текст "1688299,96655897792"
к виду: "1 688 299,96"
Подскажите пожалуйста правильную маску для FormatMaskText.
Delphi 5.


← →
McSimm ©   (2006-02-21 22:42) [1]

Почему именно этой функцией?
Какая стоит задача?


← →
LordOfRock ©   (2006-02-21 23:06) [2]

Напиши свою функцию, которая бы:
(Для поставленной тобой задачи в пункте [1])
1) Пробегалась бы по всей строке, по каждому символу и находила бы в нём запятую. Пусть это номер символа N
2) Оставляла бы слева N+2 символов, остальные отрезала.
3) Бежала бы от N влево до нуля и после каждых трёх цифр вставляла бы пробел.

Несложно, но делай сам.


← →
McSimm ©   (2006-02-21 23:28) [3]

>LordOfRock ©  
Зачем это все ???
Например, зачем пробегаться по строке в поисках символа, если есть функция Pos?

Если надо просто отформатировать отображение числа - есть много готовых функций, вопрос почему-то про FormatMaskText.

Подойдет такой вариант?
FormatFloat(",0.00", 1688299.96655897792);

Задать разделительные символы, если нужно:
 DecimalSeparator := ",";
 ThousandSeparator := " ";


← →
McSimm ©   (2006-02-21 23:37) [4]

невнимательно вопрос прочел.
надо текст форматировать, а не действительное число?


← →
LordOfRock ©   (2006-02-22 01:44) [5]

McSimm ©   (21.02.06 23:37) [4]
надо текст форматировать, а не действительное число?

Скорее именно текст, хотя - StrToFloat поможет + [3]


← →
Байрам   (2006-02-22 06:26) [6]

McSimm © спасибо
Я посчитал, что маска одинакова будет для разных типов данных.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.028 c
1-1139310580
Алексей Петухов
2006-02-07 14:09
2006.03.12
OLE Automation по примеру


1-1139309643
Zilog_
2006-02-07 13:54
2006.03.12
Проблема с выводом текста


4-1135083663
morik
2005-12-20 16:01
2006.03.12
SendMessage и Double


2-1140805476
Sairus
2006-02-24 21:24
2006.03.12
Работа с Tclient/serverSocket


4-1134765212
Destroyer
2005-12-16 23:33
2006.03.12
Доступ к сиситемным папкам




   Наверх