Discussion :

[Meyl']

Bonjour,

Mon programme fonctionne, mais j'aurais voulu le réduire au maximum : j'ai une quinzaine de boutons, 3 pour sélectionner la langue, 1 pour la changer et une dizaine avec des mots inscrits dessus. Lorsque je clique sur l'un des 3 boutons, je simule un clique sur les dix autres. Je voudrais savoir si il n'y a pas une écriture moins fastidieuse pour simuler ce clique que de recopier 10 fois "Button->Click()". J'ai tenté un TButton, mais ca ne marche que sur le bouton de la langue sélectionnée... Et je n'arrive pas à utiliser une exception...

J'espère avoir été clair.

A celui ou celle qui m'aidera , Merci !

[Crayon]

Salut, je ne suis pas certain de bien comprendre la question. Si tu veux simuler un clic sur plusieurs boutons tu peux faire un truc du genre:

Code :

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

1
2
3
4
5
6
7
8
9
 
    for(int i = 0; i < ControlCount; ++i)
    {
        if(Controls[i]->ClassNameIs("TButton"))
        {
            TButton *Button = static_cast<TButton *>(Controls[i]);
            Button->Click();
        }
    }

[Meyl']

Tu n'as pas très bien compris mais tu as trouvé ma solution ! Merci beaucouuuup

[henderson]

Salut !

Voici un autre moyen !

Soient sur la fiche :
1 bouton maître (SpeedButton1)
10 boutons cibles (SpeedButton2 ...)

Chaque bouton cible se mémorise dans la propriété Tag du bouton maître.
Si on clique sur le bouton maître, le bouton mémorisé se dessinera comme "flat".

Testé avec BCB3 Pro ... donc vérifier si ça fonctionne aussi sur les versions ultérieures !

A plus !

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
24
25
26
27
28
29
30
31
32
 
//------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
// initialisation du mécanisme
SpeedButton1->Tag = (int)SpeedButton2;
}
//--------------- le bouton maître
void __fastcall TForm1::SpeedButton1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
TSpeedButton *B = (TSpeedButton*)SpeedButton1->Tag;
B->Flat = true;
}
//--------------- le bouton maître
void __fastcall TForm1::SpeedButton1MouseUp(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
TSpeedButton *B = (TSpeedButton*)SpeedButton1->Tag;
B->Flat = false;
}
//--------------- partagée par les 10 boutons cibles
void __fastcall TForm1::SpeedButton2MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
// Le bouton cible est le Sender et non pas le this de cette méthode
// Un Tag du type int peut servir de pointeur vers TSpeedButton par
// simple transtypage
SpeedButton1->Tag = (int)Sender;
}
//---------------

[Meyl']

Merci pour ton aide, mais je garde mes tags en réserve pour d'autre utilisation... Merci quand même

J'aurais une seconde question : j'ai ajouté une forme à mon projet, et je voudrais savoir, quand je clique sur un bouton de ma deuxième forme, je crèe une action sur ma première forme. J'ai ajouté Unit1.h et Unit2.h à mes projets, mais je ne trouve pas comment faire pour la suite...

Merci d'avance pour votre aide !

[Crayon]

Salut, va voir cette FAQ: Comment accéder à des fonctions ou variables d'une fiche à partir d'une autre fiche ?