Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.07.11;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.034 c
14-1087721381
Nic
2004-06-20 12:49
2004.07.11
Это интересно


1-1088344540
Demion
2004-06-27 17:55
2004.07.11
доступ к объектам


14-1087800202
Романов Р.В.
2004-06-21 10:43
2004.07.11
:))))))))))))


14-1087740468
DDDeN
2004-06-20 18:07
2004.07.11
CDA Track Project


14-1087305175
Gero
2004-06-15 17:12
2004.07.11
Фотки форумчан





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский