Discussion :

[lio59]

Bonsoir à toutes et à tous!
Je souhaite que mon programme envoie une donnée tant qu'un bouton est enfoncé.. J'arrive bien à envoyer une donnée, mais celle-ci est envoyée seulement lorsque je relâche le bouton...
- L'évènement click ne me convient pas...
- une boucle while? Mais je ne veux pas une touche du clavier "Keydown" mais bien lorsque le bouton "button1" est enfoncé...

Merci à vous

Lio

[AcidLines]

Bonsoir,

J'ai regarder, je n'ai pas trouver le moyen de le faire directement par un etat "appuyer" d'un bouton.

Cependant, tu peux faire cette action à répétition d'une autre manière :
Un checkBox mais en type button (paramètre " appareance").

et dire que tant que c'est coché tu effectue ton traitement, sinon tu le stop.
Sur le CheckChanged.

Bonne soirée à toi

[lio59]

Merci AcidLines de te pencher sur mon soucis, je vais essayer ton idée qui me permettra peut être de contourner ma difficulté...
Merci...
Lio

[lio59]

Humm, le soucis persiste, mais dans l'autre sens, il faut refaire un "clic" sur la checkbox pour la désactiver...
J'aimerais bien, mais je pense que vous avez saisi mon soucis...
Enfoncé = action true
Relâché = action false

Merci quand même...

Lio

[AcidLines]

Je pense alors qu'il faut créer un thread différent pour ton traitement que tu envoi en boucle sur ton button.mousedownn et que tu kill ton thread sur button.mouseup. Car VB ne peux pas assimiler les 2 action simultanémenents.

[lio59]

D'accord, je vois à peu près le truc.. je suis débutant...
Je viens de changer .click en .mousedown
Maintenant l'action est effectivement effectuée lorsque le bouton s'enfonce, mais cette action s'arrête tout de suite après...

Donc il faut un thread... hummm c'est une sorte de timer? Bon, j'ai lu que ce n'était pas la même chose...

Donc un thread qui tourne en boucle sur .mousedown?

Là j'avoue ne pas savoir faire... Je quitte pour ce soir et vais rechercher comment faire tourner un thread en boucle et le "kill" (le supprimer, je suppose?) lorsque le mousedown n'est plus actif

Que je ne raconte pas de bêtise sur le mousedown, il est bien placé ici :

Code :

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

Private Sub button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSendTextB.MouseDown

En tous les cas merci,
cela avance...
Lio