易語言如何實現QQ前臺全自動無限加好友

這篇文章將為大家詳細講解有關易語言如何實現QQ前臺全自動無限加好友，小編覺得挺實用的，因此分享給大家做個參考，希望大家閱讀完這篇文章后可以有所收獲。

全局變量表

.版本 2
.全局變量 局_句柄, 整數型
.全局變量 a, 整數型
.全局變量 局1_句柄, 整數型
.全局變量 b, 整數型

常量數據表

.版本 2
.常量 GW_CHILD, "5", , 查找子窗口
.常量 GW_HWNDNEXT, "2", , 查找下一窗口

QQ前臺全自動加好友

此功能需要加載精易模塊5.6，利用模擬的方式添加好友，需要自行打開添加窗口，填寫自己的QQ名稱。

.版本 2
.支持庫 spec
.程序集 窗口程序集_啟動窗口
.子程序 __啟動窗口_創建完畢
.子程序 _無限加按鈕_被單擊
功能1_取句柄 ()
b ＝ 局1_句柄
鼠標_消息 (b, 119, 100, 1, 1)
鼠標_消息 (b, 119, 100, 1, 1)
文本_投遞 (b, 文本_取隨機范圍數字 (100000000, 999999999, ))
鼠標_消息 (b, 635, 119, 1, 1)
延遲 (500)
鼠標_消息 (b, 126, 308, 1, 1)
延遲 (1000)
功能_取句柄 ()
a ＝ 局_句柄
鼠標_消息 (a, 343, 346, 1, 1)
鼠標_消息 (a, 343, 346, 1, 1)
延遲 (1000)
鼠標_消息 (a, 448, 20, 1, 1)
_無限加按鈕_被單擊 ()
.子程序 功能_取句柄, 整數型, , 本子程序采用【精易編程助手】生成,成功返回窗口句柄,失敗返回0
局_句柄 ＝ 窗口_取句柄 (, , “TXGuiFoundation”, 編輯框1.內容 ＋ “ - 添加好友”)
返回 (局_句柄)
.子程序 功能1_取句柄, 整數型, , 本子程序采用【精易編程助手】生成,成功返回窗口句柄,失敗返回0
局1_句柄 ＝ 窗口_取句柄 (, , “TXGuiFoundation”, “查找”)
返回 (局_句柄)
.子程序 __啟動窗口_將被銷毀
結束 ()
.子程序 _加一次按鈕_被單擊
功能1_取句柄 ()
b ＝ 局1_句柄
鼠標_消息 (b, 119, 100, 1, 1)
鼠標_消息 (b, 119, 100, 1, 1)
文本_投遞 (b, 文本_取隨機范圍數字 (100000000, 999999999, ))
鼠標_消息 (b, 635, 119, 1, 1)
延遲 (500)
鼠標_消息 (b, 126, 308, 1, 1)
延遲 (1000)
功能_取句柄 ()
a ＝ 局_句柄
鼠標_消息 (a, 343, 346, 1, 1)
鼠標_消息 (a, 343, 346, 1, 1)
延遲 (1000)
鼠標_消息 (a, 448, 20, 1, 1)

運行結果：

關于“易語言如何實現QQ前臺全自動無限加好友”這篇文章就分享到這里了，希望以上內容可以對大家有一定的幫助，使各位可以學到更多知識，如果覺得文章不錯，請把它分享出去讓更多的人看到。