溫馨提示×

您好，登錄后才能下訂單哦！

密碼登錄×
登錄注冊(cè)×
其他方式登錄
點(diǎn)擊 登錄注冊(cè) 即表示同意《億速云用戶服務(wù)條款》

易語(yǔ)言如何實(shí)現(xiàn)電腦屏幕鎖定工具

發(fā)布時(shí)間：2021-08-18 11:40:13 來(lái)源：億速云 閱讀：296 作者：小新 欄目：編程語(yǔ)言

小編給大家分享一下易語(yǔ)言如何實(shí)現(xiàn)電腦屏幕鎖定工具，相信大部分人都還不怎么了解，因此分享這篇文章給大家參考一下，希望大家閱讀完這篇文章后大有收獲，下面讓我們一起去了解一下吧！

DLLL命令表

.版本 2
.DLL命令 安裝鉤子, 整數(shù)型, , "SetWindowsHookExA"
  .參數(shù) ihook, 整數(shù)型
  .參數(shù) lpfunc, 子程序指針
  .參數(shù) hin, 整數(shù)型
  .參數(shù) threadid, 整數(shù)型
.DLL命令 卸載鉤子, 整數(shù)型, , "UnhookWindowsHookEx"
  .參數(shù) hHook, 整數(shù)型
.DLL命令 下一個(gè)鉤子, 整數(shù)型, , "CallNextHookEx"
  .參數(shù) hHook, 整數(shù)型
  .參數(shù) icode, 整數(shù)型
  .參數(shù) wParam, 整數(shù)型
  .參數(shù) lParam, 整數(shù)型
.DLL命令 CopyMemory, , , "RtlMoveMemory"
  .參數(shù) Destination, 按鍵信息, 傳址
  .參數(shù) Source, 整數(shù)型
  .參數(shù) cbCopy, 整數(shù)型
.DLL命令 GetModuleHandleA, 整數(shù)型, , "GetModuleHandleA"
  .參數(shù) lpModuleName, 整數(shù)型
.DLL命令 SetWindowPos, 整數(shù)型, "user32"
  .參數(shù) HWnd, 整數(shù)型
  .參數(shù) hWndInsertAfter, 整數(shù)型
  .參數(shù) X, 整數(shù)型
  .參數(shù) Y, 整數(shù)型
  .參數(shù) cx, 整數(shù)型
  .參數(shù) cy, 整數(shù)型
  .參數(shù) wFlags, 整數(shù)型

自定義數(shù)據(jù)類(lèi)型表

.版本 2
.數(shù)據(jù)類(lèi)型 按鍵信息
  .成員 虛擬碼, 整數(shù)型
  .成員 掃描碼, 整數(shù)型
  .成員 標(biāo)記, 整數(shù)型
  .成員 時(shí)間, 整數(shù)型
  .成員 額外信息, 整數(shù)型

鎖屏框

.版本 2
.支持庫(kù) eAPI
.程序集 窗口程序集1
.程序集變量 鉤子句柄, 整數(shù)型
.子程序 _編輯框_解鎖密碼框_內(nèi)容被改變
標(biāo)簽2.標(biāo)題 ＝ “屏幕鎖定中。。?！?
標(biāo)簽2.文本顏色 ＝ #銀白
.子程序 _窗口1_鎖屏框_創(chuàng)建完畢
設(shè)置窗口透明度 (取窗口句柄 (), 250)
窗口1_鎖屏框.左邊 ＝ 0
窗口1_鎖屏框.頂邊 ＝ 0
窗口1_鎖屏框.寬度 ＝ 取屏幕寬度 ()
窗口1_鎖屏框.高度 ＝ 取屏幕高度 ()
圖片框1.左邊 ＝ 取屏幕寬度 () ÷ 2 － 圖片框1.寬度 ÷ 2
圖片框1.頂邊 ＝ 取屏幕高度 () ÷ 2 － 圖片框1.高度 ÷ 2
注冊(cè)屏蔽 ()
.子程序 窗口總在最前
.參數(shù) 參_窗口句柄, 整數(shù)型
SetWindowPos (參_窗口句柄, -1, 0, 0, 0, 0, 位或 (2, 1))
.子程序 _圖形按鈕1_被單擊
_按鈕1_被單擊 ()
.子程序 _按鈕1_被單擊
.如果 (編輯框_解鎖密碼框.內(nèi)容 ＝ “”)
  標(biāo)簽2.標(biāo)題 ＝ “未輸入密碼，請(qǐng)重新輸入！”
  標(biāo)簽2.文本顏色 ＝ #紅色
