Mehrere Class helper für eine Basisklasse

[Rollo62]

Hallo zusammen,

ich frage mich wie man mehrere class helper verwalten könnte.

Als Beispiel:

in UnitAbc.pas:

Delphi-Quellcode:

type
  TBaseClassAbc_Helper = class helper for TBaseClass  // Edit: class helper
    Procedure DoAbc;
  end;

in UnitXyz.pas:

Delphi-Quellcode:

type
  TBaseClassXyz_Helper = class helper for TBaseClass     // Edit: class helper
    Procedure DoXyz;
  end;

und in der Anwendung;

Delphi-Quellcode:

uses
    UnitBaseClass, UnitAbc, UnitXyz;


procedure Use;
var
  LBase : TBaseClass;
begin
   
   LBase.DoAbc;  // Das geht so wohl nicht, weil nur ein class helper aktiv ist
   LBase.DoXyz;

   TBaseClassAbc_Helper(LBase).DoAbc;  // Oder könnte man das mit Namespaces iregendwie casten ?
   TBaseClassXyz_Helper(LBase).DoXyz;  

end;

Gäbe es irgendeine "offizielle" Methode dafür, oder geht soetwas gar nicht ?

Rollo