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

Вниз

TComboBox под колесиком .. мыши   Найти похожие ветки 

 
timekiller ©   (2008-12-02 12:34) [0]

Вроде отловил прокрутку мыши в классе комбобокса

................
................
procedure CMMouseWheel(var Message: TCMMouseWheel); message CM_MOUSEWHEEL;
................
................
procedure TComboBox.CMMouseWheel(var Message: TCMMouseWheel);
begin
 ShowMessage("!");
end;



Все происходит перед тем как бокс смещает itemindex ..
Подскажите как обнулить Message?


 
timekiller ©   (2008-12-02 12:37) [1]

По русски: как вообще запретить реакцию на прокрутку?


 
Сергей М. ©   (2008-12-02 12:38) [2]


> как обнулить Message?


За каким лешим его обнулять-то ?


 
Сергей М. ©   (2008-12-02 12:40) [3]


> как вообще запретить реакцию на прокрутку?


The WM_MOUSEWHEEL message is sent to the focus window when the mouse wheel is rotated. The DefWindowProc function propagates the message to the window"s parent. There should be no internal forwarding of the message, since DefWindowProc propagates it up the parent chain until it finds a window that processes it.


 
timekiller ©   (2008-12-02 12:59) [4]

Так далеко мне пока страшно .. Это мне надо рубануть какоето корневое проперти окна??
Не могу ли я какнибуть "сбить" messages именно этой функцией?


 
timekiller ©   (2008-12-02 15:51) [5]

Сорри, пара подсказок для Мастеров..:
Слова "вообще" и "запретить реакцию" относятся исключительно к TComboBox, то есть я соответствовал теме, которую я же создал (см. выше)


 
timekiller ©   (2008-12-02 17:45) [6]

Нашел!
Может кому пригодится:
procedure TComboBox.CMMouseWheel(var Message: TCMMouseWheel);
begin
 Message.Result := -1;
end;



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

Форум: "Начинающим";
Текущий архив: 2009.01.18;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.007 c
15-1227219455
{RASkov}
2008-11-21 01:17
2009.01.18
Диспетчер устройств


2-1228715571
lex123
2008-12-08 08:52
2009.01.18
Соединение с интернет


15-1227266733
istok2
2008-11-21 14:25
2009.01.18
запуск exe под админом после ребута..


15-1227012127
NoDt
2008-11-18 15:42
2009.01.18
Вывод пути через матрицу последовательности узлов Алгоритм Флойда


15-1227508038
Xmen
2008-11-24 09:27
2009.01.18
Компоненты





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский