您好,登錄后才能下訂單哦!
編輯框只能輸入漢字例程
.版本 2 .支持庫 RegEx .支持庫 spec .程序集 啟動窗口程序集 .程序集變量 過濾后文本, 文本型 .子程序 __啟動窗口_創建完畢 默認窗口 = SetWindowLongA (編輯框1.取窗口句柄 (), -4, &處理) .子程序 處理, 整數型, , 不要修改該子程序的返回值及參數的類型! .參數 句柄, 整數型 .參數 消息, 整數型 .參數 參數1, 整數型 .參數 參數2, 整數型 .局部變量 文本字節集, 字節集 .局部變量 i, 整數型 .局部變量 代碼, 字節型, , "0" .局部變量 正則, 正則表達式 .局部變量 結果, 搜索結果, , "0" .如果真 (消息 = 770) 文本字節集 = 到字節集 (取剪輯板文本 ()) 過濾后文本 = “” i = 1 .判斷循環首 (i < 取字節集長度 (文本字節集)) .判斷開始 (到數值 (文本字節集 [i]) ≥ 176 且 到數值 (文本字節集 [i + 1]) ≥ 161) 重定義數組 (代碼, 假, 0) 加入成員 (代碼, 文本字節集 [i]) 加入成員 (代碼, 文本字節集 [i + 1]) 過濾后文本 = 過濾后文本 + 到文本 (到字節集 (代碼)) i = i + 2 到循環尾 () .判斷 (到數值 (文本字節集 [i]) > 127) i = i + 2 .判斷 (取整 (到數值 (文本字節集 [i])) = 13) 調試輸出 (到數值 (文本字節集 [i])) 重定義數組 (代碼, 假, 0) 加入成員 (代碼, 13) 加入成員 (代碼, 10) 過濾后文本 = 過濾后文本 + 到文本 (到字節集 (代碼)) i = i + 1 .默認 i = i + 1 .判斷結束 .判斷循環尾 () 編輯框1.加入文本 (過濾后文本) 返回 (1) .如果真結束 返回 (CallWindowProcA (默認窗口, 句柄, 消息, 參數1, 參數2)) .子程序 _編輯框1_字符輸入, 整數型 .參數 字符代碼, 整數型 .如果真 (字符代碼 = 13 或 字符代碼 = 8) 返回 (字符代碼) .如果真結束 .如果真 (字符代碼 < 176) 返回 (0) .如果真結束
運行結果:
總結
以上就是這篇文章的全部內容了,希望本文的內容對大家的學習或者工作具有一定的參考學習價值,謝謝大家對億速云的支持。如果你想了解更多相關內容請查看下面相關鏈接
免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。