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

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 вся ветка

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



Память: 0.46 MB
Время: 0.01 c