| 子程序名 | 返回值类型 | 公开 | 备 注 | ||||
| 窗口_屏蔽控件右键 | 逻辑型 | 屏蔽指定窗口的鼠标右键操作 | |||||
| 参数名 | 类 型 | 参考 | 可空 | 数组 | 备 注 | ||
| 窗口句柄 | 整数型 | 指定窗口句柄 | |||||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| WndProc | 整数型 | |||||
如果真 (IsWindow (窗口句柄) = 假)
输出调试文本 (“窗口句柄无效!”)
返回 (假)
WndProc = GetPropA (窗口句柄, “GWL_WNDPROC”)
如果真 (WndProc ≠ 0)
SetWindowLongA (窗口句柄, #GWL_WNDPROC, WndProc)
RemovePropA (窗口句柄, “GWL_WNDPROC”)
WndProc = SetWindowLongA (窗口句柄, #GWL_WNDPROC, 到整数 (&屏蔽控件右键_消息处理))
SetPropA (窗口句柄, “GWL_WNDPROC”, WndProc)
返回 (真)
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||||
| 屏蔽控件右键_消息处理 | 整数型 | ||||||
| 参数名 | 类 型 | 参考 | 可空 | 数组 | 备 注 | ||
| hWnd | 整数型 | Msg | 整数型 | wParam | 整数型 | lParam | 整数型 |
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| WndProc | 整数型 | |||||
如果真 (Msg = #WM_DESTROY )
RemovePropA (hWnd, “GWL_WNDPROC”)
判断 (Msg = #WM_RBUTTONDOWN 或 Msg = #WM_RBUTTONUP 或 Msg = #WM_RBUTTONDBLCLK )
返回 (0)
WndProc = GetPropA (hWnd, “GWL_WNDPROC”)
返回 (CallWindowProcA (WndProc, hWnd, Msg, wParam, lParam))
词条作者信息 使用例程
