易語言如何制作QQ聊天添加自定義小尾巴工具

這篇文章主要介紹了易語言如何制作QQ聊天添加自定義小尾巴工具，具有一定借鑒價值，感興趣的朋友可以參考下，希望大家閱讀完這篇文章之后大有收獲，下面讓小編帶著大家一起了解一下。

DLL命令表

.版本 2
.DLL命令 SetWindowsHookEx, 整數型, , "SetWindowsHookExA", , 建立鉤子
  .參數 idHook, 整數型
  .參數 lpfn, 子程序指針
  .參數 hmod, 整數型
  .參數 dwThreadId, 整數型
.DLL命令 CopyMemory, , , "RtlMoveMemory"
  .參數 Destination, 按鍵信息, 傳址
  .參數 Source, 整數型
  .參數 Length, 整數型
.DLL命令 CallNextHookEx, 整數型, , "CallNextHookEx"
  .參數 hhk, 整數型
  .參數 nCode, 整數型
  .參數 wParam, 整數型
  .參數 lParam, 整數型
.DLL命令 GetModuleHandle, 整數型, , "GetModuleHandleA"
  .參數 lpModuleName, 整數型
.DLL命令 UnHookWindowsHookEx, 邏輯型, , "UnhookWindowsHookEx", , 卸載鉤子
  .參數 hhk, 整數型

自定義數據類型表

.版本 2
.數據類型 按鍵信息
  .成員 message, 整數型
  .成員 paramL, 整數型
  .成員 paramH, 整數型
  .成員 time, 整數型
  .成員 hwnd, 整數型

QQ聊天添加自定義小尾巴

此功能需要加載精易模塊5.6

.版本 2
.支持庫 eAPI
.程序集 窗口程序集_啟動窗口
.程序集變量 鉤子句柄, 整數型
.子程序 __啟動窗口_創建完畢
.如果真 (鉤子句柄 ＝ 0)
  鉤子句柄 ＝ SetWindowsHookEx (13, &鉤子函數, GetModuleHandle (0), 0)
  .如果真 (鉤子句柄 ＝ 0)
    輸出調試文本 (“安裝鉤子失敗！”)
    返回 ()
  .如果真結束
.如果真結束
.子程序 鉤子函數, 整數型
.參數 icode, 整數型
.參數 wparam, 整數型
.參數 lparam, 整數型
.局部變量 按鍵信息, 按鍵信息
.局部變量 局部, 整數型, 靜態
CopyMemory (按鍵信息, lparam, 28)
.如果 (按鍵信息.message ＝ #回車鍵) ' 判斷按下的是否回車鍵。
  .如果真 (局部 ÷ 2 ＝ 局部 ＼ 2) ' 如果不加這個判斷，每次都會投遞2次文本，因為按下和彈起算2次
    文本_投遞 (取鼠標所在窗口句柄 (), 尾巴內容編輯框.內容)
  .如果真結束
  局部 ＝ 局部 ＋ 1
.否則
.如果結束
返回 (CallNextHookEx (鉤子句柄, icode, wparam, lparam))
.子程序 __啟動窗口_將被銷毀
UnHookWindowsHookEx (鉤子句柄)

運行結果：

感謝你能夠認真閱讀完這篇文章，希望小編分享的“易語言如何制作QQ聊天添加自定義小尾巴工具”這篇文章對大家有幫助，同時也希望大家多多支持億速云，關注億速云行業資訊頻道，更多相關知識等著你來學習!