急!!!!!再线等待
lqf78 2003-10-15 08:40:36 使用VerQueryValue函数得到文件的版本号,得到的结果不正确,这是为什么,我使用的方法是:
InfoSize := GetFileVersionInfoSize(PChar('C:\WINNT\system32\a3d.dll'), Wnd);
if InfoSize <> 0 then
begin
GetMem(VerBuf, InfoSize);
try
if GetFileVersionInfo(PChar('C:\WINNT\system32\a3d.dll'), Wnd, InfoSize, VerBuf) then
if VerQueryValue(VerBuf, '', Pointer(FI), VerSize) then
www := FI.dwFileVersionlS;
finally
FreeMem(VerBuf);
end;
end;