取PE文件版本信息易语言模块源码

资源介绍：

易语言取PE文件版本信息模块源码例程程序调用API函数获取所有版本信息。

可获取exe、dll的版本信息

点评：易语言取PE文件版本信息模块源码是易语言API应用例程。

资源作者：

易语言模块

资源界面：

.版本 2

.子程序 取语言集, 整数型, 公开, 一个PE文件可能包含多个不同语言的版本信息，如同时包含中文和英文信息，返回结果数组成员数，失败返回0
.参数 结果, 文本型, 参考 数组, 类似080404b0
.局部变量 size, 整数型
.局部变量 pbuffer, 整数型
.局部变量 bool, 逻辑型
.局部变量 lang, 文本型
.局部变量 i, 整数型

清除数组 (结果)
bool ＝ VerQueryValue (_buffer, “VarFileInfo\Translation”, pbuffer, size)
.如果真 (bool)
    .计次循环首 (size ÷ 4, i)
        lang ＝ 取空白文本 (8)
        wvsprintf (lang, “%08x”, pbuffer ＋ (i － 1) × 4)
        加入成员 (结果, 取文本右边 (lang, 4) ＋ 取文本左边 (lang, 4))
    .计次循环尾 ()
.如果真结束
返回 (取数组成员数 (结果))

资源下载：