Текущий архив: 2004.07.11;
Скачать: CL | DM;
Вниз
CM_MOUSEENTER, CM_MOUSELEAVE и TSpeedButton Найти похожие ветки
← →
X9 © (2004-06-26 14:43) [0]Здравствуйте, Мастера!
Скажите, как можно отловить сообщения CM_MOUSEENTER и CM_MOUSELEAVE для TSpeedButton, ведь данный компонент не имеет собственного Handle.
← →
GuAV © (2004-06-26 14:49) [1]Не имеет. Ловить средствами Дельфи. У наследника проще всего через message methods а так есть WindowProc
← →
jack128 © (2004-06-26 14:51) [2]
> сообщения CM_MOUSEENTER и CM_MOUSELEAVE для TSpeedButton,
> ведь данный компонент не имеет собственного Handle.
это не виндовые сообщения - они реализуются внутреннеми механизмами Delphi(cм TObject.Dispatch, TObject.DefaultHandler и тд) и поэтому хендл тут не нужен.
Вырантов решения два:
Либо писать наследника от TSpeedButton и перехватывать эти сообщения, либо отлавливать эти соощения у родителя кнопки (обычно форма) и смотреть
if Message.lParam = Integer(MyCoolSpeedButton) then
begin
...
end;
← →
jack128 © (2004-06-26 14:54) [3]
> а так есть WindowProc
угу, значит - три варианта решения
Страницы: 1 вся ветка
Текущий архив: 2004.07.11;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.039 c
