连续运行图片组特效时,如何在程序界面上任一处单击鼠标来中止图片组特效播放
你可以使着截获WM_LBUTTONDOWN消息,然后进行消息过滤即可.或者是WM_NCHITTEST消息,不过
这个消息对所有的MouseMove,MouseDown都截获了,即一旦MouseMove就进入WM_NCHITTEST了。代码如下:
procedure TMain.WndProc(var Msg:TMessage);
begin
case Msg.Msg of
WM_MOUSEMOVE:
begin
GetCursorPos(Pos);
ScreenToClient(Main.Handle,Pos);
HandleMouseMove(Pos.X,Pos.Y);
end;
WM_LButtonDown:
//如果鼠标左键按下的话
YourHandleProc;
Inherited WndProc(Msg);
end;