不要说Click事件。 我需要主动读取 鼠标状态。
解决方案 »
- 高手们,请教一个程序如何在本地跟串口设备通讯,而客户可以IE的方式浏览页面的问题啊,谢谢
- idftp无法获得AWorkCountMax的值?
- 急啊!已经搞了二天了,却不知错在那里
- 很菜的问题!!!快来看看
- 如何,一次性把Panel 内的许多许多TEDIT,TLABEL 控件设置共同的属性
- 关于数据库备份的问题?
- delphi6 怎么取系统目录(一个小时结帖) thank
- 在win98中如何设置和取消共享,在2000中有什么不同吗?
- 谁能推荐几个优秀的delphi的论坛?
- 求完善房地产中介管理系统部分功能
- 求救啊:如何将它作成一个OCX控件。
- 如何得到listview中各个item中的colunmn的值
var
pMouseHook: MOUSEHOOKSTRUCT;
begin
if iCode >= 0 then
begin
case wParam of
WM_MOUSEMOVE:
begin
pMouseHook := pMOUSEHOOKSTRUCT(lparam)^;
PostMessage(g_hDestWnd, SHOW_MENU_MSG, pMouseHook.pt.X, pMouseHook.pt.Y);
end;
WM_LBUTTONDOWN: // 左键
begin end;
WM_RBUTTONDOWN: // 右键
begin end;
end;
end;
Result := CallNextHookEx(g_hHook, iCode, wParam, lParam);
end;