Why use JCL UNITVERSIONING?

2020-06-03 08:18发布

The JCL library have an conditional define UNITVERSIONING. I don't know why this option exists and don't know how to use this. I know that there are a unit called JclUnitVersioning.pas, but can't find a use.

Where to use this in a real word project?

1条回答
\"骚年 ilove
2楼-- · 2020-06-03 09:18

It supports the JclUnitVersioning unit, which exposes the constants like these in a more coherent way:

{$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}

An old version of the JclUnitVersioning unit is here]1 and gives you a rough idea how it works: the unit has a global function GetUnitVersioning: TUnitVersioning; which gives you back the version information for all units that support UNITVERSIONING.

From there you can enumerate them, and ask for details.

This is very handy for instance when you want to know which exact version of a unit gets linked into your .EXE.

--jeroen

查看更多
登录 后发表回答