Delphi 为什么要使用JCL单元版本控制？

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

---

在真实的word项目中，在何处使用此选项？

它支持

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}

JclUnitVersioning

单元的一个旧版本在这里]，它让您大致了解了它的工作原理：该单元有一个全局

函数GetUnitVersioning:TUnitVersioning返回支持单元版本控制的所有单元的版本信息

从那里你可以列举它们，并询问细节

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

--jeroen
例如，假设您向客户发送应用程序的一个版本，他向您提交错误报告。也许您想知道最终产品（您的大型应用程序）的静态链接构建中涉及了哪个版本的JCL SubcomponentX或MyCustomComponents-Y。这看起来非常有用。如果我理解，您可以使用一个函数来报告给定应用程序中每个单元的单元版本（如果存在）？包括源分支。。。可以很容易地发现合并问题。例如，我可能有五个大型应用程序，它们都共享一个公共数据库层。也许我想知道UberWare 3.2附带了DB Layer 2.1，但MegaSoft 2.4只有DB Layer 2.0。问题解决了。对于任何不知道这一点的人来说，上面的RCS标记在签入时都会自动更新，不仅由RCS和CVS更新，还可以由其他版本控制系统（如subversion）更新。@Chris：你收到消息了；这是非常有用的@沃伦：如果你用乌龟，你需要改变一些设置；不知怎的，对我来说，它没有更新那些现成的。