.版本 2.DLL命令 API_SendMessage, 整數(shù)型, "user32", "SendMessageA" .參數(shù) 窗口句柄, 整數(shù)型 .參數(shù) 消息值, 整數(shù)型 .參數(shù) 參數(shù)一, 整數(shù)型 .參數(shù) 參數(shù)二, 整數(shù)型.DLL命令 API_SendMessageTimeout, 整數(shù)型, "user32", "SendMessageTimeoutA", , , .參數(shù) hWnd, 整數(shù)型, , 要接收消息的一個(gè)窗口的句柄 .參數(shù) Msg, 整數(shù)型, , 消息的標(biāo)識(shí)符 .參數(shù) wParam, 整數(shù)型, , 由消息決定 .參數(shù) lParam, 整數(shù)型, , 由消息決定 .參數(shù) fuFlags, 整數(shù)型, , 下述常數(shù)的一個(gè)或多個(gè);SMTO_ABORTIFHUNG：如目標(biāo)進(jìn)程掛起，則函數(shù)立即返回;SMTO_BLOCK：除非函數(shù)返回，否則調(diào)用線程不能處理消息;SMTO_NORMAL：允許調(diào)用線程處理消息，同時(shí)保持函數(shù)繼續(xù)執(zhí)行 .參數(shù) uTimeout, 整數(shù)型, , 超時(shí)值，采用毫秒為單位 .參數(shù) lpdwResult, 整數(shù)型, 傳址, 用于裝載函數(shù)結(jié)果的一個(gè)變量;.DLL命令 注冊(cè)表_RegDeleteKeyA, 整數(shù)型, "advapi32.dll", "RegDeleteKeyA", 公開(kāi), _注冊(cè)表_刪除項(xiàng)刪除現(xiàn)有項(xiàng)下方一個(gè)指定的子項(xiàng) 零（ERROR_SUCCESS）表示成功。其他任何值都代表一個(gè)錯(cuò)誤代碼 .參數(shù) hKey, 整數(shù)型, , 一個(gè)已打開(kāi)項(xiàng)的句柄，或者標(biāo)準(zhǔn)項(xiàng)名之一 .參數(shù) lpSubKey, 文本型, , 要?jiǎng)h除項(xiàng)的名字。這個(gè)項(xiàng)的所有子項(xiàng)也會(huì)刪除;.DLL命令 注冊(cè)表_RegCloseKey, 整數(shù)型, , "RegCloseKey", 公開(kāi), _注冊(cè)表_關(guān)閉項(xiàng) advapi32.dll關(guān)閉系統(tǒng)注冊(cè)表中的一個(gè)項(xiàng)（或鍵） 零（ERROR_SUCCESS）表示成功。其他任何值都代表一個(gè)錯(cuò)誤代碼 .參數(shù) hKey, 整數(shù)型, , 要關(guān)閉的項(xiàng);.DLL命令 注冊(cè)表_RegCreateKeyA, 整數(shù)型, , "RegCreateKeyA", 公開(kāi), _注冊(cè)表_創(chuàng)建項(xiàng) advapi32.dll在指定的項(xiàng)下創(chuàng)建一個(gè)新項(xiàng)。如指定的項(xiàng)已經(jīng)存在，那么函數(shù)會(huì)打開(kāi)現(xiàn)有的項(xiàng) 零（ERROR_SUCCESS）表示成功。其他任何值都代表一個(gè)錯(cuò)誤代碼 .參數(shù) hKey, 整數(shù)型, , 要打開(kāi)項(xiàng)的句柄，或者一個(gè)標(biāo)準(zhǔn)項(xiàng)名 .參數(shù) lpSubKey, 文本型, , 欲創(chuàng)建的新子項(xiàng)。可同時(shí)創(chuàng)建多個(gè)項(xiàng)，只需用反斜杠將它們分隔開(kāi)即可。例如level1/level2/newkey .參數(shù) phkResult, 整數(shù)型, 傳址, 指定一個(gè)變量，用于裝載新子項(xiàng)的句柄;.DLL命令 注冊(cè)表_RegOpenKeyA, 整數(shù)型, "advapi32.dll", "RegOpenKeyA", 公開(kāi), _注冊(cè)表_打開(kāi)項(xiàng) 打開(kāi)一個(gè)現(xiàn)有的注冊(cè)表項(xiàng) 零（ERROR_SUCCESS）表示成功。其他任何值都代表一個(gè)錯(cuò)誤代碼 .參數(shù) hKey, 整數(shù)型, , 一個(gè)已打開(kāi)項(xiàng)的句柄，或指定一個(gè)標(biāo)準(zhǔn)項(xiàng)名 .參數(shù) lpSubKey, 文本型, , 要打開(kāi)的項(xiàng)名 .參數(shù) phkResult, 整數(shù)型, 傳址, 指定一個(gè)變量，用于裝載（保存）打開(kāi)注冊(cè)表項(xiàng)的一個(gè)句柄;.DLL命令 注冊(cè)表_RegEnumKeyA, 整數(shù)型, "advapi32.dll", "RegEnumKeyA", 公開(kāi), _注冊(cè)表_枚舉子項(xiàng) .參數(shù) hKey, 整數(shù)型 .參數(shù) dwIndex, 整數(shù)型 .參數(shù) lpName, 文本型, 傳址 .參數(shù) cbName, 整數(shù)型.DLL命令 注冊(cè)表_RegQueryValueExA, 整數(shù)型, "advapi32.dll", "RegQueryValueExA", 公開(kāi), _注冊(cè)表_取值獲取一個(gè)項(xiàng)的設(shè)置值 零（ERROR_SUCCESS）表示成功。其他任何值都代表一個(gè)錯(cuò)誤代碼 .參數(shù) hKey, 整數(shù)型, , 一個(gè)已打開(kāi)項(xiàng)的句柄，或者指定一個(gè)標(biāo)準(zhǔn)項(xiàng)名 .參數(shù) lpValueName, 文本型, , 要獲取值的名字 .參數(shù) lpReserved, 整數(shù)型, , 未用，設(shè)為零 .參數(shù) lpType, 整數(shù)型, 傳址, 用于裝載取回?cái)?shù)據(jù)類(lèi)型的一個(gè)變量 .參數(shù) lpData, 字節(jié)集, 傳址, 用于裝載指定值的一個(gè)緩沖區(qū) .參數(shù) lpcbData, 整數(shù)型, 傳址, 用于裝載lpData緩沖區(qū)長(zhǎng)度的一個(gè)變量。一旦返回，它會(huì)設(shè)為實(shí)際裝載到緩沖區(qū)的字節(jié)數(shù);.DLL命令 注冊(cè)表_RegDeleteValueA, 整數(shù)型, "advapi32.dll", "RegDeleteValueA", , _注冊(cè)表_刪除值刪除指定項(xiàng)下方的一個(gè)值 零（ERROR_SUCCESS）表示成功。其他任何值都代表一個(gè)錯(cuò)誤代碼 .參數(shù) hKey, 整數(shù)型, , 一個(gè)已打開(kāi)項(xiàng)的句柄，或標(biāo)準(zhǔn)項(xiàng)名之一 .參數(shù) lpValueName, 文本型, , 要?jiǎng)h除的值名。可設(shè)為vbNull或一個(gè)空串，表示刪除那個(gè)項(xiàng)的默認(rèn)值;.DLL命令 注冊(cè)表_RegFlushKey, 整數(shù)型, "advapi32.dll", "RegFlushKey", , _注冊(cè)表_實(shí)際寫(xiě)入將對(duì)項(xiàng)和它的子項(xiàng)作出的改動(dòng)實(shí)際寫(xiě)入磁盤(pán) Long，零（ERROR_SUCCESS）表示成功。其他任何值都代表一個(gè)錯(cuò)誤代碼 .參數(shù) hKey, 整數(shù)型, , Long，欲刷新的一個(gè)項(xiàng)的句柄，或指定一個(gè)標(biāo)準(zhǔn)項(xiàng)名

