避免循环引用.如何创建一个新单元并将所有需要的变量放入其中?

Raf*_*ari 0 delphi

如何通过将其添加到3个其他单元的实现部分的uses子句中来创建一个单元以便在之后调用它?

当我第一次创建一个单元时,我看到类似的东西:

unit Unit1;

interface

implementation

end.
Run Code Online (Sandbox Code Playgroud)

如何在我的脚本中放置一些变量,以便从其他3个单元重新调用它们(以避免循环引用)?

Mar*_*ams 7

接口部分中定义的全局变量,类,方法,常量和公共成员都可以在其他单元中引用.

unit Unit1;

interface

const
  // Global constant
  MY_CONSTANT = 'FOO';

type TMyObject = class
private
  FMyProperty: String;
public
  // Public instance variable of class TMyObject
  myPublicInstanceVariable: String;
  // Public property of class TMyObject
  property MyProperty: String read FMyProperty;
end;

var
  // Global variable
  myStringVariable: String;

implementation

end.
Run Code Online (Sandbox Code Playgroud)

受保护的成员可以从继承的类中的其他单元获得.

不幸的是,XE2中的文档相当稀少.如果您有早期版本的Delphi,那么您需要了解的有关基础知识的所有内容都将包含在在线帮助中.

编辑

我对这个问题的回答提供了有关uses子句和避免循环引用的更多细节:

如何在delphi单元中管理循环引用?