Mehrere Class helper für eine Basisklasse

[Uwe Raabe]

Zitat von Rollo62:

Also in der Art:

Delphi-Quellcode:

type
  TBaseClassXyz_Helper = class helper for TBaseClassAbc_Helper 
    Procedure DoXyz;
  end;

Nein, so nicht! Aber so (wenn TBaseClass wirklich eine class ist):

Delphi-Quellcode:

type
  TBaseClass = class
    ABC: Integer;
    XYZ: Integer;
  end;

  TBaseClassAbc_Helper = class helper for TBaseClass
    Procedure DoAbc;
  end;

  TBaseClassXyz_Helper = class helper(TBaseClassAbc_Helper) for TBaseClass
    Procedure DoXyz;
  end;