delphi - 如何从派生类访问隐藏成员？

Question

我有两个类，一个派生自另一个。这些类都引入了同名的变量。派生类中的变量隐藏了父类(super class)中的变量。

如何从派生类的方法中引用父类(super class)的变量？

type
  TClass1 = class
  protected
    FMyVar: Integer;
  end;

  TClass2 = class(TClass1)
  protected
    FMyVar: Integer;
  public
    procedure Foo;
  end;

procedure TClass2.Foo;
begin
  //here I want access to FMyVar from TClass1
end;

Answer 1

没有什么特别的。除了标记为 private 的成员之外，每个子类都自动可以访问其父类中的内容。在 parent 。

在与其父级相同的单元中声明的子类可以访问标记为 private 的成员。 .使用strict private而是真正防止子类访问其继承的成员。