易语言API取文件版本信息模块源码 [db:版本]

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

系统结构:GetFileVerInfo,GetFileVersionInfo,GetFileVersionInfoSize,VerQueryValue,MoveMemory,lstrcpy,VerLanguageName,

======程序集1
| |
| |------ _启动子程序
| |
| |------ _临时子程序
| |
| |------ GetFileVerInfo
| |
| |
======调用的Dll
| |
| |---[dll]------ GetFileVersionInfo
| |
| |---[dll]------ GetFileVersionInfoSize
| |
| |---[dll]------ VerQueryValue
| |
| |---[dll]------ MoveMemory
| |
| |---[dll]------ lstrcpy
| |
| |---[dll]------ VerLanguageName

调用的DLL命令:

.DLL命令 GetFileVersionInfo, 整数型, "version.dll", "GetFileVersionInfoA"
.参数 lptstrFilename, 文本型
.参数 dwHandle, 整数型
.参数 dwLen, 整数型
.参数 lpData, 字节集, 传址

.DLL命令 GetFileVersionInfoSize, 整数型, "version.dll", "GetFileVersionInfoSizeA"
.参数 lptstrFilename, 文本型
.参数 lpdwHandle, 整数型

.DLL命令 VerQueryValue, 整数型, "version.dll", "VerQueryValueA"
.参数 pBlock, 字节集, 传址
.参数 lpSubBlock, 文本型
.参数 lplpBuffer, 整数型, 传址
.参数 puLen, 整数型, 传址

.DLL命令 MoveMemory, , "Kernel32", "RtlMoveMemory"
.参数 dest, 字节型, 传址 数组
.参数 Source, 整数型
.参数 Length, 整数型

.DLL命令 lstrcpy, 整数型, "Kernel32", "lstrcpyA"
.参数 lpString1, 文本型
.参数 lpString2, 整数型

.DLL命令 VerLanguageName, 整数型, "Kernel32", "VerLanguageNameA"
.参数 wLang, 整数型
.参数 szLang, 文本型
.参数 nSize, 整数型