已审核词条 未审核词条

子程序名	返回值类型	公开	备 注
剪贴板_监听			加入剪贴板查看器链
参数名	类 型	参考	可空	数组	备 注
窗口句柄	整数型
回调函数	子程序指针				WndProc(整数型 hwnd, 整数型 uMsg, 整数型 wParam, 整数型 lParam)，返回1拦截。

SetPropA (窗口句柄, “Clipboard_Monitor”, SetWindowLongA (窗口句柄, #GWL_WNDPROC, 到整数 (&WndProc_Clipboard_Monitor)))
SetPropA (窗口句柄, “Clipboard_Callback”, 到整数 (回调函数))
SetPropA (窗口句柄, “Clipboard_Viewer”, SetClipboardViewer (窗口句柄))

子程序名	返回值类型	公开	备 注
WndProc_Clipboard_Monitor	整数型
参数名	类 型	参考	可空	数组	备 注
hWnd	整数型
uMsg	整数型
wParam	整数型
lParam	整数型

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

this ＝ GetPropA (hWnd, “Clipboard_Monitor”)
call ＝ GetPropA (hWnd, “Clipboard_Callback”)
如果真 (uMsg ＝ #WM_DRAWCLIPBOARD 或 uMsg ＝ #WM_CHANGECBCHAIN 或 uMsg ＝ #WM_DESTROY )
如果真 (IsWindow (wParam) ≠ 0 且 wParam ≠ hWnd)
hWnd ＝ wParam
wParam ＝ #NULL
SendMessageA_整数 (hWnd, uMsg, wParam, lParam)
如果真 (CallWindowProcA (call, hWnd, uMsg, wParam, lParam) ＝ 1) ' 拦截
返回 (1)

返回 (CallWindowProcA (this, hWnd, uMsg, wParam, lParam))

子程序名	返回值类型	公开	备 注
剪贴板_停止监听			退出剪贴板查看器链
参数名	类 型	参考	可空	数组	备 注
窗口句柄	整数型

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

this ＝ GetPropA (窗口句柄, “Clipboard_Monitor”)
ChangeClipboardChain (窗口句柄, GetPropA (窗口句柄, “Clipboard_Viewer”))
SetWindowLongA (窗口句柄, #GWL_WNDPROC, this)
RemovePropA (窗口句柄, “Clipboard_Monitor”)
RemovePropA (窗口句柄, “Clipboard_Callback”)
RemovePropA (窗口句柄, “Clipboard_Viewer”)

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