Generische Klassenreferenztypen

[Scurra]

Hallo zusammen,

ist es möglich, generische Klassenreferenztypen zu deklarieren? Ich bräuchte so etwas, weil der Konstruktor meiner generischen Klasse ebenfalls generisch ist (siehe Beispiel unten). Da sich die Konstruktorparameter von TBaseClass und TMyObject unterscheiden, kann ich nicht die Klassenreferenz von TBaseClass verwenden.

Delphi-Quellcode:

TBaseClass = class
public
  constructor Create(AOwner: TComponent);
end;

TMyObject<I: IMyInterface> = class(TBaseClass)
public
  constructor Create(const Intf: I); reintroduce;
end;

TMyObjectClass<I> = class of TMyObject<I: IMyInterface>;

[...]

var
  myObj: TMyObject<IMySubInterface>;

...

myObj := TMyObjectClass<IMySubInterface>.Create(TMySubInterfaceImpl.Create);

Ich hoffe, dass aus dem Codeausschnitt ersichtlich wird, was ich machen möchte. Gibt es evtl. eine einfachere Möglichkeit, das umzusetzen?

[himitsu]

Warum nicht so

Delphi-Quellcode:

myObj := TMyObject<IMySubInterface>.Create(TMySubInterfaceImpl.Create);

?

TClass braucht man nur, wenn man "verschiedene" Klassentypen in einer Variable speichern und dann Diese später zum Erstellen/Vergleichen verwenden will.


Ich hab sowas bisher verschachtelt, also

Delphi-Quellcode:

TMyObject<IIrgendwas>.TMyClass

statt

Delphi-Quellcode:

TMyObjectClass<IIrgendwas>

, denn so gibt es die wenigsten Inkompatibilitäten und alles was zusammen gehört ist auch zusammen.

Delphi-Quellcode:

TMyObject<I: IMyInterface> = class(TBaseClass)
public type
  TMyClass = class of TMyObject<I: IMyInterface>;
public
  constructor Create(const Intf: I); reintroduce;
end;

Auch andere Typen, welche z.B. nur in dieser Klasse existieren und wo es in der Regel extern keine Variablen mit gibt, kommen auch mit da rein.
(private oder public dann halt je nach dem ob diese Typen nur in Private/Interface oder auch in Public-Deklarationen verwendet werden)

[Scurra]

Ich glaube, ich habe mich da irgendwo in meinem Code verlaufen. Mein ursprüngliches Ziel war es, Model, View und Presenter irgendwie zu verknüpfen. Das Problem, das ich hatte, war beim erstellen des zum View gehörigen Formular. Hier muss man nämlich die Unterscheidung treffen, ob das Formular das Hauptformular sein wird oder nicht. Falls ja, dann hätte ich mit Application.CreateForm das Formular erzeugt. Diese Methode benötigt einen Klassenreferenztyp für die Formularklasse. Das war der Grund, warum ich es mit Klassenreferenztypen versucht habe.

Ich habe jetzt das Design etwas geändert, so dass ich das Problem umgehen konnte.

Aber danke für deine Anmerkungen. Es ist auch interessant zu wissen, dass es zumindest verschachtelt funktioniert.