Noch ein Weg - speziell, wenn keine Release und Build Nummern ausgegeben werden:
Delphi-Quellcode:
uses
SysUtils;
var
Version: Cardinal;
sVersion: string;
begin
Version := GetFileVersion(ParamStr(0));
sVersion := Format('Version %d.%d', [LongRec(Version).Hi, LongRec(Version).Lo]));
end;
Grüße vom marabu