Build Nummer der Version

[creehawk]

Moin Moin.

Ich habe für mein Projekt n der IDE die Versionsnummer für automatische Übernahme eingestellt. Die Build Nr soll automatisch erhöht werden. Start ist mit der Versionsnummer aus den 4 Elementen : 1.0.0.0

Okay, das Programm complieren. In den Projektoptionen steht jetzt 1.0.0.1 Sehr hübsch.

Im Explorer auf die Datei geklickt, Eigenschaften>Details ergibt als Versionsnummer 1.0.0.0
Auf der Form des Programms wird die Versionsnummer mittels folgendem Code angezeigt: (Woher der Code jetzt ist weiß ich nicht mehr)

Delphi-Quellcode:

function GetAppVersionStr: string;
var
  Exe: string;
  Size, Handle: DWORD;
  Buffer: TBytes;
  FixedPtr: PVSFixedFileInfo;
begin
  Exe := ParamStr(0);
  Size := GetFileVersionInfoSize(PChar(Exe), Handle);
  if Size = 0 then RaiseLastOSError;
  SetLength(Buffer, Size);
  if not GetFileVersionInfo(PChar(Exe), Handle, Size, Buffer) then
    RaiseLastOSError;
  if not VerQueryValue(Buffer, '\', Pointer(FixedPtr), Size) then
    RaiseLastOSError;
  Result := Format('%d.%d.%d.%d',
    [LongRec(FixedPtr.dwFileVersionMS).Hi,  //major
     LongRec(FixedPtr.dwFileVersionMS).Lo,  //minor
     LongRec(FixedPtr.dwFileVersionLS).Hi,  //release
     LongRec(FixedPtr.dwFileVersionLS).Lo]) //build
end;

Dort ergibt sich auch 1.0.0.0.

Nochmal erzeugen. Jetzt haben wir in der IDE Projektanzeige 1.0.0.2, ansonsten ausserhalb überall 1.0.0.1.

Hinkt also die Versionsnummer immer einen Nummer hinterher? Ich letztlich für Updates feststellen welche Nummer am Zielrechner steht.

creehawk