TForm pour plusieurs fenêtre dans une même fonction ?

**MaTHieU_** · 08/11/2005, 22h22

Bonsoir,

Je souhaiterai utiliser une même fonction pour plusieurs fenêtre (FStatus,FSalle,FPrive) cependant si je fais une fonction comme ça :

Code :

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

1
2
3
4
5
6
7
 
void __fastcall TFPrincipale::TraiterCommande(AnsiString Chaine,TForm *F1)
{
F1->RichEdit1->Lines->Add("test");
}
 
FPrincipale->TraiterCommande(Edit1->Text, FStatus);

J'ai l'erreur suivante :

[C++ Erreur] MPrincipale.cpp(81): E2316 'RichEdit1' n'est pas un membre de 'TForm'

Comment puis-je faire ?

Merci d'avance,
Mathieu

**Djob** · 08/11/2005, 22h30

peut être peux tu faire hériter tes 3 fenêtres d'une fiche mère prédéfinie (TBasicForm ) contenant dans sa définition 1 Richedit entre autre ...

et définir ta fonction comme ceci...

Code :

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

1
2
 
void __fastcall TFPrincipale::TraiterCommande(AnsiString Chaine,TBasicForm *F1)

**Gilles Louïse** · 09/11/2005, 04h24

Effectivement, TForm n'a pas par défaut un TRichEdit. Ce qu'il faut faire (mais est-ce bien nécessaire?), c'est, à partir de F donné, rechercher un composant qui s'appelle RichEdit1 et lui envoyer l'ajout.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
void __fastcall TForm1::TraiterCommande(AnsiString Chaine,TForm *F)
{
int i;
bool ok;
TWinControl* pWC;
TRichEdit* pRE;
 
ok=false;
i=-1;
if(F->ComponentCount>0)
   do
      {
      pWC = (TWinControl*)(F->Components[++i]);
      if(pWC->Name=="RichEdit1")
         {
         pRE=(TRichEdit*)(pWC);
         pRE->Lines->Add("test");
         ok=true;
         }
   if(!ok) ok=(i==F->ControlCount-1);
   }
while(!ok);
}