Class 中的变量 Delphi 7

Question

以下是我尝试声明 class 变量的代码：

  type TMyClass = class

  private
    class function ABC(myID : integer): string;
  public
    class var s: String;
    class function XYZ: string;
  end;

我收到错误：PROCEDURE or FUNCTION expected。 Delphi 7 中 class 变量的语法有任何变化吗？

Answer 1

Delphi 7 不支持 class 变量。你必须找到另一种方法来解决你的问题。一个简单的解决方法可能只是让它成为封闭单元的全局变量。

Answer 2

实际上，Delphi-6 支持 class 变量。例如，您可以这样做：

var CV: TClass;

CV:=TCheckBox;

如果 CV=TCheckBox 那么...;

Class 中的变量 Delphi 7

Class variables in Delphi 7

delphi

delphi-7