Zitat von
shmia:
Die JCL unterstützt auch das sogenannte
Unit-Versioning.
Dazu kann man in jede
Unit, die man überwachen will einen const Record einfügen:
Delphi-Quellcode:
{$IFDEF UNITVERSIONING}
const
UnitVersioning: TUnitVersionInfo = (
RCSfile: '
$URL: [url]https://jcl.svn.sourceforge.net:443/svnroot/jcl/tags/JCL-1.101-Build2725/jcl/source/common/JclFileUtils.pas[/url] $';
Revision: '
$Revision: 2101 $';
Date: '
$Date: 2007-08-04 22:00:43 +0200 (sam., 04 août 2007) $';
LogPath: '
JCL\source\common'
);
{$ENDIF UNITVERSIONING}
....
{$IFDEF UNITVERSIONING}
initialization
RegisterUnitVersion(HInstance, UnitVersioning);
finalization
UnregisterUnitVersion(HInstance);
{$ENDIF UNITVERSIONING}
end.
Es gibt dann Funktionen (
Unit JclUnitVersioning), um diese Informationen auszulesen.
Dieses System funktioniert auch dann, wenn BPLs benützt werden.
Jo, sieht erst mal sehr gut aus. Ich geb aber ehrlich zu, dass ich noch keinen blassen Schimmer habe, wie ich über die Exe mittels Funktion an die Version komme.
Die nächste Frage ist, wie gleiche ich die Version in UnitVersioning auf die Version der
BPL ab.
Fragen über Fragen, auf deutsch ich seh nicht durch.
Gruß oki