delphi - 为什么要使用JCL UNITVERSIONING？

JCL库具有条件定义UNITVERSIONING。我不知道为什么这个选项存在，也不知道如何使用它。我知道有一个名为JclUnitVersioning.pas的单元，但是找不到用处。

在真正的单词项目中在哪里使用？

最佳答案

它支持JclUnitVersioning单元，该单元以更连贯的方式公开此类常量:

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

1在这里是JclUnitVersioning单元的旧版本，它为您提供了一个大致的概念:该单元具有全局function GetUnitVersioning: TUnitVersioning;，可为您提供支持UNITVERSIONING的所有单元的版本信息。

您可以从那里枚举它们，并询问详细信息。

例如，当您想知道某个单元的确切版本链接到您的.EXE时，这非常方便。

--jeroen

关于delphi - 为什么要使用JCL UNITVERSIONING？，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/5251165/