Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.02.20;
Скачать: CL | DM;

Вниз

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

 
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]

Up



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

Текущий архив: 2005.02.20;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.051 c
1-1107819015
KOLIG
2005-02-08 02:30
2005.02.20
проблема с вставлением текста в RichEdit


6-1102488735
Michael
2004-12-08 09:52
2005.02.20
function socket() для TCP - совсем запутался...


4-1105186547
BVV
2005-01-08 15:15
2005.02.20
TerminateProcess


9-1096658385
dimodim
2004-10-01 23:19
2005.02.20
Ну Вот пищу игру зацените


14-1107255884
Футболер
2005-02-01 14:04
2005.02.20
Фетисов рулез!