|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
16.12.2012, 02:01 | #1 |
Пользователь
Регистрация: 07.10.2012
Сообщений: 54
|
Разбиение едит на разряды
Задача такова:
При вводе в едит цифр, как сделать что бы они автоматически принимали формат типа: 999 999 999 999? Несколько часов размышлений особо не помогли... Подскажите пожалуйста,как это сделать? |
16.12.2012, 02:05 | #2 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
самое простое, использовать TMaskEdit
(он, конечно, не безупречен, но, возможно, Вам подойдёт) если нужен обязательно TEdit - то нужно заморачиваться с назначением кода на событие - на нажатие клавиш и ручной обработкой (вставкой пробелов в нужные места). Это и сложнее и менее надёжно, но, тем не менее... |
16.12.2012, 02:07 | #3 | |
Пользователь
Регистрация: 07.10.2012
Сообщений: 54
|
Цитата:
|
|
16.12.2012, 02:11 | #4 |
Старожил
Регистрация: 30.12.2009
Сообщений: 11,430
|
Получаете длину вводимого текста, делите на 3, и через каждые 3 знака ставите пробел в строке, остаток так же отбрасываете пробелом.
|
16.12.2012, 02:12 | #5 |
Пользователь
Регистрация: 07.10.2012
Сообщений: 54
|
|
16.12.2012, 02:30 | #6 |
Старожил
Регистрация: 30.12.2009
Сообщений: 11,430
|
Код:
Подсказки: Используйте mod, div, StrToInt, Length Описание вверху форума, по ссылке "Основы Delphi". |
16.12.2012, 13:29 | #7 |
personality
Старожил
Регистрация: 28.04.2009
Сообщений: 2,885
|
Не не не, зачем придумывать велосипеды, учим матчасть (в лице TFormatSettings).
Код:
|
16.12.2012, 14:17 | #8 |
Пользователь
Регистрация: 07.10.2012
Сообщений: 54
|
Не получается что то,нахожу и целую часть от деления и остаток,но как сформировать новую строку?
|
16.12.2012, 14:17 | #9 | |
Пользователь
Регистрация: 07.10.2012
Сообщений: 54
|
Цитата:
|
|
16.12.2012, 16:44 | #10 |
personality
Старожил
Регистрация: 28.04.2009
Сообщений: 2,885
|
Ага ,так и есть
Код:
И зарубите на носу - "не работает" это слова бестолкового юзера, если Вы себя к тамим не причисляете, то указывайте всё чётко - в какой момент не работает, при каких условиях, какие ошибки пишутся, что подчёркивает дельфи и т.п. Последний раз редактировалось phomm; 16.12.2012 в 16:47. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Компонент едит | Глеб1991 | Помощь студентам | 7 | 05.05.2012 23:28 |
старшие разряды | Михаил2261 | Microsoft Office Excel | 13 | 15.10.2010 02:00 |
Просчет и Едит | 4321 | Общие вопросы Delphi | 15 | 18.11.2008 21:13 |
зашифровка едит | bmb_66 | Компоненты Delphi | 2 | 10.04.2008 11:25 |
Едит | subsonic | Общие вопросы Delphi | 6 | 27.01.2008 10:21 |