Событие движения мыши по окну, в том числе по контролам на ней

← →
Aldor_ (2005-02-01 21:42) [0]

Form.OnMouseMove по понятным причинам не вызывается если на форме есть другие контролы и мышь над ними.
В голову пришел только один способ осуществления сабжа: отлов WM_NCHITTEST.

procedure OnNCHitTest(var Msg: TMessage); message WM_NCHITTEST; ... procedure TForm1.OnNCHitTest(var Msg: TMessage); var Point: TPoint; begin Point.X := Msg.lParam and $0000FFFF; Point.Y := Msg.lParam shr 16; Point := ScreenToClient(Point); //Do smth... Msg.Result := DefWindowProc(Handle, Msg.Msg, Msg.WParam, msg.LParam); end;

Корректно ли это? Можно ли сделать тоже самое только средствами Delphi, не затрагивая WinAPI?

← →
Aldor_ (2005-02-01 23:44) [1]

Сорри, не в тот форум. Перенесите, пожалуйста.

← →
Чапаев © (2005-02-02 10:02) [2]

SetCapture()?

← →
Aldor_ (2005-02-02 21:51) [3]

Дык все-равно ведь API. Может есть сто-нить типа TForm.MousePreview: Boolean.

← →
Aldor_ (2005-02-03 11:42) [4]

Событие движения мыши по окну, в том числе по контролам на ней Найти похожие ветки