Discussion :

[pottiez]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

If Components[i] Is TLabel Then...

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

if(prmComposant == TLabel){...

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

[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

[ero-sennin]

Salut,

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

[ero-sennin]

ça doit être celà :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[Sunchaser]

Bonsoir,

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
if ( prmComposant->ClassNameIs("TLabel") )
{
}

@+

[ero-sennin]

Bonsoir,

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
if ( prmComposant->ClassNameIs("TLabel") )
{
}

@+

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

[blondelle]

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

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

[pottiez]

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