Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   Delphi Generics: Instanz-Erzeugung in generischer Klasse (https://www.delphipraxis.net/163659-generics-instanz-erzeugung-generischer-klasse.html)

webcss 10. Okt 2011 10:49

AW: Generics: Instanz-Erzeugung in generischer Klasse
 
Zitat:

Zitat von Stevie (Beitrag 1129581)
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 :-D

SebE 10. Okt 2011 13:41

AW: Generics: Instanz-Erzeugung in generischer Klasse
 
Delphi-Quellcode:
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 10. Okt 2011 13:54

AW: Generics: Instanz-Erzeugung in generischer Klasse
 
Result := T(T.NewInstance);
Result.Create('Hello World');

Stevie 10. Okt 2011 14:14

AW: Generics: Instanz-Erzeugung in generischer Klasse
 
Zitat:

Zitat von SebE (Beitrag 1129619)
Delphi-Quellcode:
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:

Zitat von SebE (Beitrag 1129619)
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:

Zitat von hokuspokussimsalabim (Beitrag 1129624)
Result := T(T.NewInstance);
Result.Create('Hello World');

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

SebE 10. Okt 2011 14:21

AW: Generics: Instanz-Erzeugung in generischer Klasse
 
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 :cry:

hokuspokussimsalabim 10. Okt 2011 15:53

AW: Generics: Instanz-Erzeugung in generischer Klasse
 
Zitat:

Zitat von Stevie (Beitrag 1129635)
Zitat:

Zitat von hokuspokussimsalabim (Beitrag 1129624)
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.


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:05 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz