Delphi 2010 Génériques de génériques

Question

Comment stocker des génériques dans un TList générique détenu par un objet non générique?

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; 

Le compilateur dit T n'est pas delcared dans

Attributes: TList<TXmlAttribute<T>>; 

- Pierre Yager

Answer 1

TXMLNode ne sait pas ce que T est. Qu'est ce que c'est censé être?

Peut-être que vous vouliez dire:

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

... que ce soit, ou vous devez spécifier un type.

Cependant, il semble qu'il vous manque quelque chose ici. Les génériques vous permettent de créer une classe distincte pour chaque type - pas une classe pour tous les types. Dans le code ci-dessus, TList contient un tableau de types qui sont le même, et vous voulez probablement les différents. Considérez ceci à la place:

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

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