Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.03.14;
Скачать: CL | DM;

Вниз

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 вся ветка

Текущий архив: 2004.03.14;
Скачать: CL | DM;

Наверх




Память: 0.44 MB
Время: 0.012 c
1-43551
Fants
2004-02-27 19:07
2004.03.14
TreeView


1-43539
шаген
2004-02-27 21:03
2004.03.14
для любителей нетривиальных задач


3-43275
dolmat
2004-01-23 13:45
2004.03.14
Нужен компонент для работы с базами .cds


1-43632
Creator
2004-03-02 13:36
2004.03.14
Сервисы


3-43271
Hollywood
2004-02-12 18:37
2004.03.14
сохранение ftFloat в поле Float MSSQL





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский