如何区分WM_LBUTTONDOWN和WM_LBUTTONDBLCLK消息?

WiseNeuro 2005-05-04 09:49:45
我想实现如下效果:
当在窗体的任务栏上双击鼠标左键时显示窗体,当单击鼠标左键时显示一个菜单。像qq那样的效果。消息处理程序如下:
void __fastcall TFormMain::MyNotify(TMessage& Msg)
{
POINT MousePos;

switch(Msg.LParam)
{
case WM_RBUTTONUP:
if (GetCursorPos(&MousePos))
{
PopupMenuSystem->PopupComponent = FormMain;
SetForegroundWindow(Handle);
PopupMenuSystem->Popup(MousePos.x, MousePos.y);
}
else
Show();
break;
case WM_LBUTTONDBLCLK:
Show() ;
break;
case WM_LBUTTONDOWN:
if (GetCursorPos(&MousePos))
{
PopupMenuState->PopupComponent = FormMain;
SetForegroundWindow(Handle);
PopupMenuState->Popup(MousePos.x, MousePos.y);
}
else
Show() ;
break ;

default:
break;
}
TForm::Dispatch(&Msg);


但是,双击鼠标左键时,他也会发送单击消息,弹出菜单。我该怎样区分这两个消息,或如何实现我想要的效果。谢谢。
...全文
228 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
WiseNeuro 2005-05-05
  • 打赏
  • 举报
回复
ok
搞定
zhenyu362 2005-05-05
  • 打赏
  • 举报
回复
哈哈,我觉得只能用计时来做,因为WM_LBUTTONDBLCLK必定是跟在一个WM_LBUTTONDOWN后面,所以我想到的办法是这样:
static bool bDBLCLK=false;
case WM_LBUTTONDBLCLK:
bDBLCLK=true;
Show() ;
break;
case WM_LBUTTONDOWN:
Timer1->Enable=true;

................
TimerProc
{
if(bDBCLK)
{bDBCLK=false;}
else
{ your code here....}
}

把Timer的intervalue设置成1s就够了
tghost333 2005-05-04
  • 打赏
  • 举报
回复
用两个函数分别控制WM_NCLBUTTONDBLCLK和WM_NCLBUTTONLCLK
类似:
void __fastcall Change(TMessage &Message);
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(WM_NCLBUTTONDBLCLK, TMessage, Change);
END_MESSAGE_MAP(TForm);
Hook(钩子)并不是一项很难的技术,但对于初学者来说还是一个不小的门槛。为此,我将鼠标Hook做成了一个可视化的控件,通过简单的设置几个属性,就可以截获或跟踪其它应用程序的鼠标动作。**********控件介绍:【属性】1.Blocked: Boolean;确定是截获还是跟踪鼠标动作,True对应截获,False对应跟踪。默认值为False2.HookedExeName: string;指定被Hook的应用程序名称。为空时对所有的应用程序起作用。默认值为空3.Active: Boolean;是否处于Hook状态,只读。4.DllName: string;Mouse钩子的dll名称,默认为MouseHook.dll,只读。5.DLLLoaded: Boolean;MouseHook.dll是否被加载,只读。【方法】1.function Start: Boolean;开始Hook2.procedure Stop;停止Hook【事件】 WM_LBUTTONDBLCLK, WM_LBUTTONDOWN, WM_LBUTTONUP, WM_RBUTTONDBLCLK, WM_RBUTTONDOWN, WM_RBUTTONUP, WM_MBUTTONDBLCLK, WM_MBUTTONDOWN, WM_MBUTTONUP, WM_NCLBUTTONDBLCLK, WM_NCLBUTTONDOWN, WM_NCLBUTTONUP, WM_NCRBUTTONDBLCLK, WM_NCRBUTTONDOWN, WM_NCRBUTTONUP, WM_NCMBUTTONDBLCLK, WM_NCMBUTTONDOWN, WM_NCMBUTTONUP, WM_MOUSEMOVE, WM_MOUSEWHEEL, WM_NCMOUSEMOVE, WM_MOUSEACTIVATE, WM_NCHITTEST, WM_CAPTURECHANGED我处理了如上的鼠标事件,注意其中有几个事件我在测试时发现无法Hook,它们为WM_MBUTTONDBLCLKWM_NCMBUTTONDBLCLKWM_MOUSEACTIVATE,WM_NCHITTEST,WM_CAPTURECHANGED建议:不要将HookedExeName:=''; 和 Blocked:=True; 同时设置**********【使用说明】1.首先安装“鼠标Hook控件”目录下的控件2.必须将mousehook.dll拷贝到你开发的应用程序目录下,或系统目录下,如system32【多说几句】1.我提供了一个名为test.exe的demo,该例子是对notepad.exe进行Hook的,因此,使用前先启动notepad.exe,再点击界面上的“开始”,否则会提示“找不到指定的进程”!2.你可以参考我的控件设计模式来设计自己的Hook控件,如键盘Hook。3.本来想写一个组件包的,其中包括各种Hook控件,以及读写端口的控件,以方便初学者的使用,可是要些论文,以后再说吧。 黄晓斌 hxb_leiyuan2000@163.net QQ:478522325
消息,就是指Windows发出的一个通知,告诉应用程序某个事情发生了。例如,单击鼠标、改变窗口尺寸、按下键盘上的一个键都会使Windows发送一个消息给应用程序。 消息本身是作为一个记录传递给应用程序的,这个记录中包含了消息的类型以及其他信息。例如,对于单击鼠标所产生的消息来说,这个记录中包含了单击鼠标时的坐标。这个记录类型叫做TMsg,它在Windows单元中是这样声明的: type TMsg = packed record hwnd: HWND; //窗口句柄 message: UINT;//消息常量标识符 wParam: WPARAM ;// 32位消息的特定附加信息 lParam: LPARAM ;// 32位消息的特定附加信息 time: DWORD;//消息创建时的时间 pt: TPoint; //消息创建时的鼠标位置 end ; 消息中有什么? 是否觉得一个消息记录中的信息像希腊语一样?如果是这样,那么看一看下面的解释:hwnd 32位的窗口句柄。窗口可以是任何类型的屏幕对象,因为Win32能够维护大多数可 视对象的句柄(窗口、对话框、按钮、编辑框等)。message 用于区别其他消息的常量值,这些常量可以是Windows单元中预定义的常量,也 可以是自定义的常量。 wParam 通常是一个与消息有关的常量值,也可能是窗口或控件的句柄。 lParam 通常是一个指向内存中数据的指针。由于WParam、lParam和Pointer都是32位的,因此,它们之间可以相互转换。 WM_NULL =$0000 // WM_CREATE =$0001 //应用程序创建一个窗口 WM_DESTROY = $0002 //一个窗口被销毁 WM_MOVE = $0003 //移动一个窗口 WM_SIZE= $0005 //改变一个窗口的大小 WM_ACTIVATE= $0006 //一个窗口被激活或失去激活状态; WM_SETFOCUS= $0007 //获得焦点后 WM_KILLFOCUS= $0008 //失去焦点 WM_ENABLE= $000A //改变enable状态 WM_SETREDRAW= $000B //设置窗口是否能重画 WM_SETTEXT= $000C //应用程序发送此消息来设置一个窗口的文本 WM_GETTEXT = $000D //应用程序发送此消息来复制对应窗口的文本到缓冲区 WM_GETTEXTLENGTH = $000E //得到与一个窗口有关的文本的长度(不包含空字符) WM_PAINT = $000F //要求一个窗口重画自己 WM_CLOSE = $0010 //当一个窗口或应用程序要关闭时发送一个信号 WM_QUERYENDSESSION= $0011 //当用户选择结束对话框或程序自己调用ExitWindows函数 WM_QUIT= $0012 //用来结束程序运行或当程序调用postquitmessage函数 WM_QUERYOPEN = $0013 //当用户窗口恢复以前的大小位置时,把此消息发送给某个图标 WM_ERASEBKGND = $0014 //当窗口背景必须被擦除时(例在窗口改变大小时) WM_SYSCOLORCHANGE = $0015 //当系统颜色改变时,发送此消息给所有顶级窗口 WM_ENDSESSION = $0016 // 当系统进程发出WM_QUERYENDSESSION消息后,此消息发送给应用程序,通知它对话是否结束 WM_SYSTEMERROR = $0017 // WM_SHOWWINDOW= $0018 //当隐藏或显示窗口是发送此消息给这个窗口 WM_ACTIVATEAPP = $001C //发此消息给应用程序哪个窗口是激活的,哪个是非激活的; WM_FONTCHANGE= $001D //当系统的字体资源库变化时发送此消息给所有顶级窗口 WM_TIMECHANGE= $001E //当系统的时间变化时发送此消息给所有顶级窗口 WM_CANCELMODE= $001F //发送此消息来取消某种正在进行的摸态(操作) WM_SETCURSOR = $0020 //如果鼠标引起光标在某个窗口中移动且鼠标输入没有被捕获时,就发消息给某个窗口 WM_MOUSEACTIVATE = $0021 //当光标在某个非激活的窗口中而用户正按着鼠标的某个键发送此消息给当前窗口 WM_CHILDACTIVATE = $0022 //发送此消息给MDI子窗口当用户点击此窗口的标题栏,或当窗口被激活,移动,改变大小 WM_QUEUESYNC= $0023 //此消息由基
VB写的摄像头家庭监控 Public Function msgproc(ByVal hwnd As Long, ByVal msg As Long, ByVal wp As Long, ByVal lp As Long) As Long On Error Resume Next Dim a As along, t As toint a.x = lp: LSet t = a Select Case msg Case msghinstance.WM_MOUSEMOVE, msghinstance.WM_LBUTTONDOWN, msghinstance.WM_LBUTTONUP, msghinstance.WM_LBUTTONDBLCLK, _ msghinstance.WM_RBUTTONDOWN, msghinstance.WM_RBUTTONUP, msghinstance.WM_RBUTTONDBLCLK, _ msghinstance.WM_MBUTTONDOWN, msghinstance.WM_MBUTTONUP, msghinstance.WM_MBUTTONDBLCLK, _ msghinstance.WM_NCMOUSEMOVE, msghinstance.WM_NCLBUTTONDOWN, msghinstance.WM_NCLBUTTONUP, msghinstance.WM_NCLBUTTONDBLCLK, _ msghinstance.WM_NCRBUTTONDOWN, msghinstance.WM_NCRBUTTONUP, msghinstance.WM_NCRBUTTONDBLCLK, _ msghinstance.WM_NCMBUTTONDOWN, msghinstance.WM_NCMBUTTONUP, msghinstance.WM_NCMBUTTONDBLCLK, _ msghinstance.WM_HOTKEY msgproc = msghinstance.gotomsgevent(hwnd, msg, wp, t.x, t.y) Case msghinstance.WM_MOVE, msghinstance.WM_SIZE msgproc = msghinstance.gotomsgevent(hwnd, msg, t.x, t.y) Case msghinstance.WM_KEYDOWN, msghinstance.WM_KEYUP, msghinstance.WM_SYSCOMMAND, msghinstance.WM_COMMAND, _ msghinstance.WM_ACTIVATEAPP, msghinstance.WM_NCACTIVATE, msghinstance.WM_QUERYOPEN msgproc = msghinstance.gotomsgevent(hwnd, msg, wp) Case msghinstance.WM_DRAWCLIPBOARD, msghinstance.WM_QUERYENDSESSION msgproc = msghinstance.gotomsgevent(hwnd, msg) Case msghinstance.WM_GETMINMAXINFO Dim MinMax As MINMAXINFO CopyMemory MinMax, ByVal lp, Len(MinMax) msghinstance.MaxSizeX = MinMax.ptMaxSize.x msghinstance.MaxSizeY = MinMax.ptMaxSize.y msghinstance.MaxPositionX = MinMax.ptMaxPosition.x msghinstance.MaxPositionY = MinMax.ptMaxPosition.y msghinstance.MinTrackSizeX = MinMax.ptMinTrackSize.x msghinstance.MinTrackSizeY = MinMax.ptMinTrackSize.y msghinstance.MaxTrackSizeX = MinMax.ptMaxTrackSize.x msghinstance.MaxTrackSizeY = MinMax.ptMaxTrackSize.y msghinstance.gotomsgevent hwnd, msg MinMax.ptMaxSize.x = msghinstance.MaxSizeX MinMax.ptMaxSize.y = msghinstance.MaxSizeY MinMax.ptMaxPosition.x = msghinstance.MaxPositionX MinMax.ptMaxPosition.y = msghinstance.MaxPositionY MinMax.ptMinTrackSize.x = msghinstance.MinTrackSizeX MinMax.ptMinTrackSize.y = msghinstance.MinTrackSizeY MinMax.ptMaxTrackSize.x = msghinstance.MaxTrackSizeX MinMax.ptMaxTrackSize.y = msghinstance.MaxTrackSizeY

1,221

社区成员

发帖
与我相关
我的任务
社区描述
C++ Builder Windows SDK/API
社区管理员
  • Windows SDK/API社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