Eine Frage zu Generics in generischen Listen

[Catweasel77]

Zitat:

Wenn du den Typ selbst gar nicht möchtest, entferne einfach die eigene Eigenschaft Element und benutze nur die vorhandene Eigenschaft Items

Ja, irgendwie war ich der Meinung Items[] wuerde mir nur ein TObject zurueckgeben.
Wie gesagt, ist mein erster Gehversuch mit Generics

[Schokohase]

Zitat von Catweasel77:

Zitat:

Wenn du den Typ selbst gar nicht möchtest, entferne einfach die eigene Eigenschaft Element und benutze nur die vorhandene Eigenschaft Items

Ja, irgendwie war ich der Meinung Items[] wuerde mir nur ein TObject zurueckgeben.
Wie gesagt, ist mein erster Gehversuch mit Generics

Die Eigenschaft Items liefert doch ein TObject zurück (geerbt von TObjectList )
Die Eigenschaft Element liefert den generischen Typen zurück (weil du es so programmiert hast)

[Catweasel77]

Zitat:

Die Eigenschaft Items liefert doch ein TObject zurück (geerbt von TObjectList )
Die Eigenschaft Element liefert den generischen Typen zurück (weil du es so programmiert hast)

Njein. Element[Index] hat direkt den (Basis)typ zurueckgegeben. das war ja mein Verstendnisproblem.
Als generische Liste liefert Items[Index] natuerlich ein objekt des generischen Typs.
Ich hatte da noch die Denkweise vom ohne-Generics programmieren, wo eine TObjectList "nur" ein TObject liefert.
So liefert mir Items[] bei einer TBooleanList schon ein TBooleanClass zurueck ohne das ich das erst casten muss.

Kann man eigentlich einen generischen Typ definieren mit einem constructor der den standard Create() von TObject ueberschreibt?
Konstruktoren kann man ja nicht in einem IInterface deklarieren, oder?

[Schokohase]

Wir sprechen doch noch immer über diese Klasse?

Delphi-Quellcode:

type
  TListTypeGeneric<TDataObjectType:TDataTypeGeneric<TDataType>,IDataIO,constructor>=class(TObjectList)
  private
    function GetElement(Index: integer): TDataObjectType;
    procedure SetElement(Index: integer; const Value: TDataObjectType);
  protected
    function GetVString: string;virtual;
  public
    function AddNewElement : TDataObjectType;
    procedure LoadFromStream(AStream:TFileStream);
    procedure SaveToStream(AStream:TFileStream);
    property Element[Index:integer] : TDataObjectType read GetElement write SetElement;
    property VString : string read GetVString;   
  end;

Und da liefert Items ein TObject zurück und Elements den generischen Typ.

[jaenicke]

Zitat von Catweasel77:

Kann man eigentlich einen generischen Typ definieren mit einem constructor der den standard Create() von TObject ueberschreibt?
Konstruktoren kann man ja nicht in einem IInterface deklarieren, oder?

Man muss zur Initialisierung ja keinen Konstruktor nehmen. Im Gegenteil, das hat z.B. den Nachteil, dass man die Intialisierungsdaten schon beim Erstellen des Objekts kennen muss. Zudem werden Exceptions dann anders (oft nicht wie gewollt) behandelt.

Man kann das in den aktuellen Versionen aber auch so lösen. Man muss für den Typ lediglich einen Type Constraint auf eine Vorfahrklasse angeben, die einen passenden Konstruktor hat. Ich würde aber lieber eine Methode Init verwenden.

[Catweasel77]

Zitat:

Wir sprechen doch noch immer über diese Klasse?
Und da liefert Items ein TObject zurück und Elements den generischen Typ.

So hatte ich mir das auch gedacht.
Ich bezog mich auf die Loesung von jaenicke (Dateianhang).