易語言熱鍵編輯框模塊源碼

系統結構:模塊_卸載所有熱鍵框,模塊_卸載指定熱鍵框,模塊_注冊熱鍵框,熱鍵框消息處理,解析按鍵,模塊_取功能鍵,模塊_取鍵,API_SetWindowLong,API_CallWindowProc,API_GetWindowText,API_EnableWindow,API_PostMessage,API_GetKeyState,API_ToAscii,API_取鍵名,API_MapVirtualKey,API_SetWindowLong_Int,API_設置窗口標題,

======窗口程序集1
           |  |
           |  |------ _按鈕1_被單擊
           |  |
           |  |------ __啟動窗口_將被銷毀
           |  |
           |  |------ _標簽1_反饋事件
           |  |
           |  |------ _按鈕2_被單擊
           |  |
           |  |------ _按鈕3_被單擊
  ======主程序集
           |  |
           |  |------ _啟動子程序
           |  |
           |  |------ _臨時子程序
           |  |
           |  |------ 模塊_卸載所有熱鍵框
           |  |
           |  |------ 模塊_卸載指定熱鍵框
           |  |
           |  |------ 模塊_注冊熱鍵框
           |  |
           |  |------ 熱鍵框消息處理
           |  |
           |  |------ 解析按鍵
           |  |
           |  |------ 模塊_取功能鍵
           |  |
           |  |------ 模塊_取鍵
           |  |
           |  |
======調用的Dll
           |  |
           |  |---[dll]------   API_SetWindowLong
           |  |
           |  |---[dll]------   API_CallWindowProc
           |  |
           |  |---[dll]------   API_GetWindowText
           |  |
           |  |---[dll]------   API_EnableWindow
           |  |
           |  |---[dll]------   API_PostMessage
           |  |
           |  |---[dll]------   API_GetKeyState
           |  |
           |  |---[dll]------   API_ToAscii
           |  |
           |  |---[dll]------   API_取鍵名
           |  |
           |  |---[dll]------   API_MapVirtualKey
           |  |
           |  |---[dll]------   API_SetWindowLong_Int
           |  |
           |  |---[dll]------   API_設置窗口標題

調用的DLL命令:

.DLL命令 API_SetWindowLong, 整數型, "user32", "SetWindowLongA", , 在窗口結構中為指定的窗口設置信息  指定數據的前一個值
    .參數 hwnd, 整數型, , 欲為其取得信息的窗口的句柄
    .參數 nIndex, 整數型, , 請參考GetWindowLong函數的nIndex參數的說明
    .參數 dwNewLong, 子程序指針, , 由nIndex指定的窗口信息的新值;

.DLL命令 API_CallWindowProc, 整數型, "user32", "CallWindowProcA", , 將消息傳答窗口函數
    .參數 lpPrevWndFunc, 整數型
    .參數 hwnd, 整數型
    .參數 msg, 整數型
    .參數 wParam, 整數型
    .參數 lParam, 整數型

.DLL命令 API_GetWindowText, 整數型, , "GetWindowTextA"
    .參數 窗口句柄, 整數型
    .參數 存儲內容文本, 文本型, 傳址
    .參數 內容長度, 整數型

.DLL命令 API_EnableWindow, , , "EnableWindow"
    .參數 窗口句柄, 整數型
    .參數 是否取消禁止, 整數型

.DLL命令 API_PostMessage, 整數型, "user32", "PostMessageA", , 將一條消息投遞到指定窗口的消息隊列。投遞的消息會在Windows事件處理過程中得到處理。在那個時候，會隨同投遞的消息調用指定窗口的窗口函數。特別適合那些不需要立即處理的窗口消息的發送  如消息投遞成功，則返回TRUE（非零）。會設置GetLastError
    .參數 hwnd, 整數型, , 接收消息的那個窗口的句柄。如設為HWND_BROADCAST，表示投遞給系統中的所有頂級窗口。如設為零，表示投遞一條線程消息（參考PostThreadMessage）
    .參數 wMsg, 整數型, , 消息標識符
    .參數 wParam, 整數型, , 具體由消息決定
    .參數 lParam, 整數型, , 具體由消息決定;

.DLL命令 API_GetKeyState, 整數型, , "GetKeyState"
    .參數 虛擬鍵類型, 整數型

.DLL命令 API_ToAscii, 整數型, "user32", "ToAscii", , 根據當前的掃描碼和鍵盤信息，將一個虛擬鍵轉換成ASCII字符  負值表明按鍵是“死”的——不能自己將自己轉換成一個字符（重音鍵[accent ;    keys]就是一個例子）。在給定當前鍵盤狀態的前提下，如按鍵不能被轉換（翻譯），則返回0。如單個字符已載入lpwTransKey，則返回1。如lpwTransKey里已載入了兩個字符（需要把它分隔到兩個字節里），那么返回值是2。在當前字符集里，倘若單獨一個字符不能表達鍵盤支持的死鍵或重音按鍵組合，就可能得到2的返回值
    .參數 uVirtKey, 整數型
    .參數 uScanCode, 整數型
    .參數 lpbKeyState, 字節型
    .參數 lpwTransKey, 整數型
    .參數 fuState, 整數型

.DLL命令 API_取鍵名, 整數型, "user32", "GetKeyNameTextA", , 在給出掃描碼的前提下，判斷鍵名  lpBuffer中載入的鍵名的實際長度
    .參數 參數一, 整數型, , 位0到5=0；位16到23=按鍵的掃描碼；位24=增強型鍵盤上的擴展位；位25=如設為1，表示忽略左右Shift和Ctrl鍵的區別
    .參數 緩沖區, 文本型, , 字串預先初始化成至少nSize+1字節，以便隨同鍵名載入
    .參數 緩沖區長度, 整數型, , 字串的最大長度;

.DLL命令 API_MapVirtualKey, 整數型, "user32", "MapVirtualKeyA", , 根據指定的映射類型，執行不同的掃描碼和字符轉換  取決于wMapType參數
    .參數 wCode, 整數型, , 欲轉換的源字符或掃描碼
    .參數 wMapType, 整數型, , 控制映射類型，如下所示0—— wCode是個虛擬鍵碼。函數返回相應的掃描碼1—— wCode是個掃描碼。函數返回相應的虛擬鍵碼2—— wCode是個虛擬鍵碼。函數返回相應的ASCII值（未加Shift組合鍵）;

.DLL命令 API_SetWindowLong_Int, 整數型, "user32", "SetWindowLongA", , 在窗口結構中為指定的窗口設置信息  指定數據的前一個值
    .參數 hwnd, 整數型, , 欲為其取得信息的窗口的句柄
    .參數 nIndex, 整數型, , 請參考GetWindowLong函數的nIndex參數的說明
    .參數 dwNewLong, 整數型, , 由nIndex指定的窗口信息的新值;

.DLL命令 API_設置窗口標題, 整數型, "user32", "SetWindowTextA", , 設置窗口的標題文字或控件的內容（在vb里使用：針對vb窗體，應使用caption或text屬性）  非零表示成功，零表示失敗。會設置GetLastError
    .參數 窗口句柄, 整數型, , 要設置文字的窗口的句柄
    .參數 窗口標題, 文本型, , 要設到hwnd窗口中的文字;