[TStringList] Objects et record

Salut

voila, je voudrais, dans ma tstringlist, enregistrer les pointeurs sur des record que j'ai appelé TLayer... Je fais donc comme ça:

Code:

---

1 2	t.AddObjects(TObject(Layer));

---

t est une tstringlist et Layer une ^TLayer...

Maintenant, je voudrais avoir le contraire c'est à dire récupérer le TLayer que j'ai emmagasiné...

Code:

---

1 2	Layer:=TLayer(t.Objects[i]);

---

Et la ça ne marche pas "Invalid Typecast"...
Pourquoi dans un sens, il arrive à caster et pas dans l'autre? Ou alors, aurais-je fait une erreur plus grosse que moi?

Merci d'avance

Encore faudrait-il que TLayer=class(TObject) ...

Ben non justement

Code:

---

1 2 3 4

TLayer=record ... end;

---

... Mais TObject est un pointeur et dans mon exemple, Layer en est un aussi, alors où est le problème?

alors essaye

Code:

---

Layer:=pointer(t.Objects[i]);

---

Ah ben oui, tiens, j'y avais pas pensé... Merci je vais essayer! :D

Tu devrais plutôt utiliser une TList plutôt qu'une TStringList... C'est fait pour ça...