Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Маска у FormatMaskText [D5]

Байрам © (2006-02-21 18:38:00)
Здравствуйте.
Никак не получается привести подобный текст '1688299,96655897792'
к виду: '1 688 299,96'
Подскажите пожалуйста правильную маску для FormatMaskText.
Delphi 5.

Байрам (2006-02-22 06:26:00) [1]
McSimm © спасибо
Я посчитал, что маска одинакова будет для разных типов данных.

LordOfRock (2006-02-22 01:44:00) [2]
McSimm © (21.02.06 23:37) [4]
надо текст форматировать, а не действительное число?
Скорее именно текст, хотя - StrToFloat поможет + [3]

McSimm (2006-02-21 23:37:00) [3]
невнимательно вопрос прочел.
надо текст форматировать, а не действительное число?

McSimm (2006-02-21 23:28:00) [4]
>LordOfRock ©
Зачем это все ???
Например, зачем пробегаться по строке в поисках символа, если есть функция Pos?

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

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

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

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

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

McSimm (2006-02-21 22:42:00) [6]
Почему именно этой функцией?
Какая стоит задача?

Наверх

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