[结案]X3中 如何实现 访问 类中的保护函数

e888lp

DELPHI 中的方法是：

如果是某个类的保护变量，可以在任何地方，通过如下方法访问：

type
  TSomeClass=class();
  protected
    procedure DoAction;
  procedure SetValue(AValue:integer);

type
  TSomeClassAccess = class(TSomeClass);

begin
  TSomeClassAccess(Object1).DoAction;
  TSomeClassAccess(Object1).SetValue(0);
  ...
end;

在X3中好像不行，请问如何处理，谢谢！

lixy

直接写成public的。平台的语法和delphi是不完全一样的。

e888lp

我要访问的是 TCOMPONENT 类中的 保护函数，TCOMPONENT 类不能修改

lixy

好像是不能访问的。