delphi - 解决 Delphi 中的循环引用

Question

这个问题已经有答案了:

Delphi Enterprise: how can I apply the Visitor Pattern without circular references? (4 个回答)

已关闭 9 年前。

有没有办法绕过 Delphi 中的循环单元引用？

也许是较新版本的 delphi 或一些魔法黑客之类的？

我的 delphi 项目有 100 000 多行代码，大部分基于单例类。我需要重构它，但这意味着几个月的“循环引用” hell :)

Answer 1

在过去的 10 年里，我一直在维护近百万行遗留代码，所以我理解您的痛苦!

在我维护的代码中，当我遇到循环使用时，我经常发现它们是由单元 A 中的常量或类型定义引起的，而单元 B 需要这些常量或类型定义。(有时也是一小段代码)单元 A 中的(甚至全局变量)也为单元 B 所需要。

在这种情况下(当我很幸运时!)我可以仔细地将代码的这些部分提取到一个新的单元 C 中，其中包含常量、类型定义和共享代码。然后单元A和B使用单元C。

我在发布上述内容时有些犹豫，因为我不是软件设计方面的专家，并且意识到这里还有很多其他人比我知识渊博得多。不过，希望我的经验对您有用。