![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TEdit с правым выравниванием [D7, XP]
MsGuns © (2011-07-08 16:07:00)Причем при попадании курсора в контрол текст должен выравниваться влево (для ввода/правки числовых данных)
Делал раньше (вроде через TInplaceEditor), но забыл :)
Как это можно cделать с наименьшими сложностями (мне вообще-то это в билдере надо, но из делфей как-нибудь перенесу с Божьей помощью)
Спасибо за помощь
MsGuns (2011-07-10 15:49:00) [1]Спасибо за ссылку, в понедельник посмотрю (сейчас не до грибов)
Leonid Troyanovsky (2011-07-09 11:18:00) [2]
> MsGuns © (08.07.11 16:19) [3]
http://www.delphipages.com/forum/showpost.php?s=1af96451f4b4564acd29a04a1921ba2c&p=77249&postcount=6
--
Regards, LVT.
clickmaker (2011-07-08 17:47:00) [3]> т.е. через наследника TCustomEdit с перекрытием CreateParams
назначить стиль ES_RIGHT, похоже, единственный нормальный способ
можно через SetWindowLong(GWL_STYLE) попробовать
Palladin (2011-07-08 16:38:00) [4]а у TCustomEdit'а Alignment в protected есть?
RWolf (2011-07-08 16:29:00) [5]GExperts, CnPack умеют заменять компоненты на форме.
MsGuns (2011-07-08 16:19:00) [6]Было бы круто какнить унаследовать событие вроде repaint и туда вписать, а затем просто назначить обработчик всем эдитам (код небольшой - просто перебор в цикле ис проверкой тэгов, куда я всобачу признак "числового" эдита.
Как-то так в общем, но как сделать - не умею типа :)
MsGuns (2011-07-08 16:17:00) [7]Нету у эдита такого св-ва
В нете нашел много чего, но все это как я в общем-то знал, т.е. через наследника TCustomEdit с перекрытием CreateParams.
Но, увы, вся штука в том, что эдитов в проекте стотыщпяцот и они выстроены достаточно сложно (шестиэтажные панели, групбоксы и т.д.) - короче динамически создавать и укладывать "мой" эдит вместо старых - это до Второго Пришествия.
Palladin (2011-07-08 16:11:00) [8]Alignment?