Добрый день!
Подскажите пожалуйста. Как перехватывать сообщения, посланные классу THintWindow.
Он просто никак не реагирует на перехватчик.
Мой (нерабочий) код:
TMsgHint = class(THintWindow)
private
procedure WMNCMOUSEMOVE(var message: TMessage); message WM_NCMOUSEMOVE;
end;
...
Procedure TMsgHint.WMNCMOUSEMOVE(var message: TMessage);
begin
Beep; //По идее, должно пикать когда мышь над хинтом. Ан нет..
end;
TLС v.0.7.31c
Если я не ошибаюсь, override - перекрывает всякие там родительские методы.
А что мне перекрыть в моём случае?
Livemask, давай меряться письками- я тоже учился из учебников, а они были еще больше учебнее чем твои учебники!
TMsgHint.WMNCMOUSEMOVE я думаю это перекрывать
TLС v.0.7.31c
Livemask:Нет_я, а с хинтами вы баловались? Это, ведь, особый класс.
какая разница, любой класс можно перекрывать
TLС v.0.7.31c
Исходное сообщение Нет_я:
Livemask, давай меряться письками- я тоже учился из учебников, а они были еще больше учебнее чем твои учебники!
TMsgHint.WMNCMOUSEMOVE я думаю это перекрывать
TLС v.0.7.31c
Письками? Ну если письками, то давай =)))
TLС v.0.7.31c
Исходное сообщение Нет_я:
TMsgHint.WMNCMOUSEMOVE я думаю это перекрывать
Эту процедуру я сам создал в попытке перехватить сообщение WM_NCMOUSEMOVE. Как я её перекрою-то?
Livemask, посмотри на сырцы класса. найди нужную процедурку и перекрой её.
если говорю бред - извини. под вечер мозг не работает и делфы под рукой нет.
TMsgHint.WMNCMOUSEMOVE
это событие при наведении на всплывающую подсказку "бла-бла"? например: label1.hint='блабла'
TLС v.0.7.31c
Livemask,
TMsgHint = class(THintWindow)
private
procedure WMNCMOUSEMOVE(var message: TMessage); Override; message WM_NCMOUSEMOVE;
end;
Procedure TMsgHint.WMNCMOUSEMOVE(var message: TMessage);
begin
Beep; //По идее, должно пикать когда мышь над хинтом. Ан нет..
end;
TLС v.0.7.31c
По-моему нужно перекрывать WndProc и там уже разбирать сообщения. Верно?
Да, точно..
А таким способом - никак не получится.
Livemask, мой девиз был таков:
нет в этом классе - ищи в предке
никогда не подводил))
Эхх... погрузился я в эти web-технологии и совсем забыл прекрасный Дельфи. Насыпал мне соль на рану. Теперь ставить буду...палюбому
TLС v.0.7.31c
code:
procedure THintWindow.WMNCHitTest(var Message: TWMNCHitTest);
begin
Message.Result := HTTRANSPARENT;
end;
Если мне не изменяет мой склероз и MSDN.
Мне нужно перехватывать сообщения приложения?
Исходное сообщение Livemask
borisiq, а у меня нет низлежащего окна. У меня получается родитель - само приложение (TApplication).
Мне нужно перехватывать сообщения приложения?
Я же не знаю что ты там пишешь.
Можно попробовать создать обычную форму и вызывать поверх неё хинт. Перехватывать сообщения мыши этой формы и смотреть, будут ли ей передаваться сообщения когда мышь ползает по хинту.