易語(yǔ)言修改軟件版權(quán)信息的工具
更新時(shí)間：2018年12月03日 16:15:51 作者：易語(yǔ)言源碼教程
今天小編就為大家分享一篇關(guān)于易語(yǔ)言修改軟件版權(quán)信息的工具，小編覺(jué)得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來(lái)看看吧
DLL命令表
.版本 2 .DLL命令 BeginUpdateResource, 整數(shù)型, , "BeginUpdateResourceA" .參數(shù) pFileName, 文本型 .參數(shù) bDeleteExistingResources, 邏輯型 .DLL命令 EndUpdateResource, 邏輯型, , "EndUpdateResourceA" .參數(shù) hUpdate, 整數(shù)型 .參數(shù) fDiscard, 邏輯型 .DLL命令 UpdateResource, 邏輯型, , "UpdateResourceA" .參數(shù) hUpdate, 整數(shù)型 .參數(shù) lpType, 整數(shù)型 .參數(shù) lpName, 整數(shù)型 .參數(shù) wLanguage, 整數(shù)型 .參數(shù) lpData, 字節(jié)集 .參數(shù) cbData, 整數(shù)型 .DLL命令 CopyMemory_vf, , , "RtlMoveMemory" .參數(shù) Destination, 字節(jié)集 .參數(shù) Source, VS_FIXEDFILEINFO .參數(shù) cbCopy, 整數(shù)型 .DLL命令 MultiByteToWideChar, 整數(shù)型, , "MultiByteToWideChar" .參數(shù) CodePage, 整數(shù)型 .參數(shù) dwFlags, 整數(shù)型 .參數(shù) lpMultiByteStr, 文本型 .參數(shù) cchMultiByte, 整數(shù)型 .參數(shù) lpWideCharStr, 字節(jié)集 .參數(shù) cchWideChar, 整數(shù)型
常量數(shù)據(jù)表
.版本 2 .常量 版本信息, "<文本長(zhǎng)度: 537>"
自定義數(shù)據(jù)類型表
.版本 2 .數(shù)據(jù)類型 VS_FIXEDFILEINFO .成員 dwSignature, 整數(shù)型 .成員 dwStrucVersion, 整數(shù)型 .成員 dwFileVersionMS, 整數(shù)型 .成員 dwFileVersionLS, 整數(shù)型 .成員 dwProductVersionMS, 整數(shù)型 .成員 dwProductVersionLS, 整數(shù)型 .成員 dwFileFlagsMask, 整數(shù)型 .成員 dwFileFlags, 整數(shù)型 .成員 dwFileOS, 整數(shù)型 .成員 dwFileType, 整數(shù)型 .成員 dwFileSubtype, 整數(shù)型 .成員 dwFileDateMS, 整數(shù)型 .成員 dwFileDateLS, 整數(shù)型 .數(shù)據(jù)類型 版權(quán)信息型, 公開(kāi) .成員 公司, 文本型 .成員 描述, 文本型 .成員 文件版本, 文本型 .成員 內(nèi)部名稱, 文本型 .成員 版權(quán), 文本型 .成員 源文件名, 文本型 .成員 產(chǎn)品名稱, 文本型 .成員 產(chǎn)品版本, 文本型
修改EXE屬性版權(quán)信息
.版本 2
.支持庫(kù) edroptarget
.程序集 窗口程序集1
.子程序 修改版權(quán)信息, , 公開(kāi), 修改指定EXE文件版權(quán)信息
.參數(shù) 文件名, 文本型
.參數(shù) 版本信息, 版權(quán)信息型
.局部變量 更新句柄, 整數(shù)型
.局部變量 版本信息數(shù)據(jù), 字節(jié)集
.局部變量 文件數(shù)據(jù), 字節(jié)集
.局部變量 檢查后文件數(shù)據(jù), 字節(jié)集
.局部變量 尾部數(shù)據(jù), 字節(jié)集
.局部變量 版本信息內(nèi)容, 文本型
文件數(shù)據(jù) ＝ 讀入文件 (文件名)
' 先更新一下文件，如果是獨(dú)立編譯的易程序，會(huì)丟失后面的數(shù)據(jù)
更新句柄 ＝ BeginUpdateResource (文件名, 假)
EndUpdateResource (更新句柄, 假)
版本信息內(nèi)容 ＝ #版本信息
版本信息內(nèi)容 ＝ 子文本替換 (版本信息內(nèi)容, “公司”, 版本信息.公司, , , 真)
版本信息內(nèi)容 ＝ 子文本替換 (版本信息內(nèi)容, “描述”, 版本信息.描述, , , 真)
版本信息內(nèi)容 ＝ 子文本替換 (版本信息內(nèi)容, “版權(quán)”, 版本信息.版權(quán), , , 真)
版本信息內(nèi)容 ＝ 子文本替換 (版本信息內(nèi)容, “文件版本”, 版本信息.文件版本, , , 真)
版本信息內(nèi)容 ＝ 子文本替換 (版本信息內(nèi)容, “內(nèi)部名稱”, 版本信息.內(nèi)部名稱, , , 真)
版本信息內(nèi)容 ＝ 子文本替換 (版本信息內(nèi)容, “源文件名”, 版本信息.源文件名, , , 真)
版本信息內(nèi)容 ＝ 子文本替換 (版本信息內(nèi)容, “產(chǎn)品名稱”, 版本信息.產(chǎn)品名稱, , , 真)
版本信息內(nèi)容 ＝ 子文本替換 (版本信息內(nèi)容, “產(chǎn)品版本”, 版本信息.產(chǎn)品版本, , , 真)
版本信息數(shù)據(jù) ＝ 從文本轉(zhuǎn)換版本信息 (版本信息內(nèi)容)
檢查后文件數(shù)據(jù) ＝ 讀入文件 (文件名)
.判斷開(kāi)始 (取字節(jié)集長(zhǎng)度 (檢查后文件數(shù)據(jù)) ＝ 取字節(jié)集長(zhǎng)度 (文件數(shù)據(jù)))
更新句柄 ＝ BeginUpdateResource (文件名, 假)
UpdateResource (更新句柄, 16, 1, 2052, 版本信息數(shù)據(jù), 取字節(jié)集長(zhǎng)度 (版本信息數(shù)據(jù)))
EndUpdateResource (更新句柄, 假)
.判斷 (取字節(jié)集長(zhǎng)度 (檢查后文件數(shù)據(jù)) ＜ 取字節(jié)集長(zhǎng)度 (文件數(shù)據(jù)))
尾部數(shù)據(jù) ＝ 取字節(jié)集右邊 (文件數(shù)據(jù), 取字節(jié)集長(zhǎng)度 (文件數(shù)據(jù)) － 取字節(jié)集長(zhǎng)度 (檢查后文件數(shù)據(jù)))
更新句柄 ＝ BeginUpdateResource (文件名, 假)
UpdateResource (更新句柄, 16, 1, 2052, 版本信息數(shù)據(jù), 取字節(jié)集長(zhǎng)度 (版本信息數(shù)據(jù)))
EndUpdateResource (更新句柄, 假)
寫到文件 (文件名, 讀入文件 (文件名) ＋ 尾部數(shù)據(jù))
.默認(rèn)
.判斷結(jié)束
.子程序 獲取下一行, 邏輯型
.參數(shù) 文本, 文本型, 參考
.參數(shù) 行文本數(shù)組, 文本型, 參考 數(shù)組
.參數(shù) 索引, 整數(shù)型, 參考
.如果真 (取數(shù)組成員數(shù) (行文本數(shù)組) ≥ 索引)
文本 ＝ 行文本數(shù)組 [索引]
索引 ＝ 索引 ＋ 1
返回 (真)
.如果真結(jié)束
返回 (假)
.子程序 從文本轉(zhuǎn)換版本信息, 字節(jié)集
.參數(shù) 文本版本信息, 文本型
.局部變量 行_文本, 文本型
.局部變量 行_類型, 文本型
.局部變量 文本數(shù)組, 文本型, , "0"
.局部變量 位置1, 整數(shù)型
.局部變量 vf, VS_FIXEDFILEINFO
.局部變量 數(shù)據(jù), 字節(jié)集
.局部變量 行_數(shù)組, 文本型, , "0"
.局部變量 索引, 整數(shù)型
.局部變量 字節(jié)集, 字節(jié)集
行_數(shù)組 ＝ 分割文本 (文本版本信息, #換行符, )
索引 ＝ 1
vf.dwSignature ＝ -17890115
vf.dwStrucVersion ＝ 1
vf.dwFileFlagsMask ＝ 63
.判斷循環(huán)首 (獲取下一行 (行_文本, 行_數(shù)組, 索引))
行_類型 ＝ 獲取行類型 (行_文本)
.判斷開(kāi)始 (行_類型 ＝ “FILEVERSION”)
位置1 ＝ 尋找文本 (行_文本, “ ”, , 假)
文本數(shù)組 ＝ 分割文本 (My刪首尾空 (取文本右邊 (行_文本, 取文本長(zhǎng)度 (行_文本) － 位置1)), “,”, )
.如果真 (取數(shù)組成員數(shù) (文本數(shù)組) ≥ 4)
vf.dwFileVersionMS ＝ 位或 (到整數(shù) (文本數(shù)組 [2]), 左移 (到整數(shù) (文本數(shù)組 [1]), 16))
vf.dwFileVersionLS ＝ 位或 (到整數(shù) (文本數(shù)組 [4]), 左移 (到整數(shù) (文本數(shù)組 [3]), 16))
.如果真結(jié)束
.判斷 (行_類型 ＝ “PRODUCTVERSION”)
位置1 ＝ 尋找文本 (行_文本, “ ”, , 假)
文本數(shù)組 ＝ 分割文本 (My刪首尾空 (取文本右邊 (行_文本, 取文本長(zhǎng)度 (行_文本) － 位置1)), “,”, )
.如果真 (取數(shù)組成員數(shù) (文本數(shù)組) ≥ 4)
vf.dwProductVersionMS ＝ 位或 (到整數(shù) (文本數(shù)組 [2]), 左移 (到整數(shù) (文本數(shù)組 [1]), 16))
vf.dwProductVersionLS ＝ 位或 (到整數(shù) (文本數(shù)組 [4]), 左移 (到整數(shù) (文本數(shù)組 [3]), 16))
.如果真結(jié)束
.判斷 (行_類型 ＝ “FILEOS”)
位置1 ＝ 尋找文本 (行_文本, “ ”, , 假)
vf.dwFileOS ＝ 十六到十 (My刪首尾空 (取文本右邊 (行_文本, 取文本長(zhǎng)度 (行_文本) － 位置1)))
.判斷 (行_類型 ＝ “FILETYPE”)
位置1 ＝ 尋找文本 (行_文本, “ ”, , 假)
vf.dwFileType ＝ 十六到十 (My刪首尾空 (取文本右邊 (行_文本, 取文本長(zhǎng)度 (行_文本) － 位置1)))
.判斷 (行_類型 ＝ “{”)
跳出循環(huán) ()
.默認(rèn)
.判斷結(jié)束
.判斷循環(huán)尾 ()
數(shù)據(jù) ＝ 取空白字節(jié)集 (13 × 4)
CopyMemory_vf (數(shù)據(jù), vf, 13 × 4)
字節(jié)集 ＝ { 0, 0, 52, 0, 0, 0, 86, 0, 83, 0, 95, 0, 86, 0, 69, 0, 82, 0, 83, 0, 73, 0, 79, 0, 78, 0, 95, 0, 73, 0, 78, 0, 70, 0, 79, 0, 0, 0, 0, 0 } ＋ 數(shù)據(jù)
分析BLOCK (字節(jié)集, 行_數(shù)組, 索引)
字節(jié)集 ＝ 字節(jié)集替換 (字節(jié)集, 1, 取數(shù)據(jù)類型尺寸 (#短整數(shù)型), 到字節(jié)集 (到短整數(shù) (取字節(jié)集長(zhǎng)度 (字節(jié)集))))
返回 (字節(jié)集)
.子程序 分析BLOCK
.參數(shù) 字節(jié)集, 字節(jié)集
.參數(shù) 行文本數(shù)組, 文本型, 參考 數(shù)組
.參數(shù) 索引, 整數(shù)型, 參考
.局部變量 行_文本, 文本型
.局部變量 行_類型, 文本型
.局部變量 sizeaoffset, 整數(shù)型
.局部變量 a
.判斷循環(huán)首 (獲取下一行 (行_文本, 行文本數(shù)組, 索引))
行_類型 ＝ 獲取行類型 (行_文本)
.判斷開(kāi)始 (行_類型 ＝ “BLOCK”)
sizeaoffset ＝ 取字節(jié)集長(zhǎng)度 (字節(jié)集) ＋ 1 ' 記錄該BLOCK的起始位置
字節(jié)集 ＝ 字節(jié)集 ＋ MAKEBLOCK (行_文本) ' 建立BLOCK字節(jié)集，并與之前的字節(jié)集合并
分析BLOCK (字節(jié)集, 行文本數(shù)組, 索引)
字節(jié)集 ＝ 字節(jié)集替換 (字節(jié)集, sizeaoffset, 取數(shù)據(jù)類型尺寸 (#短整數(shù)型), 到字節(jié)集 (到短整數(shù) (取字節(jié)集長(zhǎng)度 (字節(jié)集) － sizeaoffset ＋ 1))) ' 把字節(jié)集長(zhǎng)度寫回該BLOCK的起始位置
a ＝ 1
.判斷 (行_類型 ＝ “VALUE”)
字節(jié)集 ＝ 字節(jié)集 ＋ MAKEVALUE (行_文本) ' 建立VALUE字節(jié)集，并與之前的字節(jié)集合并
.判斷 (行_類型 ＝ “}”)
返回 ()
.默認(rèn)
.判斷結(jié)束
.判斷循環(huán)尾 ()
.子程序 MAKEVALUE, 字節(jié)集
.參數(shù) VALUE, 文本型
.局部變量 位置_左引號(hào), 整數(shù)型
.局部變量 位置_右引號(hào), 整數(shù)型
.局部變量 位置_逗號(hào), 整數(shù)型
.局部變量 文本, 文本型
.局部變量 數(shù)據(jù), 字節(jié)集
.局部變量 數(shù)據(jù)2, 字節(jié)集
.局部變量 文本數(shù)組, 文本型, , "0"
位置_逗號(hào) ＝ 尋找文本 (VALUE, “,”, , 假)
位置_右引號(hào) ＝ 倒找文本 (VALUE, #引號(hào), 位置_逗號(hào), 假)
位置_左引號(hào) ＝ 尋找文本 (VALUE, #引號(hào), , 假)
.如果真 (取文本中間 (VALUE, 位置_左引號(hào) ＋ 1, 位置_右引號(hào) － 位置_左引號(hào) － 1) ＝ “Translation”)
' 第1、2字節(jié)用于占用，待分析結(jié)束后，把數(shù)據(jù)的長(zhǎng)度數(shù)值寫回第1、2字節(jié)
數(shù)據(jù) ＝ { 0, 0, 0, 0, 1, 0 } ＋ 轉(zhuǎn)換Ansi轉(zhuǎn)Unicode (取文本中間 (VALUE, 位置_左引號(hào) ＋ 1, 位置_右引號(hào) － 位置_左引號(hào) － 1))
.如果真 (取字節(jié)集長(zhǎng)度 (數(shù)據(jù)) ％ 4 ≠ 0)
數(shù)據(jù) ＝ 數(shù)據(jù) ＋ 取空白字節(jié)集 (4 － 取字節(jié)集長(zhǎng)度 (數(shù)據(jù)) ％ 4)
.如果真結(jié)束
文本 ＝ My刪首尾空 (取文本右邊 (VALUE, 取文本長(zhǎng)度 (VALUE) － 位置_逗號(hào)))
文本數(shù)組 ＝ 分割文本 (文本, “ ”, )
.如果真 (取數(shù)組成員數(shù) (文本數(shù)組) ≥ 2)
數(shù)據(jù)2 ＝ 到字節(jié)集 (到短整數(shù) (十六到十 (文本數(shù)組 [1]))) ＋ 到字節(jié)集 (到短整數(shù) (十六到十 (文本數(shù)組 [2])))
數(shù)據(jù) ＝ 字節(jié)集替換 (數(shù)據(jù), 3, 取數(shù)據(jù)類型尺寸 (#短整數(shù)型), 到字節(jié)集 (到短整數(shù) (取字節(jié)集長(zhǎng)度 (數(shù)據(jù)2))))
數(shù)據(jù) ＝ 數(shù)據(jù) ＋ 數(shù)據(jù)2
返回 (字節(jié)集替換 (數(shù)據(jù), 1, 取數(shù)據(jù)類型尺寸 (#短整數(shù)型), 到字節(jié)集 (到短整數(shù) (取字節(jié)集長(zhǎng)度 (數(shù)據(jù))))))
.如果真結(jié)束
返回 ({ })
.如果真結(jié)束
' 第1、2字節(jié)用于占用，待分析結(jié)束后，把數(shù)據(jù)的長(zhǎng)度數(shù)值寫回第1、2字節(jié)
數(shù)據(jù) ＝ { 0, 0, 0, 0, 1, 0 } ＋ 轉(zhuǎn)換Ansi轉(zhuǎn)Unicode (取文本中間 (VALUE, 位置_左引號(hào) ＋ 1, 位置_右引號(hào) － 位置_左引號(hào) － 1))
.如果真 (取字節(jié)集長(zhǎng)度 (數(shù)據(jù)) ％ 4 ≠ 0)
數(shù)據(jù) ＝ 數(shù)據(jù) ＋ 取空白字節(jié)集 (4 － 取字節(jié)集長(zhǎng)度 (數(shù)據(jù)) ％ 4)
.如果真結(jié)束
位置_左引號(hào) ＝ 尋找文本 (VALUE, #引號(hào), 位置_逗號(hào), 假)
位置_右引號(hào) ＝ 倒找文本 (VALUE, #引號(hào), , 假)
數(shù)據(jù)2 ＝ 轉(zhuǎn)換Ansi轉(zhuǎn)Unicode (取文本中間 (VALUE, 位置_左引號(hào) ＋ 1, 位置_右引號(hào) － 位置_左引號(hào) － 1))
.如果真 (取字節(jié)集長(zhǎng)度 (數(shù)據(jù)2) ％ 4 ≠ 0)
數(shù)據(jù)2 ＝ 數(shù)據(jù)2 ＋ 取空白字節(jié)集 (4 － 取字節(jié)集長(zhǎng)度 (數(shù)據(jù)2) ％ 4)
.如果真結(jié)束
數(shù)據(jù) ＝ 字節(jié)集替換 (數(shù)據(jù), 3, 取數(shù)據(jù)類型尺寸 (#短整數(shù)型), 到字節(jié)集 (到短整數(shù) (取字節(jié)集長(zhǎng)度 (數(shù)據(jù)2) ÷ 2)))
數(shù)據(jù) ＝ 數(shù)據(jù) ＋ 數(shù)據(jù)2
返回 (字節(jié)集替換 (數(shù)據(jù), 1, 取數(shù)據(jù)類型尺寸 (#短整數(shù)型), 到字節(jié)集 (到短整數(shù) (取字節(jié)集長(zhǎng)度 (數(shù)據(jù))))))
.子程序 轉(zhuǎn)換Ansi轉(zhuǎn)Unicode, 字節(jié)集, 公開(kāi), 將Ansi碼轉(zhuǎn)換為Unicode碼 (返回轉(zhuǎn)換后的字節(jié)集)
.參數(shù) Ansi, 文本型, , 欲轉(zhuǎn)換的Ansi文本
.局部變量 數(shù)據(jù)2, 字節(jié)集
.局部變量 長(zhǎng)度
.如果真 (Ansi ＝ “”)
返回 ({ 0, 0 })
.如果真結(jié)束
長(zhǎng)度 ＝ MultiByteToWideChar (0, 0, Ansi, 取文本長(zhǎng)度 (Ansi) ＋ 1, 數(shù)據(jù)2, 0)
數(shù)據(jù)2 ＝ 取空白字節(jié)集 (長(zhǎng)度 × 2)
MultiByteToWideChar (0, 0, Ansi, 取文本長(zhǎng)度 (Ansi) ＋ 1, 數(shù)據(jù)2, 長(zhǎng)度 × 2)
返回 (數(shù)據(jù)2)
.子程序 MAKEBLOCK, 字節(jié)集
.參數(shù) BLOCK, 文本型
.局部變量 位置1, 整數(shù)型
.局部變量 位置2, 整數(shù)型
.局部變量 數(shù)據(jù), 字節(jié)集
位置1 ＝ 尋找文本 (BLOCK, #引號(hào), , 假)
位置2 ＝ 倒找文本 (BLOCK, #引號(hào), , 假)
' 第1、2字節(jié)用于占用，待分析結(jié)束后，把數(shù)據(jù)的長(zhǎng)度數(shù)值寫回第1、2字節(jié)
數(shù)據(jù) ＝ { 0, 0, 0, 0, 1, 0 } ＋ 轉(zhuǎn)換Ansi轉(zhuǎn)Unicode (取文本中間 (BLOCK, 位置1 ＋ 1, 位置2 － 位置1 － 1))
.如果真 (取字節(jié)集長(zhǎng)度 (數(shù)據(jù)) ％ 4 ≠ 0)
數(shù)據(jù) ＝ 數(shù)據(jù) ＋ 取空白字節(jié)集 (4 － 取字節(jié)集長(zhǎng)度 (數(shù)據(jù)) ％ 4)
.如果真結(jié)束
返回 (數(shù)據(jù))
.子程序 十六到十, 整數(shù)型, 公開(kāi), 將十六進(jìn)制轉(zhuǎn)換成十進(jìn)制(返回十進(jìn)制文本)
.參數(shù) 十六進(jìn)制文本, 文本型, , 待轉(zhuǎn)換的十六進(jìn)制文本
.參數(shù) 返回結(jié)果, 文本型, 參考 可空, 返回文本結(jié)果(如十進(jìn)制數(shù)超出整數(shù)范圍,可通過(guò)返回結(jié)果獲得十進(jìn)制文本)
.局部變量 中間文本, 文本型
.局部變量 結(jié)果, 長(zhǎng)整數(shù)型
.局部變量 容器1, 整數(shù)型
返回結(jié)果 ＝ “”
.變量循環(huán)首 (1, 取文本長(zhǎng)度 (十六進(jìn)制文本), 1, 容器1)
中間文本 ＝ 取文本中間 (十六進(jìn)制文本, 容器1, 1)
結(jié)果 ＝ (尋找文本 (“0123456789ABCDEF”, 中間文本, , 真) － 1) × 求次方 (16, 取文本長(zhǎng)度 (十六進(jìn)制文本) － 容器1) ＋ 結(jié)果
.變量循環(huán)尾 ()
.如果真 (是否為空 (返回結(jié)果) ＝ 假)
返回結(jié)果 ＝ 到文本 (結(jié)果)
.如果真結(jié)束
返回 (結(jié)果)
.子程序 My刪首尾空, 文本型
.參數(shù) 文本, 文本型
.局部變量 字節(jié)集, 字節(jié)集
.局部變量 n, 整數(shù)型
.局部變量 pos1, 整數(shù)型
.局部變量 pos2, 整數(shù)型
字節(jié)集 ＝ 到字節(jié)集 (文本)
.變量循環(huán)首 (1, 取字節(jié)集長(zhǎng)度 (字節(jié)集), 1, n)
.如果真 (字節(jié)集 [n] ≠ #空格鍵 且 字節(jié)集 [n] ≠ #Tab鍵)
pos1 ＝ n
跳出循環(huán) ()
.如果真結(jié)束
.變量循環(huán)尾 ()
.變量循環(huán)首 (取字節(jié)集長(zhǎng)度 (字節(jié)集), 1, -1, n)
.如果真 (字節(jié)集 [n] ≠ #空格鍵 且 字節(jié)集 [n] ≠ #Tab鍵)
pos2 ＝ n
跳出循環(huán) ()
.如果真結(jié)束
.變量循環(huán)尾 ()
返回 (取文本中間 (文本, pos1, pos2 － pos1 ＋ 1))
.子程序 獲取行類型, 文本型
.參數(shù) 行文本, 文本型
行文本 ＝ My刪首尾空 (行文本)
.判斷開(kāi)始 (取文本左邊 (行文本, 1) ＝ “{”)
返回 (“{”)
.判斷 (取文本左邊 (行文本, 1) ＝ “}”)
返回 (“}”)
.判斷 (取文本左邊 (行文本, 5) ＝ “BLOCK”)
返回 (“BLOCK”)
.判斷 (取文本左邊 (行文本, 5) ＝ “VALUE”)
返回 (“VALUE”)
.判斷 (取文本左邊 (行文本, 取文本長(zhǎng)度 (“FILEVERSION”)) ＝ “FILEVERSION”)
返回 (“FILEVERSION”)
.判斷 (取文本左邊 (行文本, 取文本長(zhǎng)度 (“PRODUCTVERSION”)) ＝ “PRODUCTVERSION”)
返回 (“PRODUCTVERSION”)
.判斷 (取文本左邊 (行文本, 取文本長(zhǎng)度 (“FILEOS”)) ＝ “FILEOS”)
返回 (“FILEOS”)
.判斷 (取文本左邊 (行文本, 取文本長(zhǎng)度 (“FILETYPE”)) ＝ “FILETYPE”)
返回 (“FILETYPE”)
.默認(rèn)
.判斷結(jié)束
返回 (“”)
.子程序 __啟動(dòng)窗口_創(chuàng)建完畢
拖放對(duì)象1.注冊(cè)拖放控件 (_啟動(dòng)窗口.取窗口句柄 ())
.子程序 _拖放對(duì)象1_得到文件
.參數(shù) 接收到的文件路徑, 文本型
編輯框_路徑.內(nèi)容 ＝ 接收到的文件路徑
.子程序 版權(quán)
.局部變量 版權(quán), 版權(quán)信息型
.局部變量 文件名, 文本型
版權(quán).公司 ＝ 編輯框_公司.內(nèi)容
版權(quán).描述 ＝ 編輯框_描述.內(nèi)容
版權(quán).版權(quán) ＝ 編輯框_版權(quán).內(nèi)容
版權(quán).文件版本 ＝ 編輯框_版本.內(nèi)容
版權(quán).源文件名 ＝ 編輯框_源文件名.內(nèi)容
版權(quán).內(nèi)部名稱 ＝ 編輯框_內(nèi)部名.內(nèi)容
版權(quán).產(chǎn)品名稱 ＝ 編輯框_產(chǎn)品名.內(nèi)容
版權(quán).產(chǎn)品版本 ＝ 編輯框_產(chǎn)品版本.內(nèi)容
修改版權(quán)信息 (編輯框_路徑.內(nèi)容, 版權(quán))
信息框 (“修改完成..”, 64, “提示”)
.子程序 _設(shè)置按鈕_被單擊
版權(quán) ()
運(yùn)行結(jié)果：
總結(jié)
以上就是這篇文章的全部?jī)?nèi)容了，希望本文的內(nèi)容對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值，謝謝大家對(duì)腳本之家的支持。如果你想了解更多相關(guān)內(nèi)容請(qǐng)查看下面相關(guān)鏈接
相關(guān)文章
在本篇內(nèi)容中小編為大家分享的是關(guān)于易語(yǔ)言的數(shù)據(jù)庫(kù)操作教程內(nèi)容，需要的朋友們可以跟著學(xué)習(xí)參考下。2018-12-12
在本篇內(nèi)容里小編給大家分享了關(guān)于易語(yǔ)言API取文本長(zhǎng)度圖文講解和知識(shí)點(diǎn)分享，需要的參考下。2018-12-12
易語(yǔ)言獲取網(wǎng)頁(yè)端的好友管理頁(yè)面信息導(dǎo)出QQ好友的代碼
今天小編就為大家分享一篇關(guān)于易語(yǔ)言獲取網(wǎng)頁(yè)端的好友管理頁(yè)面信息導(dǎo)出QQ好友的代碼，小編覺(jué)得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來(lái)看看吧2018-11-11
易語(yǔ)言解析音悅臺(tái)MV提供超清下載地址的代碼
今天小編就為大家分享一篇關(guān)于易語(yǔ)言解析音悅臺(tái)MV提供超清下載地址的代碼，小編覺(jué)得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來(lái)看看吧2018-11-11
今天小編就為大家分享一篇關(guān)于易語(yǔ)言高精度完美延時(shí)的源碼，小編覺(jué)得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來(lái)看看吧2018-12-12
今天小編就為大家分享一篇關(guān)于易語(yǔ)言修改組合框項(xiàng)目文本的方法，小編覺(jué)得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來(lái)看看吧2018-11-11
在本篇內(nèi)容里小編給大家分享了關(guān)于易語(yǔ)言開(kāi)發(fā)mac查看器的教學(xué)內(nèi)容，對(duì)此有興趣的朋友們可以學(xué)習(xí)下。2019-01-01
易語(yǔ)言是可視全中文易學(xué)易用的編程高級(jí)語(yǔ)言，近年來(lái)大家都積極求學(xué)，可是怎么學(xué)好它啦？下面小編給大家一起學(xué)習(xí)易語(yǔ)言的知識(shí)2016-05-05
易語(yǔ)言操作數(shù)據(jù)庫(kù)“替換打開(kāi)”命令詳解
在本篇內(nèi)容里小編給大家分享的是關(guān)于易語(yǔ)言操作數(shù)據(jù)庫(kù)“替換打開(kāi)”命令詳解內(nèi)容，有興趣的朋友們可以學(xué)習(xí)下。2020-03-03
易語(yǔ)言將十進(jìn)制數(shù)值轉(zhuǎn)換為八進(jìn)制文本的方法
今天小編就為大家分享一篇關(guān)于的文章，小編覺(jué)得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來(lái)看看吧2018-11-11