Generics: Instanz-Erzeugung in generischer Klasse

[webcss]

Zitat von Stevie:

Always a pleasure

Mir fiel gerade noch auf, dass es doch mit nem "einfachen" cast ohne den Umweg über die extra Methode geht:

Delphi-Quellcode:

constructor TGenericLink<T>.Create;
begin
  FLink := T(TComponentClass(T).Create(nil));
end;

Was ich bereits in Beitrag Nr.1 gesagt hatte, allerdings hatte ich das Class an TComponent vergessen, war halt schon spät

[SebE]

FLink := T(TComponentClass(T).Create(nil)); Ich habe hier ein Verständnisproblem.
Wird hier nicht nur TComponentClass erzeugt?
Wenn T "größer" sein sollte (T abgeleitet von TComponentClass), dann fehlt doch die Hälfte nach der Instanziierung, oder nicht?

Im Übrigen gibt es genau dieses Problem in C# auch.
Ich habe leider keine bessere Lösung als Delegates der Form:

Code:

{ return new myType(...); }

gefunden.

[hokuspokussimsalabim]

Result := T(T.NewInstance);
Result.Create('Hello World');

[Stevie]

Zitat von SebE:

FLink := T(TComponentClass(T).Create(nil)); Ich habe hier ein Verständnisproblem.
Wird hier nicht nur TComponentClass erzeugt?
Wenn T "größer" sein sollte (T abgeleitet von TComponentClass), dann fehlt doch die Hälfte nach der Instanziierung, oder nicht?

Nein, weil TComponent.Create(AOwner: TComponent) virtual ist.

Zitat von SebE:

Im Übrigen gibt es genau dieses Problem in C# auch.
Ich habe leider keine bessere Lösung als Delegates der Form:

Code:

{ return new myType(...); }

gefunden.

Glaub ich nicht, das wäre das erste mal, dass Delphi im Bereich Generics einen Schritt weiter als C# ist.

Zitat von hokuspokussimsalabim:

Result := T(T.NewInstance);
Result.Create('Hello World');

Funktioniert in der Tat, fühlt sich aber irgendwie fies an

[SebE]

Zitat:

Nein, weil TComponent.Create(AOwner: TComponent) virtual ist.

Achso. Der Typ T ist ja als "Objekt" schon vorhanden.
Danke für den Hinweis.

Und - soweit ich weiß - erlaubt keine .NET-Sprache (allen voran C# und VB) parameter-behaftete generische Objekterzeugung. So sehr ich sie mir Wünsche und bräuchte

[hokuspokussimsalabim]

Zitat von Stevie:

Zitat von hokuspokussimsalabim:

Result := T(T.NewInstance);
Result.Create('Hello World');

Funktioniert in der Tat, fühlt sich aber irgendwie fies an

Alles im grünen Bereich. Nicht anders macht es Delphi in der VCL.
Auszug aus der Classes.pas:

Result := TComponent(ComponentClass.NewInstance);
[...snip...]
Result.Create(Owner);

Möglich, dass es ein Problem gibt wenn NewInstance überschrieben worden ist. Das wäre ggf. noch zu klären. In der Praxis ist mir das aber noch so gut wie nie untergekommen, selber hatte ich in mehr als 10 Jahren nicht ein einziges mal einen Grund dazu.