Delphi 2010 Generika von Generika

Question

Wie kann ich Generika in einer generischen TListe speichern, die von einem nicht-generischen Objekt gehalten wird?

type
  TXmlBuilder = class
  type
    TXmlAttribute<T>= class
      Name: String;
      Value: T;
    end;

    TXmlNode = class
      Name: String;
      Attributes: TList<TXmlAttribute<T>>;
      Nodes: TList<TXmlNode>;
    end;
  ...
  end;

Der Compiler sagt, dass T nicht in

Attributes: TList<TXmlAttribute<T>>;

-- Pierre Yager

Answer 1

TXmlNode weiß nicht, was T ist. Was soll es denn sein?

Vielleicht meinten Sie:

TXmlNode<T> = class
  Name: String;
  Attributes: TList<TXmlAttribute<T>>;
  Nodes: TList<TXmlNode<T>>;
end;

... entweder das, oder Sie müssen einen Typ angeben.

Es scheint jedoch, dass Sie hier etwas übersehen. Generics erlauben es Ihnen, für jeden Typ eine eigene Klasse zu erstellen - nicht eine Klasse für alle Typen. In dem obigen Code enthält TList ein Array von Typen, die derselbe und Sie wollen sie wahrscheinlich verschiedene . Überlegen Sie stattdessen Folgendes:

  TXmlBuilder = class
  type
    TXmlAttribute= class
      Name: String;
      Value: Variant;
    end;

    TXmlNode = class
      Name: String;
      Attributes: TList<TXmlAttribute>;
      Nodes: TList<TXmlNode>;
    end;
  ...
  end;