Вниз
Скачать: CL | DM;

Перехват нажатия на кнопку мыши   Найти похожие ветки 

 
gonzales   (2004-10-26 17:27) [0]

Задачка следующая,
надо сделать систему контекстного хэлпа, то есть при нажатии на кнопку появляется курсор со знаком вопроса и в дальнейшем при нажатии на другие компоненты происходил переход к соответствующему разделу справки по кейворду. Так вот, вопрос такой: как перехватить нажатие на кнопку мыши и понять над каким контролом она находится


 
alena.svt ©   (2004-10-26 18:33) [1]

Я ничего не поняла, но если чего то поняла то зачем так сложно
при клике на компонете или MouseMove
If Screen.Cursor = crТвойКурсор then
твои действия со справкой
else
код обработки события


 
gonzales   (2004-10-26 18:37) [2]

все ты правильно поняла, но просто не хоцца писать на каждый компонент обработчик. Ведь у меня есть HelpKeyword каждого компонента, есть функция  FindVCLWindow( const Pos: TPoint ): TWinControl;
Модуль: Controls

Функция возвращает оконное средство управления для местоположения, определенного параметром Pos. Если для данного местоположения нет оконных средств управления, то функция возвращает nil.
Вот, нужно только перехватить нажатие на кнопку и передать управление этой функции.
А вот как, не могу найти:(


 
clickmaker ©   (2004-10-26 18:39) [3]

а включение biHelp в BorderIcons + указание HelpContext для контролов - разве не проще?


 
Юрий Зотов ©   (2004-10-26 18:54) [4]

> gonzales   (26.10.04 17:27)  

Ничего не надо перехватывать и даже ничего не надо писать (кроме самого хелпа). См. [3] - надо просто подключить справку к программе, расставить у контролов свойство HelpContext и включить у форм флаг biHelp.

И все заработает само собой. А если вместо системной кнопки контекстной справки непременно нужна своя собственная, то просто из ее OnClick пошлите форме сообщение WM_CONTEXTMENU.


 
Юрий Зотов ©   (2004-10-26 20:18) [5]

Сорри, конечно WM_HELP, а не WM_CONTEXTMENU.


 
Asinus   (2004-10-26 23:53) [6]

на http://www.ec-software.com/comppage.htm есть библиотека компонентов



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

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



Память: 0.46 MB
Время: 0.021 c
6-1094151616
GuAV
2004-09-02 23:00
2004.11.07
TWebBrowser - designMode


8-1091957143
Delphi5.01
2004-08-08 13:25
2004.11.07
... края силуэта ... плавно переходили в фон


9-1088766735
Sanek_metaller
2004-07-02 15:12
2004.11.07
Дурак


14-1098358614
Layner
2004-10-21 15:36
2004.11.07
Где можно купить Delphi 7? (лиц)


14-1098340117
gn
2004-10-21 10:28
2004.11.07
Стало возможным по документу вычислить принтер




   Наверх