.版本 2.常量 HWND_BROADCAST, "65535".常量 WM_SETTINGCHANGE, "26".常量 SMTO_NORMAL, "0".常量 圖標(biāo)126, "<文本長(zhǎng)度: 5>", , ,-126 紅.常量 圖標(biāo)127, "<文本長(zhǎng)度: 5>", , ,-127 藍(lán).常量 圖標(biāo)134, "<文本長(zhǎng)度: 5>", , ,-134 紅

.版本 2.程序集 注冊(cè)表.子程序 _打開(kāi)項(xiàng), 整數(shù)型.參數(shù) 項(xiàng)名稱(chēng), 文本型.參數(shù) 是否創(chuàng)建, 邏輯型, 可空, 默認(rèn)為假:打開(kāi) 真:如果項(xiàng)不存在則創(chuàng)建項(xiàng).局部變量 局_根句柄, 整數(shù)型.局部變量 局_項(xiàng)句柄, 整數(shù)型.局部變量 局_項(xiàng)文本, 文本型.局部變量 局_位置, 整數(shù)型.局部變量 b, 整數(shù)型局_位置 ＝ 尋找文本 (項(xiàng)名稱(chēng), “/”, , 假)局_項(xiàng)文本 ＝ 取文本左邊 (項(xiàng)名稱(chēng), 局_位置 － 1).判斷開(kāi)始 (局_項(xiàng)文本 ＝ “HKEY_CLASSES_ROOT”) 局_根句柄 ＝ 2147483648.判斷 (局_項(xiàng)文本 ＝ “HKEY_CURRENT_USER”) 局_根句柄 ＝ 2147483649.判斷 (局_項(xiàng)文本 ＝ “HKEY_LOCAL_MACHINE”) 局_根句柄 ＝ 2147483650.判斷 (局_項(xiàng)文本 ＝ “HKEY_USERS”) 局_根句柄 ＝ 2147483651.判斷 (文本比較 (局_項(xiàng)文本, “HKEY_CURRENT_CONFIG”, 假) ＝ 0) 局_根句柄 ＝ 2147483653.默認(rèn) 返回 (0).判斷結(jié)束.如果 (是否創(chuàng)建) b ＝ 注冊(cè)表_RegCreateKeyA (局_根句柄, 取文本右邊 (項(xiàng)名稱(chēng), 取文本長(zhǎng)度 (項(xiàng)名稱(chēng)) － 局_位置), 局_項(xiàng)句柄).否則 b ＝ 注冊(cè)表_RegOpenKeyA (局_根句柄, 取文本右邊 (項(xiàng)名稱(chēng), 取文本長(zhǎng)度 (項(xiàng)名稱(chēng)) － 局_位置), 局_項(xiàng)句柄).如果結(jié)束.如果真 (b ＝ 0) 返回 (局_項(xiàng)句柄).如果真結(jié)束返回 (0).子程序 注冊(cè)表_枚舉子項(xiàng), 整數(shù)型, 公開(kāi), 枚舉指定項(xiàng)名稱(chēng)下的子項(xiàng)(成功返回子項(xiàng)目數(shù),失敗返回-1).參數(shù) 項(xiàng)名稱(chēng), 文本型.參數(shù) 子項(xiàng), 文本型, 可空 數(shù)組, 獲取的子項(xiàng)數(shù)組.局部變量 局_a, 整數(shù)型.局部變量 局_計(jì)次, 整數(shù)型.局部變量 局_項(xiàng)名, 文本型清除數(shù)組 (子項(xiàng))局_a ＝ _打開(kāi)項(xiàng) (項(xiàng)名稱(chēng)).如果真 (局_a ＝ 0) 返回 (-1).如果真結(jié)束局_項(xiàng)名 ＝ 取空白文本 (256).判斷循環(huán)首 (注冊(cè)表_RegEnumKeyA (局_a, 局_計(jì)次, 局_項(xiàng)名, 256) ＝ 0) 加入成員 (子項(xiàng), 局_項(xiàng)名) 局_計(jì)次 ＝ 局_計(jì)次 ＋ 1 處理事件 ().判斷循環(huán)尾 ()注冊(cè)表_RegCloseKey (局_a)返回 (取數(shù)組成員數(shù) (子項(xiàng))).子程序 注冊(cè)表_刪除項(xiàng), 邏輯型, 公開(kāi), 刪除指定項(xiàng)名稱(chēng)以及它的所有子項(xiàng)與鍵值.參數(shù) 項(xiàng)名稱(chēng), 文本型, , 欲刪除的項(xiàng)名稱(chēng),尾部不要加"/".局部變量 a, 整數(shù)型.局部變量 b, 整數(shù)型.局部變量 c, 整數(shù)型.局部變量 子項(xiàng), 文本型, , "0".局部變量 局_計(jì)次, 整數(shù)型.如果真 (取文本右邊 (項(xiàng)名稱(chēng), 1) ＝ “/”) 返回 (假).如果真結(jié)束c ＝ 倒找文本 (項(xiàng)名稱(chēng), “/”, , 假)a ＝ _打開(kāi)項(xiàng) (取文本左邊 (項(xiàng)名稱(chēng), c)).如果真 (a ＝ 0) 返回 (假).如果真結(jié)束.計(jì)次循環(huán)首 (注冊(cè)表_枚舉子項(xiàng) (項(xiàng)名稱(chēng), 子項(xiàng)), 局_計(jì)次) 注冊(cè)表_刪除項(xiàng) (項(xiàng)名稱(chēng) ＋ “/” ＋ 子項(xiàng) [局_計(jì)次]).計(jì)次循環(huán)尾 ()b ＝ 注冊(cè)表_RegDeleteKeyA (a, 取文本右邊 (項(xiàng)名稱(chēng), 取文本長(zhǎng)度 (項(xiàng)名稱(chēng)) － c))注冊(cè)表_RegCloseKey (a)返回 (b ＝ 0).子程序 注冊(cè)表_是否存在, 邏輯型, 公開(kāi), 判斷指定注冊(cè)項(xiàng)名稱(chēng)(鍵名)是否存在(存在返回真,否則返回假).參數(shù) 項(xiàng)名稱(chēng), 文本型, , 欲判斷的項(xiàng)名稱(chēng).參數(shù) 鍵名, 文本型, 可空, 欲判斷的鍵名.如果為空則只判斷項(xiàng)名稱(chēng)是否存在.局部變量 a, 整數(shù)型.局部變量 b, 整數(shù)型.局部變量 值, 字節(jié)集a ＝ _打開(kāi)項(xiàng) (項(xiàng)名稱(chēng)).如果真 (是否為空 (鍵名)) 注冊(cè)表_RegCloseKey (a) 返回 (a ≠ 0).如果真結(jié)束值 ＝ 取空白字節(jié)集 (256)b ＝ 注冊(cè)表_RegQueryValueExA (a, 鍵名, 0, 0, 值, 256)注冊(cè)表_RegCloseKey (a)返回 (b ＝ 0).子程序 注冊(cè)表_刪除鍵名, 邏輯型, 公開(kāi), 刪除指定項(xiàng)下的某個(gè)鍵名.參數(shù) 項(xiàng)名稱(chēng), 文本型, , 欲刪除鍵名所在的項(xiàng)名稱(chēng).參數(shù) 鍵名, 文本型, , 欲刪除的鍵名.局部變量 a, 整數(shù)型.局部變量 b, 整數(shù)型a ＝ _打開(kāi)項(xiàng) (項(xiàng)名稱(chēng)).如果真 (a ＝ 0) 返回 (假).如果真結(jié)束b ＝ 注冊(cè)表_RegDeleteValueA (a, 鍵名)注冊(cè)表_RegCloseKey (a).子程序 注冊(cè)表_刷新項(xiàng), 邏輯型, 公開(kāi), 將對(duì)項(xiàng)和它的子項(xiàng)作出的改動(dòng)實(shí)際寫(xiě)入磁盤(pán).參數(shù) 項(xiàng)名稱(chēng), 文本型.局部變量 a, 整數(shù)型.局部變量 b, 整數(shù)型.局部變量 值, 字節(jié)集a ＝ _打開(kāi)項(xiàng) (項(xiàng)名稱(chēng)).如果真 (a ＝ 0) 返回 (假).如果真結(jié)束b ＝ 注冊(cè)表_RegFlushKey (a)注冊(cè)表_RegCloseKey (a)返回 (b ＝ 0)

