Versions-Informationen SCHRIBEN

[nailor]

Hi!

Wie man sie ausliest und wie man sie über das Menü einstellt, erklärt einem die OH. Aber kann man die nicht auch irgendwie über den Code einstellen?!?!

[Wormid]

Versionsinformationen kannst Du manuell hinzufügen, indem Du erst mit einem Texteditor ein "RC"-Script mit folgender Syntax erstellst:

Code:

1 VERSIONINFO
FILEVERSION 1,0,0,0
PRODUCTVERSION 1,0,0,0
FILEOS 0x4
FILETYPE 0x1
{
BLOCK "StringFileInfo"
{
   BLOCK "040704E4"
   {
      VALUE "CompanyName", "Testsoft"
      VALUE "FileDescription", "Dies ist die Beschreibung"
      VALUE "FileVersion", "1.0.0.0"
      VALUE "InternalName", "Project 1"
      VALUE "LegalCopyright", "Finger weg, ist alles MEINS"
      VALUE "LegalTrademarks", ""
      VALUE "OriginalFilename", "project1.exe"
      VALUE "ProductName", "TEST"
      VALUE "ProductVersion", "1.0.0.0"
      VALUE "Comments", "Dies ist ein dummer Kommentar..."
   }
}

BLOCK "VarFileInfo"
{
   VALUE "Translation", 0x0407 0x04E4
}
}

Als "wunschname.rc" abspeichern und dann mit dem Borland Resource Compiler (im Verzeichnis "Bin" von Delphi) compilieren. (Das ist ein Kommandozeilentool, Aufruf z.B.: brcc32.exe d:\projekte\test\wunschname.rc)
Danach erstellt der Resource Compiler eine "Res"-Datei, die Du nur noch in dem Projektquelltext in Dein Programm includen musst.

Code:

{$R wunschname.res}

Ich hoffe, meine erklärung ist jetzt halbwegs nachvollziehbar.

Gruß

Wormid

P.S.: Was bei FILEOS oder FILETYPE alles an Angaben möglich ist, das weiss ich so auch nicht. Das obige File ist aus einer Exe, erstellt mit Delphi 6 auf einem W2K-System....