Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.026 c