Action durant bouton enfoncé

Bonjour, je pense que ma question est simple mais je debute un peu...

J'ai un bouton sur mon Form,
je voudrais que quand on appuie sur ce bouton et qu'on le laisse enfoncé (cad on ne relache pas le clic de la souris), il envoie la valeur 1 a une variable
Et que qd on le relache il envoie la valeur 0

Je suis sous BCB6
Merci d'avance

bonsoir,
tu peux utiliser les évennements OnKeyDown et OnKeyUp du composant Button
pour l'utilisation avec le client et OnMouseDown et OnMouseUp pour l'utilisation avec la souris
Cordialement

Salut,

Voici un exemple d'utilisation :

Dans le .h:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

class TForm1 : public TForm { __published: // Composants gérés par l'EDI TButton *Button1; TButton *Button2; void __fastcall Button1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall Button1MouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); private: // Déclarations utilisateur int enfonce; public: // Déclarations utilisateur __fastcall TForm1(TComponent* Owner); };

---

Et dans le .cpp :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

void __fastcall TForm1::Button1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y) { enfonce=1; } //---------------------------------------------------------------------------   void __fastcall TForm1::Button1MouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y) { enfonce=0; }

---

J'ai déclarer la variable enfonce dans le .h comme une variable dite privée. C'est à dire que cette variable ne sera accessible seulement dans la fiche dans laquelle tu travailles.
Ensuite, sur la fiche, j'y ai mis un bouton et j'ai "édité" les événements OnMouseDown et OnMouseUp comme dans le code ci dessus.

J'espère que je ne t'embrouille pas trop :roll:
Bonne Soirée

Merci enormément a tous, c'etait tout bete mais ca m'a bien aidé.

Pas de problème ;)

Content de t'avoir aidé