Page 1 sur 1
[R] Action lors d'un appui sur un bouton
Posté : ven. 10 déc. 2010 22:23
par stephaneR
Bonsoir,
Je voudrais faire quelque chose de tout bête:
Je voudrais recréer le fonctionnement d'un bouton poussoir. Quand j'appuie sur un bouton, je veux qu'un message dans un label change. Quand je relâche le bouton, le message disparait.
Or pour le moment, je sais changer le message d'un label quand je clique sur un bouton c'est à dire quand je relâche le bouton gauche de la souris.
Est-ce possible?
Merci à tous.
Re: [..] Action lors d'un appui sur un bouton
Posté : ven. 10 déc. 2010 22:33
par bloodwolff
Si par bouton vous voulez parler de bouton de souris et de clavier et non bouton de Gui , regarder du coté de _ispressed() , Je posterai un exemple dans quelque minutes le temps de lire les nouveaux messages et de faire l'exemple
Bien qu'il existe de nombreuse façon d'y parvenir voilà l'exemple tel que promis (Tester avec le clic gauche), si vous voulez d'autre façon de faire la même chose vous n'avez qu'à demander
Code : Tout sélectionner
#Include <Misc.au3>
While 1
Sleep(100)
if _IsPressed("01") Then
SplashTextOn("", "Clic Gauche appuyé!")
Do
Sleep(100)
Until not _IsPressed("01")
SplashOff()
EndIf
WEnd
Re: [..] Action lors d'un appui sur un bouton
Posté : ven. 10 déc. 2010 22:34
par stephaneR
Non malheureusement, je cherche à résoudre mon problème avec un bouton de GUI.
Re: [..] Action lors d'un appui sur un bouton
Posté : ven. 10 déc. 2010 22:48
par bloodwolff
Ah , c'est tout au aussi faisable
Mais je ne pouvais pas deviner
Voilà j'ai tenter de faire simple , seul le premier #include est obligatoire
Code : Tout sélectionner
#Include <GuiButton.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 117, 60, 192, 124)
$Button1 = GUICtrlCreateButton("Button1", 8, 32, 99, 25)
$Label1 = GUICtrlCreateLabel("Non", 12, 8, 92, 20, $SS_CENTER)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
While 1
If BitAND(_GUICtrlButton_GetState($Button1), $BST_PUSHED) = $BST_PUSHED Then
GUICtrlSetData($Label1, "Oui")
Do
Sleep(100)
Until not BitAND(_GUICtrlButton_GetState($Button1), $BST_PUSHED) = $BST_PUSHED
GUICtrlSetData($Label1, "Non")
EndIf
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
Sleep(100)
WEnd
Re: [..] Action lors d'un appui sur un bouton
Posté : ven. 10 déc. 2010 23:05
par stephaneR
Merci beaucoup, c'est exactement le fonctionnement que je souhaitais.
Demain, je vais analyser le code et essayer de l'intégrer dans mon programme.
Merci beaucoup à bloodwolff.
Bonne nuit à tous.
[R] Action lors d'un appui sur un bouton
Posté : sam. 11 déc. 2010 00:56
par stephaneR
Finalement, je n'ai pas réussi à attendre demain et je viens de finir mon programme.
Encore merci à bloodwolff.
Et cette fois bonne nuit.
Re: [..] Action lors d'un appui sur un bouton
Posté : sam. 11 déc. 2010 01:46
par bloodwolff
Merci d'éditer le titre selon les règles
[R] Action lors d'un appui sur un bouton
Posté : dim. 12 déc. 2010 16:51
par stephaneR
Je voudrais rendre le sujet résolu.
J'espère que la manip est correcte.
Re: [..] Action lors d'un appui sur un bouton
Posté : dim. 12 déc. 2010 16:52
par bloodwolff
Édite le titre de ton premier message et remplace le [..] par [R]