如何获取Windows可执行文件(EXE)或动态链接库(DLL)的版本号?

5
在运行时如何检索存储在Windows exe/dll中的版本信息?该信息通过资源文件手动设置。
4个回答

7

以下是使用标准Windows API函数进行C++编程的方法:

try
{
    TCHAR szFileName[ MAX_PATH ];
    if( !::GetModuleFileName( 0, szFileName, MAX_PATH ) )
        throw __LINE__;

    DWORD nParam;
    DWORD nVersionSize = ::GetFileVersionInfoSize( szFileName, &nParam );
    if( !nVersionSize )
        throw __LINE__;

    HANDLE hMem = ::GetProcessHeap();
    if( !hMem )
        throw __LINE__;

    LPVOID lpVersionData = ::HeapAlloc( hMem, 0, nVersionSize );
    if( !lpVersionData )
        throw __LINE__;

    if( !::GetFileVersionInfo( szFileName, 0, nVersionSize, lpVersionData ) )
        throw __LINE__;

    LPVOID pVersionInfo;
    UINT nSize;
    if( !::VerQueryValue( lpVersionData, _T("\\"), &pVersionInfo, &nSize ) )
        throw __LINE__;

    VS_FIXEDFILEINFO *pVSInfo = (VS_FIXEDFILEINFO *)pVersionInfo;
    CString strVersion;
    strVersion.Format( _T(" version %i.%i.%i.%i"),
        pVSInfo->dwProductVersionMS >> 16,
        pVSInfo->dwProductVersionMS & 0xFFFF,
        pVSInfo->dwProductVersionLS >> 16,
        pVSInfo->dwProductVersionLS & 0xFFFF
        );
    GetDlgItem( IDC_ABOUT_VERSION )->SetWindowText( strAppName + strVersion );

    if( !HeapFree( hMem, 0, lpVersionData ) )
        throw __LINE__;
}
catch( int err )
{
    ASSERT( !err ); // always break on debug builds to inspect error codes and such

    DWORD dwErr = ::GetLastError();

    // handle memory cleanup...
}

请注意,catch部分仅供教育用途 - 在实际情况中,您需要在内存分配之后进行适当的清理,并实际使用错误代码!

如果在您调用 ::HeapAlloc 后出现 throw,这将导致内存泄漏。 - plinth

2

Valentin的回答是正确的,但请注意评论者plinth有关内存泄漏可能性的警告。

我也不确定为什么在现代会使用::HeapAlloc。

这里是一个片段,它使用了new和boost::shared_array以我个人看来更安全、更清晰的方式实现了相同的功能。

#include <boost/shared_array.hpp> 

//.....

DWORD   dwHandle;
DWORD   dwFileVersionInfoSize = GetFileVersionInfoSize((LPTSTR)lpszFileName, &dwHandle);

if (!dwFileVersionInfoSize)
         return FALSE;

// ensure our data will be deleted
boost::shared_array<BYTE> data(new BYTE[dwFileVersionInfoSize]); 
LPVOID const lpData = data.get(); 

//party on with lpData.... 

2

以下是 Delphi 7 版本:

uses Windows, SysUtils;

function GetEXEVersion(exename: string; const Fmt : string = '%d.%d.%d.%d'): string;
{
    credit to martinstoeckli@gmx.ch 
  ( http://martinstoeckli.ch/delphi/delphi.html#AppVersion )
}
var
  iBufferSize, iDummy : dword;
  pBuffer, pFileInfo : Pointer;
  iVer : array[1..4] of word;
begin
  Result := '';
  iBufferSize := GetFileVersionInfoSize(PChar(exename), iDummy);
  if iBufferSize > 0 then begin
    GetMem(pBuffer, iBufferSize);
    try
      GetFileVersionInfo(PChar(exename), 0, iBufferSize, pBuffer);
      VerQueryValue(pBuffer, '\', pFileInfo, iDummy);
      iVer[1] := HiWord(PVSFixedFileInfo(pFileInfo)^.dwFileVersionMS);
      iVer[2] := LoWord(PVSFixedFileInfo(pFileInfo)^.dwFileVersionMS);
      iVer[3] := HiWord(PVSFixedFileInfo(pFileInfo)^.dwFileVersionLS);
      iVer[4] := LoWord(PVSFixedFileInfo(pFileInfo)^.dwFileVersionLS);
      finally FreeMem(pBuffer);
    end;
    Result := Format(Fmt, [iVer[1],iVer[2],iVer[3],iVer[4]] );
  end;
end;

1

在C#中检查.NET程序集:

System.Reflection.Assembly.LoadFile(@"c:\windows\Microsoft.NET\Framework\v2.0.50727\system.data.dll").GetName().Version.ToString();


网页内容由stack overflow 提供, 点击上面的
可以查看英文原文,
原文链接