Pourquoi utiliser JCL UNITVERSIONING ?

Question

La bibliothèque JCL contient une définition conditionnelle UNITVERSIONING. Je ne sais pas pourquoi cette option existe et je ne sais pas comment l'utiliser. Je sais qu'il existe une unité appelée JclUnitVersioning.pas, mais je ne trouve pas d'utilisation.

Comment l'utiliser dans un projet réel ?

Answer 1

Il soutient la JclUnitVersioning qui expose les constantes de ce type de manière plus cohérente :

{$IFDEF UNITVERSIONING}
const
  UnitVersioning: TUnitVersionInfo = (
    RCSfile: '$URL: https://jcl.svn.sourceforge.net/svnroot/jcl/tags/JCL-1.101-    Build2725/jcl/source/common/Jcl8087.pas $';
    Revision: '$Revision: 1$';
    Date: '$Date: 12/05/2008 10:29:10$';
    LogPath: 'JCL\source\common'
    );
{$ENDIF UNITVERSIONING}

Une ancienne version du JclUnitVersioning l'unité est ici] 1 et vous donne une idée approximative de son fonctionnement : l'unité dispose d'un système global de contrôle de la qualité. function GetUnitVersioning: TUnitVersioning; qui vous renvoie les informations de version pour toutes les unités qui supportent UNITVERSIONING.

À partir de là, vous pouvez les énumérer et demander des précisions.

C'est très pratique, par exemple, lorsque vous voulez savoir quelle version exacte d'une unité est liée à votre fichier .EXE.

--jeroen