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

Вниз

Как сделать default-кнопку?   Найти похожие ветки 

 
Alextp ©   (2005-10-18 16:48) [0]

Чайниковский вопрос: как задать, чтобы форма реагировала на нажатия Enter/Esc, делая клик соотв-щей дефолтовой кнопкой? Сделал две кнопки, установил св-ва DefaultBtn и CancelBtn - не нажимаются.
В VCL было достаточно установить для кнопок default/cancel, а здесь как?


 
ECM ©   (2005-10-19 17:53) [1]

Порообуйте почитать
http://www.delphimaster.ru/cgi-bin/forum.pl?n=10&search=d2005

у меня, к сожалению (?) , нет D2005 ... :)


 
ECM ©   (2005-10-19 17:54) [2]

сорри не туда запостил...


 
ECM ©   (2005-10-19 18:01) [3]

А по Вашему вопросу... да, там что-то действительно не так
... хотя должно было бы работать - что-то перемудрили со свойством
IgnoreDefault... я думаю в сл. версиях поправим...:)


 
ECM ©   (2005-10-19 18:13) [4]

А пока -  ИМХО: перхватывайте нажатие ENTER,ESC в OnMessage формы


 
ECM ©   (2005-10-20 13:36) [5]


> что-то перемудрили со свойством
> IgnoreDefault...

Проверил - нет, тут всё в порядке. Беру свои слова обратно.

> Сделал две кнопки, установил св-ва DefaultBtn и CancelBtn
> - не нажимаются.
> В VCL было достаточно установить для кнопок default/cancel,
>  а здесь как?


Не нажиматься они могут, наверное из-за того, что фокус установлен на контроле у которого IgnoreDefault = TRUE. (Кстати это default значение для
KOLButton,KOLBitBtn,KOLEditBox,KOLRichEdit). Просто установите его в FALSE


 
Alextp ©   (2005-10-23 12:45) [6]

Нашел решение: надо перекомпилировать KOL с define-ами:
{$Define ALL_BUTTONS_RESPOND_TO_ENTER}
{$Define ESC_CLOSE_DIALOGS}
Тогда Enter/Esc в диалогах нажимаются.
Насчет IgnoreDefault - спасибо, посмотрю.


 
Vladimir Kladov   (2005-10-23 16:07) [7]

извините, а вы опции прямо в KOL.pas вставляете? вообще-то Project | Options | Conditionals & Directories | Defines. Вот туда и надо, чтобы не трогать исходник.



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

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

Наверх




Память: 0.48 MB
Время: 0.047 c
15-1149787637
Тот же самый
2006-06-08 21:27
2006.07.09
Linux must die


8-1138452664
Universe
2006-01-28 15:51
2006.07.09
Большие изображения


6-1141210521
illmar_kelebrant
2006-03-01 13:55
2006.07.09
Почему UDP - services отказываются работать в DLL?


3-1147340919
gaga
2006-05-11 13:48
2006.07.09
Связь таблиц если в подчиненной таблице 2 втор. ключа


2-1150960522
Квэнди
2006-06-22 11:15
2006.07.09
Проблема с свойствами объекта