.否則
  .如果 (編輯框_解鎖密碼框.內(nèi)容 ＝ “123”)
    解除屏蔽 ()
    結(jié)束 ()
  .否則
    .如果 (編輯框_解鎖密碼框.內(nèi)容 ≠ _啟動(dòng)窗口.編輯框_重復(fù)密碼框.內(nèi)容)
      標(biāo)簽2.標(biāo)題 ＝ “密碼不正確，請(qǐng)重新輸入！”
      標(biāo)簽2.文本顏色 ＝ #紅色
    .否則
      .如果 (編輯框_解鎖密碼框.內(nèi)容 ＝ _啟動(dòng)窗口.編輯框_重復(fù)密碼框.內(nèi)容)
        解除屏蔽 ()
        結(jié)束 ()
      .否則
      .如果結(jié)束
    .如果結(jié)束
  .如果結(jié)束
.如果結(jié)束
.子程序 鉤子函數(shù), 整數(shù)型
.參數(shù) icode, 整數(shù)型
.參數(shù) wparam, 整數(shù)型
.參數(shù) lparam, 整數(shù)型
.局部變量 按鍵信息, 按鍵信息
CopyMemory (按鍵信息, lparam, 30)
.如果真 (icode ＝ 0)
  .如果真 (按鍵信息.虛擬碼 ＝ 91 或 按鍵信息.虛擬碼 ＝ 92) ' 屏蔽Win鍵
    .判斷開(kāi)始 (wparam ＝ 256)
      輸出調(diào)試文本 (“按下Win鍵！”)
    .默認(rèn)
      輸出調(diào)試文本 (“彈起Win鍵！”)
    .判斷結(jié)束
    返回 (1)
  .如果真結(jié)束
  .如果真 (按鍵信息.虛擬碼 ＝ 27 且 按鍵信息.掃描碼 ＝ 1) ' 屏蔽crlt+Esc
    返回 (1)
  .如果真結(jié)束
  .如果真 (按鍵信息.虛擬碼 ＝ 115 且 按鍵信息.掃描碼 ＝ 62) ' 屏蔽alt+f4
    返回 (1)
  .如果真結(jié)束
  .如果真 (按鍵信息.虛擬碼 ＝ 9 且 按鍵信息.掃描碼 ＝ 15) ' 屏蔽alt+TAB
    返回 (1)
  .如果真結(jié)束
  .如果真 (按鍵信息.虛擬碼 ＝ 32 且 按鍵信息.掃描碼 ＝ 57) ' 屏蔽crlt+空格 左邊
    返回 (1)
  .如果真結(jié)束
  .如果真 (按鍵信息.虛擬碼 ＝ 161 且 按鍵信息.掃描碼 ＝ 54) ' 屏蔽crlt+空格 右邊
    返回 (1)
  .如果真結(jié)束
  .如果真 (按鍵信息.虛擬碼 ＝ 160 且 按鍵信息.掃描碼 ＝ 42) ' 屏蔽crlt+SHIFT
    返回 (1)
  .如果真結(jié)束
  .如果真 (按鍵信息.虛擬碼 ＝ 46 且 按鍵信息.掃描碼 ＝ 83) ' 屏蔽CAL_DEL_ALT
    返回 (1)
  .如果真結(jié)束
