Форум: "KOL";
Текущий архив: 2004.03.14;
Скачать: [xml.tar.bz2];

Вниз

EditBox.Options   Найти похожие ветки 

← →
Puke Zero   (2003-06-26 00:19) [0]

Как изменить опции EditBox непосредственно из программы (RunTime)?
Такая запись EditBox1.Options:=[..] не работает.

---

← →
savva   (2003-06-26 10:30) [1]

как вариант попробуй 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;


---

← →
Gandalf   (2003-06-26 12:46) [2]

Можно проще:

Edit1.Style:=Edit1.Style or YouNeedStyle;
Edit1.Style:=Edit1.Style and (not YouNeedNotStyle);


---

← →
savva   (2003-06-26 13:15) [3]

ну я дал пример работающий и для KOL и для VCL :)))

---

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

Форум: "KOL";
Текущий архив: 2004.03.14;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.013 c