| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
EditBox.Options
Puke Zero © (2003-06-26 00:19:00)
Как изменить опции EditBox непосредственно из программы (RunTime)?
Такая запись EditBox1.Options:=[..] не работает.
savva (2003-06-26 13:15:00) [1]
ну я дал пример работающий и для KOL и для VCL :)))
Gandalf (2003-06-26 12:46:00) [2]
Можно проще:
Edit1.Style:=Edit1.Style or YouNeedStyle;
Edit1.Style:=Edit1.Style and (not YouNeedNotStyle);
savva (2003-06-26 10:30:00) [3]
как вариант попробуй GetWindowLong ... SetWindowLong...
работало и в VCL где никаких Options нет...
Пример - как запретить ввод всего кроме цифр - не обрабатывая OnChange. Просто меняем стиль окна..
var
p:DWORD;
begin
p:=GetWindowLong(Edit1.Handle,GWL_STYLE);
SetWindowLong(Edit1.Handle,GWL_STYLE,p or ES_NUMBER);
end;
| |