.版本 2.支持庫(kù) eAPI.程序集 窗口程序集_啟動(dòng)窗口.程序集變量 局部_路徑, 文本型.子程序 __啟動(dòng)窗口_創(chuàng)建完畢圖片框2.圖片 ＝ #ICON_e1圖片框3.圖片 ＝ #ICON_e2圖片框4.圖片 ＝ #ICON_EC圖片框5.圖片 ＝ #ICON_EDB圖片框6.圖片 ＝ #ICON_FNE圖片框7.圖片 ＝ #ICON_LIB判斷注冊(cè)表 ().子程序 判斷注冊(cè)表, , , 根據(jù)注冊(cè)表項(xiàng)鍵值判斷是否關(guān)聯(lián).如果真 (注冊(cè)項(xiàng)是否存在 (#根類(lèi), “E.Document/shell/open/command/”) ＝ 真) 局部_路徑 ＝ 取文本注冊(cè)項(xiàng) (#根類(lèi), “E.Document/shell/open/command/”, ) 局部_路徑 ＝ 取文本左邊 (局部_路徑, 取文本長(zhǎng)度 (局部_路徑) － 5) 編輯框_易語(yǔ)言主程序.內(nèi)容 ＝ 局部_路徑 ' ＋ “e.exe” 通用對(duì)話框.初始目錄 ＝ 局部_路徑 .如果真 (注冊(cè)表_是否存在 (“HKEY_CLASSES_ROOT/.e”))  .如果 (取文本注冊(cè)項(xiàng) (#根類(lèi), “.e/”, ) ＝ “E.Document”)   .如果 (尋找文本 (取文本注冊(cè)項(xiàng) (#根類(lèi), “E.Document/shell/open/command/”, ), 編輯框_易語(yǔ)言主程序.內(nèi)容, , 假) ≠ -1)    選擇框_易語(yǔ)言源碼_文件雙擊打開(kāi).選中 ＝ 真    選擇框_易語(yǔ)言源碼_文件雙擊打開(kāi).禁止 ＝ 真   .否則    選擇框_易語(yǔ)言源碼_文件雙擊打開(kāi).選中 ＝ 真   .如果結(jié)束   .如果 (尋找文本 (取文本注冊(cè)項(xiàng) (#根類(lèi), “E.Document/DefaultIcon/”, ), 編輯框_易語(yǔ)言主程序.內(nèi)容, , 假) ≠ -1 或 文件是否存在 (取文本注冊(cè)項(xiàng) (#根類(lèi), “E.Document/DefaultIcon/”, )) ＝ 真)    選擇框_易語(yǔ)言源碼_圖標(biāo)顯示.選中 ＝ 真    選擇框_易語(yǔ)言源碼_圖標(biāo)顯示.禁止 ＝ 真   .否則    選擇框_易語(yǔ)言源碼_圖標(biāo)顯示.選中 ＝ 真   .如果結(jié)束   .如果 (注冊(cè)項(xiàng)是否存在 (#根類(lèi), “.e/ShellNew/NullFile”) ＝ 真)    選擇框_易語(yǔ)言源碼_右鍵新建易程序.選中 ＝ 真    選擇框_易語(yǔ)言源碼_右鍵新建易程序.禁止 ＝ 真   .否則    選擇框_易語(yǔ)言源碼_右鍵新建易程序.選中 ＝ 真   .如果結(jié)束  .否則   選擇框_易語(yǔ)言源碼_文件雙擊打開(kāi).選中 ＝ 真   選擇框_易語(yǔ)言源碼_圖標(biāo)顯示.選中 ＝ 真   選擇框_易語(yǔ)言源碼_右鍵新建易程序.選中 ＝ 真  .如果結(jié)束  .如果 (取文本注冊(cè)項(xiàng) (#根類(lèi), “.e8/”, ) ＝ “E8.Document”)   .如果 (尋找文本 (取文本注冊(cè)項(xiàng) (#根類(lèi), “E8.Document/DefaultIcon/”, ), 編輯框_易語(yǔ)言主程序.內(nèi)容, , 假) ≠ -1 或 文件是否存在 (取文本注冊(cè)項(xiàng) (#根類(lèi), “E8.Document/DefaultIcon/”, )) ＝ 真)    選擇框_易語(yǔ)言配置信息_圖標(biāo)顯示.選中 ＝ 真    選擇框_易語(yǔ)言配置信息_圖標(biāo)顯示.禁止 ＝ 真   .否則    選擇框_易語(yǔ)言配置信息_圖標(biāo)顯示.選中 ＝ 真   .如果結(jié)束   .如果 (尋找文本 (取文本注冊(cè)項(xiàng) (#根類(lèi), “E8.Document/Shell/Command/”, ), 編輯框_易語(yǔ)言主程序.內(nèi)容, , 假) ≠ -1 或 文件是否存在 (取文本注冊(cè)項(xiàng) (#根類(lèi), “E8.Document/Shell/Command/”, )) ＝ 真)    選擇框_易語(yǔ)言配置信息_文件雙擊打開(kāi).選中 ＝ 真    選擇框_易語(yǔ)言配置信息_文件雙擊打開(kāi).禁止 ＝ 真   .否則    選擇框_易語(yǔ)言配置信息_文件雙擊打開(kāi).選中 ＝ 真   .如果結(jié)束   .如果 (注冊(cè)項(xiàng)是否存在 (#根類(lèi), “.e8/ShellNew/NullFile”) ＝ 真)    選擇框_易語(yǔ)言配置信息_右鍵新建易程序配置信息.選中 ＝ 真    選擇框_易語(yǔ)言配置信息_右鍵新建易程序配置信息.禁止 ＝ 真   .否則    選擇框_易語(yǔ)言配置信息_右鍵新建易程序配置信息.選中 ＝ 真   .如果結(jié)束   .如果 (尋找文本 (取文本注冊(cè)項(xiàng) (#根類(lèi), “E8.Document/Shell/用記事本打開(kāi)/Command/”, ), 編輯框_易語(yǔ)言主程序.內(nèi)容, , 假) ≠ -1 或 文件是否存在 (取文本注冊(cè)項(xiàng) (#根類(lèi), “E8.Document/Shell/用記事本打開(kāi)/Command/”, )) ＝ 真)    選擇框_易語(yǔ)言配置信息_右鍵用易語(yǔ)言打開(kāi).選中 ＝ 真    選擇框_易語(yǔ)言配置信息_右鍵用易語(yǔ)言打開(kāi).禁止 ＝ 真   .否則    選擇框_易語(yǔ)言配置信息_右鍵用易語(yǔ)言打開(kāi).選中 ＝ 真   .如果結(jié)束   .如果 (文件是否存在 (取文本注冊(cè)項(xiàng) (#根類(lèi), “E8.Document/Shell/用記事本打開(kāi)/Command/”, “notepad.exe” ＋ “ ” ＋ #引號(hào) ＋ “%1” ＋ #引號(hào))) ＝ 真)    選擇框_易語(yǔ)言配置信息_右鍵用記事本打開(kāi).選中 ＝ 真    選擇框_易語(yǔ)言配置信息_右鍵用記事本打開(kāi).禁止 ＝ 真   .否則    選擇框_易語(yǔ)言配置信息_右鍵用記事本打開(kāi).選中 ＝ 真   .如果結(jié)束  .否則   選擇框_易語(yǔ)言配置信息_圖標(biāo)顯示.選中 ＝ 真   選擇框_易語(yǔ)言配置信息_文件雙擊打開(kāi).選中 ＝ 真   選擇框_易語(yǔ)言配置信息_右鍵新建易程序配置信息.選中 ＝ 真   選擇框_易語(yǔ)言配置信息_右鍵用易語(yǔ)言打開(kāi).選中 ＝ 真   選擇框_易語(yǔ)言配置信息_右鍵用記事本打開(kāi).選中 ＝ 真  .如果結(jié)束  .如果 (取文本注冊(cè)項(xiàng) (#根類(lèi), “.ec/”, ) ＝ “ec_auto_file”)   .如果 (尋找文本 (取文本注冊(cè)項(xiàng) (#根類(lèi), “ec_auto_file/DefaultIcon/”, ), 取文本左邊 (編輯框_易語(yǔ)言主程序.內(nèi)容, 取文本長(zhǎng)度 (編輯框_易語(yǔ)言主程序.內(nèi)容) － 5), , 假) ≠ -1 且 文件是否存在 (取文本注冊(cè)項(xiàng) (#根類(lèi), “ec_auto_file/DefaultIcon/”, )) ＝ 真)    選擇框_易語(yǔ)言模塊_圖標(biāo)顯示.選中 ＝ 真    選擇框_易語(yǔ)言模塊_圖標(biāo)顯示.禁止 ＝ 真   .否則    選擇框_易語(yǔ)言模塊_圖標(biāo)顯示.選中 ＝ 真   .如果結(jié)束  .否則   選擇框_易語(yǔ)言模塊_圖標(biāo)顯示.選中 ＝ 真  .如果結(jié)束  .如果 (取文本注冊(cè)項(xiàng) (#根類(lèi), “.edb/”, ) ＝ “EDB.Document”)   .如果 (尋找文本 (取文本注冊(cè)項(xiàng) (#根類(lèi), “EDB.Document/DefaultIcon/”, ), 取文本左邊 (編輯框_易語(yǔ)言主程序.內(nèi)容, 取文本長(zhǎng)度 (編輯框_易語(yǔ)言主程序.內(nèi)容) － 5), , 假) ≠ -1 且 文件是否存在 (取文本注冊(cè)項(xiàng) (#根類(lèi), “EDB.Document/DefaultIcon/”, )) ＝ 真)    選擇框_易數(shù)據(jù)庫(kù)文件_圖標(biāo)顯示.選中 ＝ 真    選擇框_易數(shù)據(jù)庫(kù)文件_圖標(biāo)顯示.禁止 ＝ 真   .否則    選擇框_易數(shù)據(jù)庫(kù)文件_圖標(biāo)顯示.選中 ＝ 真   .如果結(jié)束   .如果 (尋找文本 (取文本注冊(cè)項(xiàng) (#根類(lèi), “EDB.Document/Shell/Command/”, ), 取文本左邊 (編輯框_易語(yǔ)言主程序.內(nèi)容, 取文本長(zhǎng)度 (編輯框_易語(yǔ)言主程序.內(nèi)容) － 5), , 假) ≠ -1 且 文件是否存在 (取文本注冊(cè)項(xiàng) (#根類(lèi), “EDB.Document/Shell/Command/”, )) ＝ 真)    選擇框_易數(shù)據(jù)庫(kù)文件_文件雙擊打開(kāi).選中 ＝ 真    選擇框_易數(shù)據(jù)庫(kù)文件_文件雙擊打開(kāi).禁止 ＝ 真   .否則    選擇框_易數(shù)據(jù)庫(kù)文件_文件雙擊打開(kāi).選中 ＝ 真   .如果結(jié)束  .否則   選擇框_易數(shù)據(jù)庫(kù)文件_圖標(biāo)顯示.選中 ＝ 真   選擇框_易數(shù)據(jù)庫(kù)文件_文件雙擊打開(kāi).選中 ＝ 真  .如果結(jié)束  .如果 (取文本注冊(cè)項(xiàng) (#根類(lèi), “.fne/”, ) ＝ “FNE.Document”)   .如果 (尋找文本 (取文本注冊(cè)項(xiàng) (#根類(lèi), “FNE.Document/DefaultIcon/”, ), 取文本左邊 (編輯框_易語(yǔ)言主程序.內(nèi)容, 取文本長(zhǎng)度 (編輯框_易語(yǔ)言主程序.內(nèi)容) － 5), , 假) ≠ -1 且 文件是否存在 (取文本注冊(cè)項(xiàng) (#根類(lèi), “FNE.Document/DefaultIcon/”, )) ＝ 真)    選擇框_易支持庫(kù)文件_圖標(biāo)顯示.選中 ＝ 真    選擇框_易支持庫(kù)文件_圖標(biāo)顯示.禁止 ＝ 真   .否則    選擇框_易支持庫(kù)文件_圖標(biāo)顯示.選中 ＝ 真   .如果結(jié)束   .如果 (尋找文本 (取文本注冊(cè)項(xiàng) (#根類(lèi), “FNE.Document/Shell/復(fù)制到易語(yǔ)言目錄/Command/”, ), 取文本左邊 (編輯框_易語(yǔ)言主程序.內(nèi)容, 取文本長(zhǎng)度 (編輯框_易語(yǔ)言主程序.內(nèi)容) － 5), , 假) ≠ -1 且 文件是否存在 (取文本注冊(cè)項(xiàng) (#根類(lèi), “FNE.Document/Shell/復(fù)制到易語(yǔ)言目錄/Command/”, )) ＝ 真)    選擇框_易支持庫(kù)文件_右鍵復(fù)制到易語(yǔ)言目錄.選中 ＝ 真    選擇框_易支持庫(kù)文件_右鍵復(fù)制到易語(yǔ)言目錄.禁止 ＝ 真   .否則    選擇框_易支持庫(kù)文件_右鍵復(fù)制到易語(yǔ)言目錄.選中 ＝ 假   .如果結(jié)束  .否則   選擇框_易支持庫(kù)文件_圖標(biāo)顯示.選中 ＝ 真  .如果結(jié)束  .如果 (取文本注冊(cè)項(xiàng) (#根類(lèi), “.lib/”, ) ＝ “LIB.Document”)   .如果 (尋找文本 (取文本注冊(cè)項(xiàng) (#根類(lèi), “LIB.Document/DefaultIcon/”, ), 取文本左邊 (編輯框_易語(yǔ)言主程序.內(nèi)容, 取文本長(zhǎng)度 (編輯框_易語(yǔ)言主程序.內(nèi)容) － 5), , 假) ≠ -1 且 文件是否存在 (取文本注冊(cè)項(xiàng) (#根類(lèi), “FNE.Document/DefaultIcon/”, )) ＝ 真)    選擇框_易靜態(tài)庫(kù)文件_圖標(biāo)顯示.選中 ＝ 真    選擇框_易靜態(tài)庫(kù)文件_圖標(biāo)顯示.禁止 ＝ 真   .否則    選擇框_易靜態(tài)庫(kù)文件_圖標(biāo)顯示.選中 ＝ 真   .如果結(jié)束   .如果 (尋找文本 (取文本注冊(cè)項(xiàng) (#根類(lèi), “LIB.Document/Shell/復(fù)制到易語(yǔ)言目錄/Command/”, ), 取文本左邊 (編輯框_易語(yǔ)言主程序.內(nèi)容, 取文本長(zhǎng)度 (編輯框_易語(yǔ)言主程序.內(nèi)容) － 5), , 假) ≠ -1 且 文件是否存在 (取文本注冊(cè)項(xiàng) (#根類(lèi), “FNE.Document/Shell/復(fù)制到易語(yǔ)言目錄/Command/”, )) ＝ 真)    選擇框_易靜態(tài)庫(kù)文件_右鍵復(fù)制到易語(yǔ)言目錄.選中 ＝ 真    選擇框_易靜態(tài)庫(kù)文件_右鍵復(fù)制到易語(yǔ)言目錄.禁止 ＝ 真   .否則    選擇框_易靜態(tài)庫(kù)文件_右鍵復(fù)制到易語(yǔ)言目錄.選中 ＝ 假   .如果結(jié)束  .否則   選擇框_易靜態(tài)庫(kù)文件_圖標(biāo)顯示.選中 ＝ 真  .如果結(jié)束 .如果真結(jié)束.如果真結(jié)束.子程序 _按鈕_一鍵修復(fù)_被單擊.如果 (修復(fù)易語(yǔ)言源碼E () ＝ 真 且 修復(fù)易程序配置信息E8 () ＝ 真 且 修復(fù)易語(yǔ)言模塊EC () ＝ 真 且 修復(fù)易數(shù)據(jù)庫(kù)EDB () ＝ 真 且 修復(fù)易支持庫(kù)FNE () ＝ 真 且 修復(fù)易靜態(tài)庫(kù)LIB () ＝ 真) 注冊(cè)表_刷新項(xiàng) (“HKEY_CLASSES_ROOT/.e”) 注冊(cè)表_刷新項(xiàng) (“HKEY_CLASSES_ROOT/E.Document”) 注冊(cè)表_刷新項(xiàng) (“HKEY_CLASSES_ROOT/.e8”) 注冊(cè)表_刷新項(xiàng) (“HKEY_CLASSES_ROOT/E8.Document”) 注冊(cè)表_刷新項(xiàng) (“HKEY_CLASSES_ROOT/.ec”) 注冊(cè)表_刷新項(xiàng) (“HKEY_CLASSES_ROOT/ec_auto_file”) 注冊(cè)表_刷新項(xiàng) (“HKEY_CLASSES_ROOT/.edb”) 注冊(cè)表_刷新項(xiàng) (“HKEY_CLASSES_ROOT/EDB.Document”) 注冊(cè)表_刷新項(xiàng) (“HKEY_CLASSES_ROOT/.fne”) 注冊(cè)表_刷新項(xiàng) (“HKEY_CLASSES_ROOT/FNE.Document”) 注冊(cè)表_刷新項(xiàng) (“HKEY_CLASSES_ROOT/.lib”) 注冊(cè)表_刷新項(xiàng) (“HKEY_CLASSES_ROOT/LIB.Document”) 刷新注冊(cè)表 () 刷新注冊(cè)表2 () 信息框 (“文件關(guān)聯(lián) 修復(fù)成功”, 64, “提示”, _啟動(dòng)窗口.取窗口句柄 ()).否則 信息框 (“修復(fù)失敗，請(qǐng)以管理員身份運(yùn)行”, 64, , _啟動(dòng)窗口.取窗口句柄 ()).如果結(jié)束.子程序 e文件關(guān)聯(lián), , , 測(cè)試寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.e/”, “”)寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.e/ShellNew/”, “”)寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.e/ShellNew/NullFile”, “”) ' 右鍵新建寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E.Document/”, “易語(yǔ)言程序”) ' 文件描述 ' 此值影響右鍵新建名稱(chēng)和文寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E.Document/DefaultIcon/”, 編輯框_易語(yǔ)言主程序.內(nèi)容 ＋ “ ,-127”) ' 圖標(biāo)關(guān)聯(lián)寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E.Document/shell/”, “”)寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E.Document/shell/open/”, “”)寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E.Document/shell/open/command/”, 編輯框_易語(yǔ)言主程序.內(nèi)容 ＋ “ ” ＋ #引號(hào) ＋ “%1” ＋ #引號(hào)) ' 打開(kāi)命令.子程序 _按鈕_刪除所有_被單擊.如果真 (信息框 (“此操作將從系統(tǒng)清除所有關(guān)聯(lián)信息” ＋ #換行符 ＋ “包括：*.e 、*.e8 、*.ec 、*.edb 、*.fne 、*.lib。” ＋ #換行符 ＋ #換行符 ＋ “點(diǎn)擊[確認(rèn)]則繼續(xù)操作，點(diǎn)擊[取消]則退出。”, 1 ＋ 32 ＋ 256, “是否繼續(xù)操作？”, _啟動(dòng)窗口.取窗口句柄 ()) ＝ #確認(rèn)鈕) .如果 (刪除易語(yǔ)言源碼E () ＝ 真 且 刪除易程序配置信息E8 () ＝ 真 且 刪除易語(yǔ)言模塊EC () ＝ 真 且 刪除易數(shù)據(jù)庫(kù)EDB () ＝ 真 且 刪除易支持庫(kù)FNE () ＝ 真 且 刪除易靜態(tài)庫(kù)LIB () ＝ 真)  刷新注冊(cè)表 ()  信息框 (“文件關(guān)聯(lián) 修復(fù)成功”, 64, “提示”, _啟動(dòng)窗口.取窗口句柄 ()) .否則  信息框 (“修復(fù)失敗，請(qǐng)以管理員身份運(yùn)行”, 64, , _啟動(dòng)窗口.取窗口句柄 ()) .如果結(jié)束.如果真結(jié)束.子程序 修復(fù)易語(yǔ)言源碼E, 邏輯型, , 寫(xiě)注冊(cè)表，成功返回真，失敗返回假。.局部變量 返回E, 邏輯型, , , 記錄返回值返回E ＝ 真.如果真 (選擇框_易語(yǔ)言源碼_圖標(biāo)顯示.選中 ＝ 真 且 選擇框_易語(yǔ)言源碼_圖標(biāo)顯示.禁止 ＝ 假) .如果 (寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.e/”, “E.Document”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E.Document/”, “易語(yǔ)言程序”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E.Document/DefaultIcon/”, 編輯框_易語(yǔ)言主程序.內(nèi)容 ＋ #圖標(biāo)127) ＝ 真)  返回E ＝ 真 .否則  返回E ＝ 假 .如果結(jié)束.如果真結(jié)束.如果真 (選擇框_易語(yǔ)言源碼_文件雙擊打開(kāi).選中 ＝ 真 且 選擇框_易語(yǔ)言源碼_文件雙擊打開(kāi).禁止 ＝ 假) .如果 (寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.e/”, “E.Document”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E.Document/”, “易語(yǔ)言程序”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E.Document/shell/open/command/”, 編輯框_易語(yǔ)言主程序.內(nèi)容 ＋ “ ” ＋ #引號(hào) ＋ “%1” ＋ #引號(hào)) ＝ 真)  返回E ＝ 真 .否則  返回E ＝ 假 .如果結(jié)束.如果真結(jié)束.如果真 (選擇框_易語(yǔ)言源碼_右鍵新建易程序.選中 ＝ 真 且 選擇框_易語(yǔ)言源碼_右鍵新建易程序.禁止 ＝ 假) .如果 (寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.e/”, “E.Document”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E.Document/”, “易語(yǔ)言程序”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.e/ShellNew/NullFile”, “”) ＝ 真)  返回E ＝ 真 .否則  返回E ＝ 假 .如果結(jié)束.如果真結(jié)束返回 (返回E).子程序 刪除易語(yǔ)言源碼E, 邏輯型, , 刪注冊(cè)表，成功返回真，失敗返回假。.局部變量 刪除返回E, 邏輯型刪除返回E ＝ 真.如果真 (注冊(cè)表_是否存在 (“HKEY_CLASSES_ROOT/.e”)) .如果 (注冊(cè)表_刪除項(xiàng) (“HKEY_CLASSES_ROOT/.e”) ＝ 真)  刪除返回E ＝ 真 .否則  刪除返回E ＝ 假 .如果結(jié)束.如果真結(jié)束.如果真 (注冊(cè)表_是否存在 (“HKEY_CLASSES_ROOT/E.Document”)) .如果 (注冊(cè)表_刪除項(xiàng) (“HKEY_CLASSES_ROOT/E.Document”) ＝ 真)  刪除返回E ＝ 真 .否則  刪除返回E ＝ 假 .如果結(jié)束.如果真結(jié)束返回 (刪除返回E).子程序 修復(fù)易語(yǔ)言模塊EC, 邏輯型, , 寫(xiě)注冊(cè)表，成功返回真，失敗返回假。.局部變量 _路徑, 文本型.局部變量 返回EC, 邏輯型, , , 記錄返回值返回EC ＝ 真.如果真 (選擇框_易語(yǔ)言模塊_圖標(biāo)顯示.選中 ＝ 真 且 選擇框_易語(yǔ)言模塊_圖標(biāo)顯示.禁止 ＝ 假) _路徑 ＝ 取文本左邊 (編輯框_易語(yǔ)言主程序.內(nèi)容, 取文本長(zhǎng)度 (編輯框_易語(yǔ)言主程序.內(nèi)容) － 5) .如果 (寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.ec/”, “ec_auto_file”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “ec_auto_file/”, “易語(yǔ)言模塊”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “ec_auto_file/DefaultIcon/”, _路徑 ＋ “help/ec.ico”) ＝ 真)  寫(xiě)到文件 (局部_路徑 ＋ “help/ec.ico”, #ICON_EC)  返回EC ＝ 真 .否則  返回EC ＝ 假 .如果結(jié)束.如果真結(jié)束返回 (返回EC).子程序 刪除易語(yǔ)言模塊EC, 邏輯型, , 刪注冊(cè)表，成功返回真，失敗返回假。.局部變量 刪除返回EC, 邏輯型刪除返回EC ＝ 真.如果真 (注冊(cè)表_是否存在 (“HKEY_CLASSES_ROOT/.ec”)) .如果 (注冊(cè)表_刪除項(xiàng) (“HKEY_CLASSES_ROOT/.ec”) ＝ 真)  刪除返回EC ＝ 真 .否則  刪除返回EC ＝ 假 .如果結(jié)束.如果真結(jié)束.如果真 (注冊(cè)表_是否存在 (“HKEY_CLASSES_ROOT/ec_auto_file”)) .如果 (注冊(cè)表_刪除項(xiàng) (“HKEY_CLASSES_ROOT/ec_auto_file”) ＝ 真)  刪除返回EC ＝ 真 .否則  刪除返回EC ＝ 假 .如果結(jié)束.如果真結(jié)束返回 (刪除返回EC).子程序 修復(fù)易程序配置信息E8, 邏輯型, , 寫(xiě)注冊(cè)表，成功返回真，失敗返回假。.局部變量 返回E8, 邏輯型, , , 記錄返回值返回E8 ＝ 真.如果真 (選擇框_易語(yǔ)言配置信息_圖標(biāo)顯示.選中 ＝ 真 且 選擇框_易語(yǔ)言配置信息_圖標(biāo)顯示.禁止 ＝ 假) .如果 (寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.e8/”, “E8.Document”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E8.Document/”, “易程序配置信息”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E8.Document/DefaultIcon/”, 編輯框_易語(yǔ)言主程序.內(nèi)容 ＋ #圖標(biāo)134) ＝ 真)  返回E8 ＝ 真 .否則  返回E8 ＝ 假 .如果結(jié)束.如果真結(jié)束.如果真 (選擇框_易語(yǔ)言配置信息_文件雙擊打開(kāi).選中 ＝ 真 且 選擇框_易語(yǔ)言配置信息_文件雙擊打開(kāi).禁止 ＝ 假) .如果 (寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.e8/”, “E8.Document”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E8.Document/”, “易程序配置信息”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E8.Document/Shell/Open/Command/”, 編輯框_易語(yǔ)言主程序.內(nèi)容 ＋ “ ” ＋ #引號(hào) ＋ “%1” ＋ #引號(hào)) ＝ 真)  返回E8 ＝ 真 .否則  返回E8 ＝ 假 .如果結(jié)束.如果真結(jié)束.如果真 (選擇框_易語(yǔ)言配置信息_右鍵新建易程序配置信息.選中 ＝ 真 且 選擇框_易語(yǔ)言配置信息_右鍵新建易程序配置信息.禁止 ＝ 假) .如果 (寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.e8/”, “E8.Document”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E8.Document/”, “易程序配置信息”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.e/ShellNew/NullFile”, “”) ＝ 真)  返回E8 ＝ 真 .否則  返回E8 ＝ 假 .如果結(jié)束.如果真結(jié)束.如果真 (選擇框_易語(yǔ)言配置信息_右鍵用記事本打開(kāi).選中 ＝ 真 且 選擇框_易語(yǔ)言配置信息_右鍵用記事本打開(kāi).禁止 ＝ 假) .如果 (寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.e8/”, “E8.Document”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E8.Document/”, “易程序配置信息”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E8.Document/Shell/用記事本打開(kāi)/Command/”, “notepad.exe” ＋ “ ” ＋ #引號(hào) ＋ “%1” ＋ #引號(hào)) ＝ 真)  返回E8 ＝ 真 .否則  返回E8 ＝ 假 .如果結(jié)束.如果真結(jié)束.如果真 (選擇框_易語(yǔ)言配置信息_右鍵用易語(yǔ)言打開(kāi).選中 ＝ 真 且 選擇框_易語(yǔ)言配置信息_右鍵用易語(yǔ)言打開(kāi).禁止 ＝ 假) .如果 (寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.e8/”, “E8.Document”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E8.Document/”, “易程序配置信息”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “E8.Document/Shell/用易語(yǔ)言打開(kāi)/Command/”, 編輯框_易語(yǔ)言主程序.內(nèi)容 ＋ “ ” ＋ #引號(hào) ＋ “%1” ＋ #引號(hào)) ＝ 真)  返回E8 ＝ 真 .否則  返回E8 ＝ 假 .如果結(jié)束.如果真結(jié)束返回 (返回E8).子程序 刪除易程序配置信息E8, 邏輯型, , 刪注冊(cè)表，成功返回真，失敗返回假。.局部變量 刪除返回E8, 邏輯型刪除返回E8 ＝ 真.如果真 (注冊(cè)表_是否存在 (“HKEY_CLASSES_ROOT/.e8”)) .如果 (注冊(cè)表_刪除項(xiàng) (“HKEY_CLASSES_ROOT/.e8”) ＝ 真)  刪除返回E8 ＝ 真 .否則  刪除返回E8 ＝ 假 .如果結(jié)束.如果真結(jié)束.如果真 (注冊(cè)表_是否存在 (“HKEY_CLASSES_ROOT/E8.Document”)) .如果 (注冊(cè)表_刪除項(xiàng) (“HKEY_CLASSES_ROOT/E8.Document”) ＝ 真)  刪除返回E8 ＝ 真 .否則  刪除返回E8 ＝ 假 .如果結(jié)束.如果真結(jié)束返回 (刪除返回E8).子程序 修復(fù)易數(shù)據(jù)庫(kù)EDB, 邏輯型, , 寫(xiě)注冊(cè)表，成功返回真，失敗返回假。.局部變量 EDB_路徑, 文本型.局部變量 返回EDB, 邏輯型, , , 記錄返回值EDB_路徑 ＝ 取文本左邊 (編輯框_易語(yǔ)言主程序.內(nèi)容, 取文本長(zhǎng)度 (編輯框_易語(yǔ)言主程序.內(nèi)容) － 5)返回EDB ＝ 真.如果真 (選擇框_易數(shù)據(jù)庫(kù)文件_圖標(biāo)顯示.選中 ＝ 真 且 選擇框_易數(shù)據(jù)庫(kù)文件_圖標(biāo)顯示.禁止 ＝ 假) .如果 (寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.edb/”, “EDB.Document”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “EDB.Document/”, “易數(shù)據(jù)庫(kù)文件”) 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “LIB.Document/DefaultIcon”, EDB_路徑 ＋ “help/edb.ico”) ＝ 真)  寫(xiě)到文件 (EDB_路徑 ＋ “help/edb.ico”, #ICON_EDB)  返回EDB ＝ 真 .否則  返回EDB ＝ 假 .如果結(jié)束.如果真結(jié)束.如果真 (選擇框_易數(shù)據(jù)庫(kù)文件_文件雙擊打開(kāi).選中 ＝ 真 且 選擇框_易數(shù)據(jù)庫(kù)文件_文件雙擊打開(kāi).禁止 ＝ 假) .如果 (寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.edb/”, “EDB.Document”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “EDB.Document/”, “易數(shù)據(jù)庫(kù)文件”) 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “EDB.Document/Shell/Open/Command”, EDB_路徑 ＋ “tools/EDBView.exe” ＋ “ ” ＋ #引號(hào) ＋ “%1” ＋ #引號(hào)) ＝ 真)  寫(xiě)到文件 (局部_路徑 ＋ “tools/EDBView.exe”, #EDBView)  返回EDB ＝ 真 .否則  返回EDB ＝ 假 .如果結(jié)束.如果真結(jié)束返回 (返回EDB).子程序 刪除易數(shù)據(jù)庫(kù)EDB, 邏輯型, , 刪注冊(cè)表，成功返回真，失敗返回假。.局部變量 刪除返回EDB, 邏輯型刪除返回EDB ＝ 真.如果真 (注冊(cè)表_是否存在 (“HKEY_CLASSES_ROOT/.edb”)) .如果 (注冊(cè)表_刪除項(xiàng) (“HKEY_CLASSES_ROOT/.edb”) ＝ 真)  刪除返回EDB ＝ 真 .否則  刪除返回EDB ＝ 假 .如果結(jié)束.如果真結(jié)束.如果真 (注冊(cè)表_是否存在 (“HKEY_CLASSES_ROOT/EDB.Document”)) .如果 (注冊(cè)表_刪除項(xiàng) (“HKEY_CLASSES_ROOT/EDB.Document”) ＝ 真)  刪除返回EDB ＝ 真 .否則  刪除返回EDB ＝ 假 .如果結(jié)束.如果真結(jié)束返回 (刪除返回EDB).子程序 修復(fù)易支持庫(kù)FNE, 邏輯型, , 寫(xiě)注冊(cè)表，成功返回真，失敗返回假。.局部變量 FNE_路徑, 文本型.局部變量 返回FNE, 邏輯型, , , 記錄返回值FNE_路徑 ＝ 取文本左邊 (編輯框_易語(yǔ)言主程序.內(nèi)容, 取文本長(zhǎng)度 (編輯框_易語(yǔ)言主程序.內(nèi)容) － 5)返回FNE ＝ 真.如果真 (選擇框_易支持庫(kù)文件_圖標(biāo)顯示.選中 ＝ 真 且 選擇框_易支持庫(kù)文件_圖標(biāo)顯示.禁止 ＝ 假) .如果 (寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.fne/”, “FNE.Document”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “FNE.Document/”, “易支持庫(kù)文件”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “FNE.Document/DefaultIcon/”, FNE_路徑 ＋ “help/fne.ico”) ＝ 真)  寫(xiě)到文件 (局部_路徑 ＋ “help/fne.ico”, #ICON_FNE)  返回FNE ＝ 真 .否則  返回FNE ＝ 假 .如果結(jié)束.如果真結(jié)束.如果真 (選擇框_易支持庫(kù)文件_右鍵復(fù)制到易語(yǔ)言目錄.選中 ＝ 真 且 選擇框_易支持庫(kù)文件_右鍵復(fù)制到易語(yǔ)言目錄.禁止 ＝ 假) FNE_路徑 ＝ 取文本左邊 (編輯框_易語(yǔ)言主程序.內(nèi)容, 取文本長(zhǎng)度 (編輯框_易語(yǔ)言主程序.內(nèi)容) － 5) .如果 (寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.fne/”, “FNE.Document”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “FNE.Document/”, “易支持庫(kù)文件”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “FNE.Document/Shell/復(fù)制到易語(yǔ)言目錄/Command/”, FNE_路徑 ＋ “tools/CopytoE.exe” ＋ “ ” ＋ #引號(hào) ＋ “%1” ＋ #引號(hào)) ＝ 真)  寫(xiě)到文件 (局部_路徑 ＋ “tools/CopytoE.exe”, #CopytoE)  返回FNE ＝ 真 .否則  返回FNE ＝ 假 .如果結(jié)束.如果真結(jié)束返回 (返回FNE).子程序 刪除易支持庫(kù)FNE, 邏輯型, , 刪注冊(cè)表，成功返回真，失敗返回假。.局部變量 刪除返回FNE, 邏輯型刪除返回FNE ＝ 真.如果真 (注冊(cè)表_是否存在 (“HKEY_CLASSES_ROOT/.fne”)) .如果 (注冊(cè)表_刪除項(xiàng) (“HKEY_CLASSES_ROOT/.fne”) ＝ 真)  刪除返回FNE ＝ 真 .否則  刪除返回FNE ＝ 假 .如果結(jié)束.如果真結(jié)束.如果真 (注冊(cè)表_是否存在 (“HKEY_CLASSES_ROOT/FNE.Document”)) .如果 (注冊(cè)表_刪除項(xiàng) (“HKEY_CLASSES_ROOT/FNE.Document”) ＝ 真)  刪除返回FNE ＝ 真 .否則  刪除返回FNE ＝ 假 .如果結(jié)束.如果真結(jié)束返回 (刪除返回FNE).子程序 修復(fù)易靜態(tài)庫(kù)LIB, 邏輯型, , 寫(xiě)注冊(cè)表，成功返回真，失敗返回假。.局部變量 LIB_路徑, 文本型.局部變量 返回LIB, 邏輯型, , , 記錄返回值LIB_路徑 ＝ 取文本左邊 (編輯框_易語(yǔ)言主程序.內(nèi)容, 取文本長(zhǎng)度 (編輯框_易語(yǔ)言主程序.內(nèi)容) － 5)返回LIB ＝ 真.如果真 (選擇框_易靜態(tài)庫(kù)文件_圖標(biāo)顯示.選中 ＝ 真 且 選擇框_易靜態(tài)庫(kù)文件_圖標(biāo)顯示.禁止 ＝ 假) .如果 (寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.lib/”, “LIB.Document”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “LIB.Document/”, “易靜態(tài)庫(kù)文件”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “LIB.Document/DefaultIcon/”, LIB_路徑 ＋ “help/lib.ico”) ＝ 真)  寫(xiě)到文件 (LIB_路徑 ＋ “help/lib.ico”, #ICON_LIB)  返回LIB ＝ 真 .否則  返回LIB ＝ 假 .如果結(jié)束.如果真結(jié)束.如果真 (選擇框_易靜態(tài)庫(kù)文件_右鍵復(fù)制到易語(yǔ)言目錄.選中 ＝ 真 且 選擇框_易靜態(tài)庫(kù)文件_右鍵復(fù)制到易語(yǔ)言目錄.禁止 ＝ 假) .如果 (寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “.lib/”, “LIB.Document”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “LIB.Document/”, “易靜態(tài)庫(kù)文件”) ＝ 真 且 寫(xiě)注冊(cè)項(xiàng) (#根類(lèi), “LIB.Document/Shell/復(fù)制到易語(yǔ)言目錄/Command/”, LIB_路徑 ＋ “tools/CopytoE.exe” ＋ “ ” ＋ #引號(hào) ＋ “%1” ＋ #引號(hào)) ＝ 真)  寫(xiě)到文件 (LIB_路徑 ＋ “tools/CopytoE.exe”, #CopytoE)  返回LIB ＝ 真 .否則  返回LIB ＝ 假 .如果結(jié)束.如果真結(jié)束返回 (返回LIB).子程序 刪除易靜態(tài)庫(kù)LIB, 邏輯型, , 刪注冊(cè)表，成功返回真，失敗返回假。.局部變量 刪除返回LIB, 邏輯型刪除返回LIB ＝ 真.如果真 (注冊(cè)表_是否存在 (“HKEY_CLASSES_ROOT/.lib”)) .如果 (注冊(cè)表_刪除項(xiàng) (“HKEY_CLASSES_ROOT/.lib”) ＝ 真)  刪除返回LIB ＝ 真 .否則  刪除返回LIB ＝ 假 .如果結(jié)束.如果真結(jié)束.如果真 (注冊(cè)表_是否存在 (“HKEY_CLASSES_ROOT/LIB.Document”)) .如果 (注冊(cè)表_刪除項(xiàng) (“HKEY_CLASSES_ROOT/LIB.Document”) ＝ 真)  刪除返回LIB ＝ 真 .否則  刪除返回LIB ＝ 假 .如果結(jié)束.如果真結(jié)束返回 (刪除返回LIB).子程序 刷新注冊(cè)表API_SendMessage (#HWND_BROADCAST, #WM_SETTINGCHANGE, 0, 0).子程序 刷新注冊(cè)表2.局部變量 dwResult, 整數(shù)型API_SendMessageTimeout (#HWND_BROADCAST, #WM_SETTINGCHANGE, 0, 0, #SMTO_NORMAL, 1000, dwResult).子程序 _透明標(biāo)簽1_鼠標(biāo)左鍵被按下, 邏輯型.參數(shù) 橫向位置, 整數(shù)型.參數(shù) 縱向位置, 整數(shù)型.參數(shù) 功能鍵狀態(tài), 整數(shù)型打開(kāi)指定網(wǎng)址 (“//www.companysz.com/”).子程序 _按鈕_瀏覽_被單擊通用對(duì)話框.類(lèi)型 ＝ 0通用對(duì)話框.標(biāo)題 ＝ “選擇易語(yǔ)言主程序”通用對(duì)話框.過(guò)濾器 ＝ “易語(yǔ)言主程序(e.exe)|e.exe”.如果真 (通用對(duì)話框.打開(kāi) ()) 編輯框_易語(yǔ)言主程序.內(nèi)容 ＝ 通用對(duì)話框.文件名.如果真結(jié)束.子程序 __啟動(dòng)窗口_尺寸被改變_啟動(dòng)窗口.寬度 ＝ 455_啟動(dòng)窗口.高度 ＝ 480.子程序 __啟動(dòng)窗口_將被銷(xiāo)毀_啟動(dòng)窗口.銷(xiāo)毀 ()