Discussion :

[basta690]

Bonjour,

J’ai 3 fiche 1- MainForm 2- frmList 3-4 Form1 et Form2
je une méthode dans frmList appeler ShowList( f : TFormClass ) ;

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
procedure TMainForm.Button1Click(Sender: TObject);
begin
 frmList.ShowList(Form1);
end;
 
procedure TfrmList.ShowList(f : TFormClass );
 
begin
   try
    frmList := TfrmList.Create(nil);
         frmList.ShowModal;
         Form_a_Appeler := f.Create(Self) ;
 
   finally
     frmList.Free;
   end;
 
end;

J’ai defini 2 méthodes dans Form1 et Form2

Code :

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

1
2
3
4
 
procedure TForm1.AjouterAuList;
 
procedure TForm2.AjouterAuList;

L’appelle de Form1 et Form2 comme :

Code :

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

1
2
3
4
5
6
procedure TfrmList.Button1Click(Sender: TObject);
begin
  ShowMessage(Form_a_Appeler .Caption );   //          Ok ca marche
  Form_a_Appeler.AjouterAuList;                   //  mon Problème
 
end;

Erreur ( Indeclared Identifer ‘AjouterAuList’ )

[Just-Soft]

tu dois déclarer dans les parties des uses des formes appelantes dans ton cas form1 et form2 l'unité appelée dans ton cas frmList.

[basta690]

Merci de ta réponse Just-Soft
Je fait l’appelle de méthode (AjouterAuList) avec l’instance ( Forme_A_Appeler ) donc je croix que pas besoin de uses ufrm1, ufrm2 dans frmList
Avec caption ex : Forme_A_Appeler.Caption marche bien, mais Forme_A_Appeler.AjouterAuList ne pas accessible voila le problème

[Andnotor]

Déplace la déclaration de cette procédure dans la section Public de ta fiche.

[Just-Soft]

Merci de ta réponse Just-Soft
Je fait l’appelle de méthode (AjouterAuList) avec l’instance ( Forme_A_Appeler ) donc je croix que pas besoin de uses ufrm1, ufrm2 dans frmList
Avec caption ex : Forme_A_Appeler.Caption marche bien, mais Forme_A_Appeler.AjouterAuList ne pas accessible voila le problème

Mais tant qu'elle n'est pas déclarée elle ne sera pas reconnu et par conséquent tu as cette erreur.

pour correction, dans la parties uses on déclare les unités pas les forme, si unit1 est l'unité de form1 alors dans la partie uses de frmList tu dois ajouter unit1. idem pour unit2 si c'est l'unité de form2.

Bonne chance.