Utilisation d'une combobox
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.
Re: Utilisation d'une combobox
Citation:
Envoyé par tryonyco
un bouton qui me deroule la combobox ou pouvoir elargir la "fleche" d'ouverture de la combo.
voici deux solutions :
1-
Code:
1
2
3
4
5
6
|
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ComboBox1 -> SetFocus() ;
PostMessage(ComboBox1 -> Handle, WM_KEYDOWN, VK_F4, 0);
} |
2-
Code:
1
2
3
4
5
6
|
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ComboBox1 -> SetFocus() ;
keybd_event(VK_F4,0,0,0);
} |
et un KDO : :coucou:
Code:
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);
} |
