Alle Versionsinformationen auslesen |
|
| System | Win9x, WinNT, Win2000, WinXP, Vista, Win7 |
|---|---|
| Ab Delphi-Version | Delphi 1 |
| Letzte Änderung | 28.09.2010 |
Über den Projektoptionen-Dialog lassen sich viele Versionsinformationen einstellen; nicht nur die reine Versionsnummer, sondern auch Firmenname, Copyright, Produktversion usw. Um das Rad nicht neu zu erfinden, kann die Klasse TJclFileVersionInfo aus der Unit JclFileUtils der kostenlosen JEDI Code Library (JCL) eingesetzt werden.
Folgende Funktion liest die Produktversion aus (die nicht mit der Dateiversion identisch sein muss).
uses JclFileUtils;
function GetProductVersion(FileName: string): string;
var fi: TJclFileVersionInfo;
begin
fi:=TJclFileVersionInfo.Create(FileName);
try
result:=fi.ProductVersion;
finally
fi.free;
end;
end;
function GetProductVersion(FileName: string): string;
var fi: TJclFileVersionInfo;
begin
fi:=TJclFileVersionInfo.Create(FileName);
try
result:=fi.ProductVersion;
finally
fi.free;
end;
end;
Folgende Eigenschaften von TJclFileVersionInfo können u.a. ebenfalls verwendet, um Informationen aus Anwendungen auszulesen:
- BinFileVersion
- BinProductVersion
- Comments
- CompanyName
- FileDescription
- FileOS
- FileSubType
- FileType
- FileVersion
- InternalName
- Languages
- LegalCopyright
- LegalTradeMarks
- OriginalFilename
- PrivateBuild
- ProductName
- ProductVersion
- SpecialBuild
Ähnliche Seiten: