Objekte aus generischem Typ erstellen

**Neutral General**

Hallo,

Mir ist leider kein besserer Titel eingefallen.
Es geht darum, dass ich eine "Normale" und eine generische Klasse habe.
Das ganze sieht erstmal so aus:

markieren

Delphi-Quellcode:

			TKlasseA = class

  constructor Create(AParam: TObject);

end;

TKlasseB<T: TKlasseA> = class

  procedure EineMethode;

end;

Jetzt will ich in TKlasseB<T>.EineMethode() dynamisch ein Objekt vom Typ T erstellen.

markieren

Delphi-Quellcode:

			procedure TKlasseB<T>.EineMethode;

var X: TObject;

begin

  X := T.Create(Self);

end;

Der Compiler meckert:

Zitat:

[DCC Fehler] Neue Instanz kann ohne CONSTRUCTOR-Einschränkung in der Typparameterdeklaration nicht erstellt werden

Definiere ich KlasseB so:

markieren

Delphi-Quellcode:

			TKlasseB<T: constructor, TKlasseA> = class

  procedure EineMethode;

end;

Dann kann ich nur den parameterlosen (TObject-)Konstruktor aufrufen:

X := T.Create(Self);

Zitat:

[DCC Fehler] ')' erwartet, aber 'Self' gefunden

Nächster Versuch:

zusammenfalten · markieren

Delphi-Quellcode:

			TKlasseA = class

  constructor Create(AParam: TObject);

end;

TKlasseAClass = class of TKlasseA;

TKlasseB<T: TKlasseA> = class

  procedure EineMethode;

end;

procedure TKlasseB<T>.EineMethode;

var Typ: TKlasseAClass;

    X: TObject;

begin

  Typ := TKlasseAClass(T.ClassType);

  X := Typ.Create(Self);

end;

Das kompiliert jetzt zwar, aber ich erhalte beim Aufrufen des Konstruktors eine Zugriffsverletzung.
Ich glaube dass in "Typ" irgendwie keine gültige Klasse drin steht...

Weiß jemand was ich machen kann?

Gruß
Neutral General

Objekte aus generischem Typ erstellen

Objekte aus generischem Typ erstellen

Forumregeln