Discussion :

[scorpiwolf]

j'aimerai appelé une fenetre à l'aide d'un raccourcis : ctrl+alt+s

j'arrive à l'appeller mais avec un raccourcis d'une touche:

Code :

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

1
2
3
4
5
6
 
void __fastcall TForm1::FormShortCut(TWMKey &Msg, bool &Handled)
{
  if (Msg.CharCode == VK_CONTROL)
     pass->Visible = true;
}

comment lui dire d'afficher la fenetre en combinant plusieurs touches??

[henderson]

Pourquoi ne pas envisager une solution à partir de OnKeyDown ?
(Propriété KeyPreview de la Form sur true)
On peut extraire l'état des touches shift, ctrl et alt à partir de Shift.

...

Code :

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

1
2
3
4
5
if(Shift.Contains(ssCtrl)&&Shift.Contains(ssAlt)&&(Key=='s'))
    {
	Key=0;//puisque prise en compte
	Form2->Show();
    }

...

[scorpiwolf]

j'ai fait comme tu ma dis, mais sa marche pas alors apres j'ai seulement essayé avec if (Key == 's') et sa marche pas non plus

et j'ai bien mis keyprview a true

[henderson]

Je viens de tester aussi...euh...
Alors je me suis fâché...et j'ai testé au pas à pas...
Juste une form et un Label...

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
void __fastcall TForm1::FormKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
if(Shift.Contains(ssCtrl))
    {
    if(Shift.Contains(ssAlt))
        {
        if((Key=='S')||(Key=='s'))
            {
            Key=0;
            Label1->Caption="Coucou !";
            }
        if((Key=='A')||(Key=='a'))
            {
            Key=0;
            Label1->Caption="Au revoir !";
            }
        }
    }
}
//---------------------------------------------------------------------------

[scorpiwolf]

je te remercie grandement sa marche impecable