Discussion :

[JuJu°]

Bonjour,

Voila mon probleme je veux ajuster la taille d'un ComboBox a l'ouverture puis remettre sa taille initiale a la fermeture:

Si le ComboBox est pose directement sur le TForm cela fonctionne,
par contre si je le pose sur un Pannel, cela ne fonctionne plus, n'etant pas tres familie avec tous ca comment faire?
Voici le code:

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
 
//A l'ouverture j'agrandi le ComboBox
void __fastcall TF_Saisie::CB_ManipulationDropDown(TObject *Sender)
{
    CB_Manipulation->Width = 350;
}
//---------------------------------------------------------------------------
 
//Ici je suis sense intercepter le message de fermeture du ComboBox
void __fastcall TF_Saisie::WndProc(TMessage& Message)
{
    if (Message.Msg == WM_COMMAND)
    {
        HWND hComboBox = (HWND) Message.LParam;
 
        if (hComboBox == CB_Manipulation->Handle)
        {
            CB_Manipulation->Width = OriginalWidth;
        }
    }
    TForm::WndProc(Message);
}

Une idee???

Merci

[JuJu°]

Si ca peux eclairer quelqu'un je cherche a recupere le WM_COMMAND dans un child Window(Panel)
J'y connais rien en API Windows

[JuJu°]

Bon j'en ai *bavé* mais voila la procedure a suivre:

Alors dans TForm1.h rajouter:

Code :

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

1
2
3
4
5
private:
    TWndMethod FOriginalProc; //On sauvegarde l'origine de la fonction Panel->WindowProc
 
public:
    void __fastcall NewWndProc(TMessage& Message);

dans TForm1.cpp rajouter:

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
__fastcall TForm1::TForm1(TComponent* Owner)
{
    //On enregistre la valeur initial la fonction WindowProc du Panel
    //Puis on lui assigne notre fonction NewWndProc
    FOriginalProc = Panel->WindowProc;
    Panel->WindowProc = NewWndProc;
}
 
__fastcall TForm1::~TForm1()
{
    //On remet la valeur d'origine de la fonction WindowProc du Panel
    Panel->WindowProc = FOriginalProc
}
 
void __fastcall TForm1::NewWndProc(TMessage& Message);
{
    //On fait les traitements
    if (Message.Msg == WM_COMMAND)
   {
        //...
   }
   //et pour finir
   FOriginalProc(Message);
}

[Modération, Alacazam : Prière de garder un langage correct, merci]