1. 易語言鎖鍵盤源碼
.版本 2
.支持庫 EdirectX
.子程序 _窗口1_創建完畢
輸入設備1.初始化 (取窗口句柄 ())
.子程序 _按鈕1_被單擊
輸入設備1.置鍵盤獨占 (真)
.子程序 _按鈕2_被單擊
輸入設備1.置鍵盤獨占 (假)
自己創個輸入設備 望採納!!!!!
2. 怎麼用易語言寫一個自動按鍵的源碼
.版本 2
.支持庫 shellEx
.支持庫 eAPI
.程序集 窗口程序集1
.程序集變數 F10鍵熱鍵標識, 整數型
.程序集變數 F11鍵熱鍵標識, 整數型
.子程序 __啟動窗口_創建完畢
F10鍵熱鍵標識 = 注冊熱鍵 (_啟動窗口.取窗口句柄 (), 標簽1.取窗口句柄 (), 0, #F10鍵)
F11鍵熱鍵標識 = 注冊熱鍵 (_啟動窗口.取窗口句柄 (), 標簽1.取窗口句柄 (), 0, #F11鍵) ' 注冊熱鍵供標簽使用
.子程序 _標簽1_反饋事件, 整數型, , 按下熱鍵後就會有此反饋事件
.參數 參數一, 整數型
.參數 參數二, 整數型
.如果真 (參數一 = F10鍵熱鍵標識) ' 按下F10開始執行時鍾
時鍾1.時鍾周期 = 100
.如果真結束
.如果真 (參數一 = F11鍵熱鍵標識) ' 按下F10終止執行時鍾
時鍾1.時鍾周期 = 0
.如果真結束
.子程序 _時鍾1_周期事件
模擬按鍵 (#上游標鍵, , )
模擬按鍵 (#下游標鍵, , )
模擬按鍵 (#左游標鍵, , )
模擬按鍵 (#右游標鍵, , )
模擬按鍵 (#空格鍵, , )
這些代碼可以直接復制進易語言里,只要在啟動窗口建一個標簽和一個時鍾即可。
求採納
3. 請問易語言的鍵盤控制源碼如何製作的 我拿來參考的 不復制原創 學習易語言中...
是記錄鍵盤按下的鍵嗎??很簡單的。。不管在哪按都有效 利用hook
.版本 2
.支持庫 xplib
.支持庫 spec
.支持庫 eAPI
.程序集 窗口程序集1
.程序集變數 hook, 整數型
.子程序 __啟動窗口_創建完畢
XP風格 (1)
編輯框1.輸入方式 = 1
hook = SetWindowsHookEx (13, &鉤子函數, GetMoleHandle (0), 0)
調試輸出 (GetMoleHandle (0))
調試輸出 (hook)
fz ()
.子程序 鉤子函數, 整數型, , 鉤子函數
.參數 參數一, 整數型
.參數 參數二, 整數型, , 類型、狀態
.參數 參數三, 整數型, , 鍵代碼指針
.局部變數 鍵值, 整數型
鍵值 = 取位元組集數據 (指針到位元組集 (參數三, 1), 3, )
.判斷開始 (參數二 = 256)
.判斷開始 (取鍵盤指示燈狀態 (#介面常量.大小寫鎖定鍵盤燈))
編輯框1.加入文本 (字元 (鍵值))
.判斷 (鍵值 ≥ 65 且 鍵值 ≤ 90)
編輯框1.加入文本 (字元 (鍵值 + 32))
.默認
編輯框1.加入文本 (字元 (鍵值))
.判斷結束
.判斷開始 (鍵值 = #回車鍵)
調試輸出 (「鉤子檢測到你按下了回車鍵!!!!」)
.默認
.判斷結束
.默認
.判斷結束
返回 (CallNextHookEx (hook, 參數一, 參數二, 參數三))
.子程序 __啟動窗口_將被銷毀
UnHookWindowsHookEx (hook)
DLL定義
.版本 2
.DLL命令 GetMoleHandle, 整數型, , "GetMoleHandleA"
.參數 lpMoleName, 整數型
.DLL命令 CallNextHookEx, 整數型, , "CallNextHookEx"
.參數 hhk, 整數型
.參數 nCode, 整數型
.參數 wParam, 整數型
.參數 lParam, 整數型
.DLL命令 SetWindowsHookEx, 整數型, , "SetWindowsHookExA"
.參數 idHook, 整數型
.參數 lpfn, 子程序指針
.參數 hmod, 整數型
.參數 dwThreadId, 整數型
.DLL命令 UnHookWindowsHookEx, 邏輯型, , "UnhookWindowsHookEx"
.參數 hhk, 整數型
自定義數據類型
.版本 2
.數據類型 MSG
.成員 message, 整數型
.成員 paramL, 整數型
.成員 paramH, 整數型
.成員 time, 整數型
.成員 hwnd, 整數型
控制鍵盤的話。。。模擬按鍵應該可以。...我的理解大概就是這樣。。如果理解錯的話,說一聲。。
4. 易語言後台模擬滑鼠、鍵盤的模塊或者源碼
不能用是因為人家游戲用API把你的模擬按鍵功能和諧了...解決方法:網路 易語言 驅動鍵盤模擬(其實驅動級的模擬就是直接模擬你滑鼠和鍵盤的操作,自然也無法和諧....超級模塊里有不同的模擬按鍵方式,你也可以一個個的試過去-_-!)
5. 易語言做鍵盤記錄器的源碼
易語言做鍵盤記錄器的源碼如下:
程序集
窗口程序集1
子程序
__啟動窗口_創建完畢
SkinH_Attach
()
編輯框1禁止
=
真
停止按鈕禁止
=
真
信息框
(「歡迎使用小天鍵盤記錄系統,在關閉此記錄系統後,會自動保存記錄的內容到運行目錄!」,
#信息圖標,
「歡迎使用!」)
子程序
_停止按鈕_被單擊
開始按鈕禁止
=
假
編輯框1禁止
=
真
時鍾1時鍾周期
=
0
停止按鈕禁止
=
真
子程序
_開始按鈕_被單擊
開始按鈕禁止
=
真
編輯框1禁止
=
假
時鍾1時鍾周期
=
50
停止按鈕禁止
=
假
子程序
_時鍾1_周期事件
編輯框1加入文本
(看看按鍵
())
子程序
_按鈕1_被單擊
編輯框1內容
=
「
」
子程序
__啟動窗口_可否被關閉,
邏輯型
寫到文件
(取運行目錄
()
+
「\記錄內容txt」,
到位元組集
(編輯框1內容))
銷毀
()
子程序
_按鈕2_被單擊
刪除文件
(取運行目錄
()
+
「\記錄內容txt」)
6. 易語言鍵盤記錄源碼問題。
用模塊搞這些東西簡單多了, FindWindowA是查找窗口句柄,返回0說明進程結束, IsWindow判斷窗口句柄是否有效, GetAsyncKeyState(鍵代碼)返回-32767表示測試鍵按下,可用循環監視鍵盤按下,做記錄用。鍵盤記錄方法很多,但是一般放到號軟體會加密
7. 怎麼用易語言寫一個自動按鍵的源碼
用到的組件:一個標簽 一個時鍾
說明:這個是每隔0.1秒隨機上下左右按下其中一個 如果要0.1秒上下左右全部按下 把時鍾周期事件下的判斷去掉即可
----------------------------------
.版本 2
.支持庫 shellEx
.支持庫 eAPI
.程序集 窗口程序集1
.程序集變數 F10, 整數型
.程序集變數 F11, 整數型
.子程序 __啟動窗口_創建完畢
F10 = 注冊熱鍵 (_啟動窗口.取窗口句柄 (), 標簽1.取窗口句柄 (), 0, #F10鍵)
F11 = 注冊熱鍵 (_啟動窗口.取窗口句柄 (), 標簽1.取窗口句柄 (), 0, #F11鍵)
.子程序 _標簽1_反饋事件, 整數型
.參數 參數一, 整數型
.參數 參數二, 整數型
.判斷開始 (參數一 = F10)
時鍾1.時鍾周期 = 100
.判斷 (參數一 = F11)
時鍾1.時鍾周期 = 0
.默認
.判斷結束
.子程序 _時鍾1_周期事件
.局部變數 a, 整數型
a = 取隨機數 (1, 5)
.判斷開始 (a = 1)
模擬按鍵 (#上游標鍵, , )
.判斷 (a = 2)
模擬按鍵 (#下游標鍵, , )
.判斷 (a = 3)
模擬按鍵 (#左游標鍵, , )
.判斷 (a = 4)
模擬按鍵 (#右游標鍵, , )
.判斷 (a = 5)
模擬按鍵 (#空格鍵, , )
.默認
----------------------------------------------
8. 易語言做鍵盤記錄器的源碼
易語言做鍵盤記錄器的源碼如下:
程序集 窗口程序集1
子程序 __啟動窗口_創建完畢
SkinH_Attach ()
編輯框1禁止 = 真
停止按鈕禁止 = 真
信息框 (「歡迎使用小天鍵盤記錄系統,在關閉此記錄系統後,會自動保存記錄的內容到運行目錄!」, #信息圖標, 「歡迎使用!」)
子程序 _停止按鈕_被單擊
開始按鈕禁止 = 假
編輯框1禁止 = 真
時鍾1時鍾周期 = 0
停止按鈕禁止 = 真
子程序 _開始按鈕_被單擊
開始按鈕禁止 = 真
編輯框1禁止 = 假
時鍾1時鍾周期 = 50
停止按鈕禁止 = 假
子程序 _時鍾1_周期事件
編輯框1加入文本 (看看按鍵 ())
子程序 _按鈕1_被單擊
編輯框1內容 = 「 」
子程序 __啟動窗口_可否被關閉, 邏輯型
寫到文件 (取運行目錄 () + 「\記錄內容txt」, 到位元組集 (編輯框1內容))
銷毀 ()
子程序 _按鈕2_被單擊
刪除文件 (取運行目錄 () + 「\記錄內容txt」)
9. 易語言求助,在指定窗口雙擊鍵盤指定按鍵之後觸發指定事件源碼怎麼寫,比如我在瀏覽器按下鍵盤z鍵兩次彈
用SetWindowLong函數重新給窗口指定一個消息處理函數,然後在消息處理函數中一直記錄z鍵的消息,如果有連續兩次被按下就彈出信息框
10. 求易語言鍵盤按鍵單按完整代碼
我寫了一個簡單的常式,你可以看一下,希望對你有用:
.版本
2
.子程序
_按鈕1_按下某鍵,
邏輯型
.參數
鍵代碼,
整數型
.參數
功能鍵狀態,
整數型
.如果
(鍵代碼
=
#Alt鍵)
返回
(假)
.否則
信息框
(「你按下了某鍵!」,
0,
)
.如果結束
你把上面的這段代碼復制到易語言里就看到代碼了