古詩詞大全網 - 個性簽名 - 易語言輸入法註入用DLL怎麽寫?

易語言輸入法註入用DLL怎麽寫?

.版本 2

.支持庫 xplib

.支持庫 shell

.支持庫 spec

.程序集 窗口程序集1

.程序集變量 輸入法句柄

.子程序 __啟動窗口_創建完畢

XP風格 (1)

加載Aero特效 ()

.子程序 輸入法註DLL, , , 輸入法註DLL

寫到文件 (取特定目錄 (10) + “\SouGo.ime”, #Shurufa)

輸入法句柄 = 輸入法.安裝 (取特定目錄 (10) + “\SouGo.ime”, “DNF”)

調試輸出 (輸入法句柄)

寫到文件 (取特定目錄 (10) + “\TerSafe.dll”, #DLL)

.如果真 (輸入法句柄 ≠ 0)

輸入法.設置註入 (取特定目錄 (10) + “\Sougoo.ime”, 取特定目錄 (10) + “\TerSafe.dll”)

按鈕1.可視 = 假

監視熱鍵 (&子程序, #Home鍵, )

.如果真結束

.子程序 子程序, , , 子程序

.如果真 (進程是否存在 (“DNF.exe”) 或 進程是否存在 (“DNF.EXE”) 或 進程是否存在 (“dnf.EXE”) 或 進程是否存在 (“dnf.exe”))

輸入法.激活 (取句柄2 (“DNF.exe”, , ), 輸入法句柄)

延時 (1500)

輸入法.清除註入 (取特定目錄 (10) + “\Sougoo.ime”)

輸入法.卸載 (輸入法句柄)

銷毀 ()

結束 ()

.如果真結束

.子程序 _按鈕1_被單擊, , , 驗證

.如果 (編輯框1.內容 = “849650833”)

標簽4.標題 = “登陸成功 ,歡迎使用!”

.如果 (進程是否存在 (“DNF.exe”) 或 進程是否存在 (“DNF.EXE”) 或 進程是否存在 (“dnf.EXE”) 或 進程是否存在 (“dnf.exe”))

輸入法註DLL ()

.否則

標簽4.標題 = “請先進入遊戲到倉庫後再開啟外掛”

.如果結束

.否則

.如果結束

.子程序 _按鈕2_被單擊, , , 卸載

輸入法.清除註入 (取特定目錄 (10) + “\Sougoo.ime”)

輸入法.卸載 (輸入法句柄)

信息框 (“卸載成功!”, #信息圖標, “系統信息”)

窗口禁止關閉 (_啟動窗口.取窗口句柄 (), 假)

銷毀 ()

.子程序 _窗口1_將被銷毀, , , 卸載

輸入法.清除註入 (取特定目錄 (10) + “\Sougoo.ime”)

輸入法.卸載 (輸入法句柄)