.如果真結(jié)束
返回 (下一個(gè)鉤子 (鉤子句柄, icode, wparam, lparam))
.子程序 注冊(cè)屏蔽
.如果真 (鉤子句柄 ＝ 0)
  鉤子句柄 ＝ 安裝鉤子 (13, &鉤子函數(shù), GetModuleHandleA (0), 0)
  .如果 (鉤子句柄 ≠ 0)
    輸出調(diào)試文本 (“注冊(cè)鉤子成功！”)
  .否則
    輸出調(diào)試文本 (“注冊(cè)鉤子失??！”)
  .如果結(jié)束
.如果真結(jié)束
.子程序 解除屏蔽
.如果真 (鉤子句柄 ≠ 0)
  .如果 (卸載鉤子 (鉤子句柄) ≠ 0)
    輸出調(diào)試文本 (“缷載鉤子成功！”)
  .否則
    輸出調(diào)試文本 (“缷載鉤子失敗！”)
  .如果結(jié)束
.如果真結(jié)束
.子程序 _時(shí)鐘1_周期事件
窗口總在最前 (取窗口句柄 ())

鎖屏

.版本 2
.支持庫(kù) eAPI
.程序集 窗口程序集2
.子程序 __啟動(dòng)窗口_創(chuàng)建完畢
設(shè)置窗口透明度 (取窗口句柄 (), 245)
.子程序 _圖形按鈕1_被單擊
_按鈕1_被單擊 ()
.子程序 _按鈕1_被單擊
.如果 (編輯框_密碼框.內(nèi)容 ≠ 編輯框_重復(fù)密碼框.內(nèi)容)
  標(biāo)簽_提示.標(biāo)題 ＝ “密碼不一致，請(qǐng)重新輸入！”
  標(biāo)簽_提示.文本顏色 ＝ #紅色
.否則
  .如果 (編輯框_密碼框.內(nèi)容 ＝ “”)
    標(biāo)簽_提示.標(biāo)題 ＝ “未輸入密碼，請(qǐng)重新輸入！”
    標(biāo)簽_提示.文本顏色 ＝ #紅色
  .否則
    _啟動(dòng)窗口.可視 ＝ 假
    載入 (窗口1_鎖屏框, , 真)
  .如果結(jié)束
.如果結(jié)束
.子程序 _編輯框_密碼框_內(nèi)容被改變
標(biāo)簽_提示.標(biāo)題 ＝ “請(qǐng)輸入密碼后繼續(xù)：”
標(biāo)簽_提示.文本顏色 ＝ #白色
.子程序 _編輯框_重復(fù)密碼框_內(nèi)容被改變
標(biāo)簽_提示.標(biāo)題 ＝ “請(qǐng)輸入密碼后繼續(xù)：”
標(biāo)簽_提示.文本顏色 ＝ #白色
.子程序 _圖形按鈕_最小化_被單擊
_啟動(dòng)窗口.位置 ＝ 2
.子程序 _圖形按鈕_關(guān)閉_被單擊
銷(xiāo)毀 ()

運(yùn)行結(jié)果：

易語(yǔ)言如何實(shí)現(xiàn)電腦屏幕鎖定工具

以上是“易語(yǔ)言如何實(shí)現(xiàn)電腦屏幕鎖定工具”這篇文章的所有內(nèi)容，感謝各位的閱讀！相信大家都有了一定的了解，希望分享的內(nèi)容對(duì)大家有所幫助，如果還想學(xué)習(xí)更多知識(shí)，歡迎關(guān)注億速云行業(yè)資訊頻道！

向AI問(wèn)一下細(xì)節(jié)

免責(zé)聲明：本站發(fā)布的內(nèi)容（圖片、視頻和文字）以原創(chuàng)、轉(zhuǎn)載和分享為主，文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如果涉及侵權(quán)請(qǐng)聯(lián)系站長(zhǎng)郵箱：is@yisu.com進(jìn)行舉報(bào)，并提供相關(guān)證據(jù)，一經(jīng)查實(shí)，將立刻刪除涉嫌侵權(quán)內(nèi)容。

AI
助
手