已审核词条 未审核词条

子程序名	返回值类型	公开	备 注
窗口_屏蔽编辑框右键	逻辑型		注：只能屏蔽自身程序的编辑框；外部无效；
参数名	类 型	参考	可空	数组	备 注
编辑框句柄	整数型				编辑框句柄
菜单回调子程序	子程序指针				留空为不弹菜单；

变量名	类 型	静态	数组	备 注
WndProc	整数型

如果真 (IsWindow (编辑框句柄) ＝ 假)
输出调试文本 (“编辑框句柄无效！”)
返回 (假)

WndProc ＝ GetPropA (编辑框句柄, “GWL_WNDPROC”)
如果真 (WndProc ≠ 0)
SetWindowLongA (编辑框句柄, #GWL_WNDPROC, WndProc)
RemovePropA (编辑框句柄, “GWL_WNDPROC”)
RemovePropA (编辑框句柄, “lProc”)

SetPropA (编辑框句柄, “lProc”, 到整数 (菜单回调子程序))
WndProc ＝ SetWindowLongA (编辑框句柄, #GWL_WNDPROC, 到整数 (&编辑框屏蔽右键消息处理))
SetPropA (编辑框句柄, “GWL_WNDPROC”, WndProc)
返回 (真)

子程序名	返回值类型	公开	备 注
编辑框屏蔽右键消息处理	整数型
参数名	类 型	参考	可空	数组	备 注
hWnd	整数型
Msg	整数型
wParam	整数型
lParam	整数型

变量名	类 型	静态	数组	备 注
WndProc	整数型

如果真 (Msg ＝ #WM_DESTROY )
RemovePropA (hWnd, “GWL_WNDPROC”)
RemovePropA (hWnd, “lProc”)
判断 (Msg ＝ #WM_RBUTTONDOWN 或 Msg ＝ #WM_RBUTTONUP 或 Msg ＝ #WM_RBUTTONDBLCLK )
WndProc ＝ GetPropA (hWnd, “lProc”)
返回 (CallWindowProcA (WndProc, 0, 0, 0, 0))
WndProc ＝ GetPropA (hWnd, “GWL_WNDPROC”)
返回 (CallWindowProcA (WndProc, hWnd, Msg, wParam, lParam))

词条作者信息 使用例程 参与校正错误的易友