CK1820 Created at Jun 15, 2012 09:32:00 Updated at Mar 09, 2024 14:10:57
160 0 0 0
If you need to get application version number at runtime, you can get it by calling below sample code.
function GetAppVersionStr: string;
var
Rec: LongRec;
begin
Rec := LongRec(GetFileVersion(ParamStr(0)));
Result := Format('%d.%d', [Rec.Hi, Rec.Lo])
end;