Test sur le type d'un TComponent

Bonjour à tous,

j'essaye de faire un truc assez avancé, mais la je but,
je parcours les composants de mon application, tout c'est composant sont en natif de la classe TComponent, le probleme est que certaine propriété ne sont accessible que par certaine catégorie de composant, par exemple la propriété Caption, qui est par exemple valide sous les composant TLabel, ou encore TButton, mais pas sur les composant du style TEdit, TComboBox....

pour savoir a quel type de composant j'ai affaire, je voudrais faire un test sur le type, je sais que c'est possible en Delphi avec ce code :

Code:

---

If Components[i] Is TLabel Then...

---

seulement traduit en C++ ca ne fonctionne pas, voici mon code :

Code:

---

if(prmComposant == TLabel){...

---

prmComposant est de type TComponent *, et voici le code erreur de la compilation :

Code:

---

[C++ Erreur] Fenetre1.cpp(122): E2108 Utilisation impropre de typedef 'TLabel'

---

je sais que ce n'est pas un problème courant, mais si quelqu'un à une idée...
Merci

Salut,

Peut être avec un dynamic cast ... Je l'ai déjà fait, je recherche dans mes docs ;)

ça doit être celà :

Code:

---

1 2 3 4 5 6

TLabel *Testeur = dynamic_cast<TLabel*>(Components[i]); if (Testeur) // Si c'est bien un TLabel { // traitement ... }

---

Exemple :

Code:

---

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

void __fastcall TForm1::Button2Click(TObject *Sender) { int i; for (i=0;i<=ComponentCount-1;i++) { TLabel *Testeur = dynamic_cast<TLabel*>(Components[i]); if (Testeur) // Si c'est bien un TLabel { // traitement Testeur->Caption="Yes!"; } } }

---

J'espère que c'est bon ;)

Bonsoir,

Ben sinon, il y a ClassNameIs(...)

Code:

---

1 2 3 4

if ( prmComposant->ClassNameIs("TLabel") ) { }

---

@+ ;)

Citation:

---

Envoyé par Sunchaser

Bonsoir,

Ben sinon, il y a ClassNameIs(...)

Code:

---

1 2 3 4

if ( prmComposant->ClassNameIs("TLabel") ) { }

---

@+ ;)

---

Oui, c'est vrai aussi lol! Niveau code, ca reste pareil :mrgreen:

Salut pottiez:
Au cour de mes recherches pour mon TLabelVertical j'ai trouve sur le site une documentation Delphi dont voici le lien

Citation:

---

http://noisetteprod.developpez.com/delphi/doc/pdfd7/

---

Il y a " le guide du concepteur de composants " j'espere qu'il va t'apporter la reponse a ta question, pour moi il y a trop de choses les exemples sont en Delphi et cela ma noye completement

Je pense que le ClassNameIs() est ce que je cherche, le dynamic cast n'est pas bon pour ce que je veut, car je veut justement savoir quel est le type de l'objet avant de faire le cast, je peut pas faire un dynamic cast de type TButton sur un TLabel par exemple, merci a vous pour vos réponses, je vais regarder ton lien blondelle, ca peut etre interessant :D