Version der BPL ermitteln

[himitsu]

also ohne Experte wohl einfach so

Delphi-Quellcode:

// Projektoptionen > Pre-Build:
CreateBPLVersionInfo.exe


// einbinden / prüfen:
{$INCLUDE "BPLVersion.inc"}

...
Caption := MyBPLVersion;


// die BPLVersion.inc
const MyBPLVersion = '1.2.3.4';

aber besser wohl so ... da hat man auch gleich eine bessere Möglichkeit zu prügen ob die Pre/Post-Build-Ereignisse in den Optionen eingetragen sind
und somit Version möglichst aktuell wäre.

Delphi-Quellcode:

// Projektoptionen > Pre-Build:
CreateBPLVersionInfo.exe "BPL-Name" "MyBPLVersion" "BPLVersion.inc"


// Projektoptionen > Post-Build:
DEL "BPLVersion.inc"


// einbinden / prüfen:
{$INCLUDE "BPLVersion.inc"}
{$IF not Declared(MyBPLVersion))
  {$MESSAGE Error 'MyBPLVersion ist nicht definiert (eventuell Pre/Post-Build-Ereignisse prüffen)'}
{$IFEND}

...
Caption := MyBPLVersion;


// die .INC (z.B. "BPLVersion.inc")
const MyBPLVersion = '1.2.3.4';

CreateBPLVersionInfo.exe bracht ja nur 'ne kleine Consolenanwendung sein, welche die Version ausließt und die .INC erstellt (über die Parameter könnte man dieses dann so gestalten, daß man dieses eine Programm für mehrere BPLs verwenden kann)