易語(yǔ)言如何實(shí)現(xiàn)修改軟件版權(quán)信息的工具

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

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)信息型, 公開
  .成員 公司, 文本型
  .成員 描述, 文本型
  .成員 文件版本, 文本型
  .成員 內(nèi)部名稱, 文本型
  .成員 版權(quán), 文本型
  .成員 源文件名, 文本型
  .成員 產(chǎn)品名稱, 文本型
  .成員 產(chǎn)品版本, 文本型

修改EXE屬性版權(quán)信息

.版本 2
.支持庫(kù) edroptarget
.程序集 窗口程序集1
.子程序 修改版權(quán)信息, , 公開, 修改指定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ù) ＝ 讀入文件 (文件名)
.判斷開始 (取字節(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ù)組, 索引))
  行_類型 ＝ 獲取行類型 (行_文本)
  .判斷開始 (行_類型 ＝ “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ù)組, 索引))
  行_類型 ＝ 獲取行類型 (行_文本)
  .判斷開始 (行_類型 ＝ “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é)集, 公開, 將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ù)型, 公開, 將十六進(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刪首尾空 (行文本)
.判斷開始 (取文本左邊 (行文本, 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é)果：

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