problème avec la directive implements

j'essaie d'utiliser la directive implements pour un implémenter une interface à partir d'un attribut de type interface (la même).

avant de donner précisément comment je m'en sert, y a t il des trucs et astuces à savoir ? Quelles difficultés avez-vous rencontrées à ce sujet ?parce que j'ai vraiment l'impression de faire pile poil l'exemple de l'aide et il me sort "identificateur non déclaré" pour chaque élément de l'interface.

comme si il ne voyait même pas ma directive implements.

ps : je suis sur Delphi 7 architecte si ça change quoi que ce soit

Un petit bout de code serait le bienvenu.

je me rappelle plus ce que j'ai fait mais bon j'ai résolu le problème. je crois que ça avait rapport avec la dérivation d'interface.

j'avais le code suivant me semble t il

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

itest = interface procedure BonCaMarcheOuBien; end;   itest2 = interface(itest) procedure BenNon; end;   ttest = class(TInterfacedObject, itest, itest2) protected FTest: itest2; public property Test: itest2 read FTest implements itest2; end;

---

et je pensais que implements itest2 suffisait pour itest et itest2 en fait il faut mettre les deux.

Code:

---

1 2 3 4 5 6 7

ttest = class(TInterfacedObject, itest, itest2) protected FTest: itest2; public property Test: itest2 read FTest implements itest, itest2; end;

---