Projekt version einheitlich anpassen

[day]

Hallo

Ich habe mehrere Delphi projekte die alle immer die selbe versionsnummer haben (Welche unter Dateieigenschaften angezeigt wird). jetzt ist es rech mühsam wenn ich jedesmal bei allen projekten die Versionsnummer einzeln anpassen muss. Gibt es da eine möglichkeit, dass man das irgendwo zentral machen kann und es dann für alle projekte übernommen wird?

[Bernhard Geyer]

Falls Du ein paar € ausgeben kannst, schau dir mal Finalbuilder an.
Ein von Borland eingebaute Möglichkeit gibt es meines Wissens nicht.

[shmia]

Die Versionnummer (und die anderen Infos) sind ja in einer Resource verpackt.
Du könntest nun bei allen Projekten die Option "Versionsinfo ins Projekt übernehmen" abschalten und in alle Projekte eine Versions-Resource includen:
{$R 'C:\Delphi\GlobalVersion.res'} Jetzt brauchst du nur noch ein Tool, Resourceneditor oder MS Resource Compiler, um die Versions-Resource zu erzeugen.

[MathiasSimmack]

Geht auch mit Notepad und Borlands brcc32. Als Grundlage hier mal die "vi.rc" aus einem meiner Programme:

Code:

1 VERSIONINFO
 FILEVERSION 1,4,0,17
 PRODUCTVERSION 1,4,0,0
 FILEFLAGSMASK 0x3fL
#ifdef _DEBUG
 FILEFLAGS 0x1L
#else
 FILEFLAGS 0x0L
#endif
 FILEOS 0x10004L
 FILETYPE 0x1L
 FILESUBTYPE 0x0L
BEGIN
    BLOCK "StringFileInfo"
    BEGIN
        BLOCK "040704b0"
        BEGIN
            VALUE "CompanyName", "Cube\0"
            VALUE "FileDescription", "Help 2.0 Registration Utility\0"
            VALUE "FileVersion", "1.4.0.17\0"
            VALUE "InternalName", "register\0"
            VALUE "LegalCopyright", "Copyright © 2004 Mathias Simmack.\0"
            VALUE "OriginalFilename", "register.dpr\0"
            VALUE "ProductName", "Help 2.0 Utilities\0"
            VALUE "ProductVersion", "1,4,0,0\0"
        END
    END
    BLOCK "VarFileInfo"
    BEGIN
        VALUE "Translation", 0x407, 1200
    END
END

Per

Code:

brcc32 vi.rc

wird eine RES (in dem Fall "vi.res") fürs eigene Programm draus. Mehr Infos zu den Flags usw. sollten sich u.a. im PSDK finden lassen.