Discussion :

[tryonyco]

Bonjour a tous,

je cherche a creer un bouton qui me deroule la combobox ou pouvoir elargir la "fleche" d'ouverture de la combo.

Merci d'avance.

[kmaniche]

un bouton qui me deroule la combobox ou pouvoir elargir la "fleche" d'ouverture de la combo.

voici deux solutions :

1-

Code :

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

1
2
3
4
5
6
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 ComboBox1 -> SetFocus() ;
 PostMessage(ComboBox1 -> Handle, WM_KEYDOWN, VK_F4, 0);
}

2-

Code :

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

1
2
3
4
5
6
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 ComboBox1 -> SetFocus() ;
 keybd_event(VK_F4,0,0,0);
}

et un KDO :

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::Button1Click(TObject *Sender)
{
 TPoint P(ComboBox1 -> Left + ComboBox1 -> Width - 10,
              ComboBox1 -> Top  + 10) ;
 
 P = ClientToScreen(P) ;
 
 SetCursorPos(P.x, P.y) ;
 
 ComboBox1 -> SetFocus() ;
 PostMessage(ComboBox1 -> Handle, WM_KEYDOWN, VK_F4, 0);
}

[tryonyco]

Merci a toi, tu sauves la vie.

Merci encore