Femeture script et selection fenêtre
Posté : sam. 04 juil. 2020 00:32
bonsoir, j'ai eu le besoin d'un outil, je suis en train de le développé, j'ai déjà utilisé autoit par le passé mais c'est ma première application graphique, alors voila j'ai 2 problèmes le premier : impossible de fermer l'application avec la croix rouge (en haut à droite) celle-ci na aucun effet je suis obligé de la fermer depuis la barre des tâches clic droit > exit et je n'ai pas envie de dédier une touche,quel est le problème ?
le deuxième problème est que les touche que j'ai bind son active en permanence, exemple : la touche espace à une fonction dans l'application mais si celle-ci est exécuté mais qu'elle n'est pas sélectionnée (je suis sur une autre fenêtre) la commande sera quand même envoyée au script et non a la fenêtre utilisée, que faire ?
le script est conçu pour compter des répétitions on entre le temps (5sec ici) et le nombres de répétitions (10 ici) quand on appui sur la barre d'espace le temps secoule jusqu'a faire un son et a comptabiliser les répétitions.
voila mon code(a noté que le programme est fonctionnel malgré ces deux soucis mais que les boutons et les input ne servent pas pour le moment et que c'est en développement d'ou certaine chose non utiles,en trop ou qui me servent pur le moment et qui seront suprimées une foit le développement terminé)
merci d'avance pour vos réponses
le deuxième problème est que les touche que j'ai bind son active en permanence, exemple : la touche espace à une fonction dans l'application mais si celle-ci est exécuté mais qu'elle n'est pas sélectionnée (je suis sur une autre fenêtre) la commande sera quand même envoyée au script et non a la fenêtre utilisée, que faire ?
le script est conçu pour compter des répétitions on entre le temps (5sec ici) et le nombres de répétitions (10 ici) quand on appui sur la barre d'espace le temps secoule jusqu'a faire un son et a comptabiliser les répétitions.
voila mon code(a noté que le programme est fonctionnel malgré ces deux soucis mais que les boutons et les input ne servent pas pour le moment et que c'est en développement d'ou certaine chose non utiles,en trop ou qui me servent pur le moment et qui seront suprimées une foit le développement terminé)
merci d'avance pour vos réponses
#include <GUIConstantsEx.au3>
#include <Date.au3>
#include <Sound.au3>
#include <Misc.au3>
#include <StaticConstants.au3>
$reps=0
$repsr=0
$timer=0
$time=0
$junk=1
GUICreate("Reps", 600, 400)
GUICtrlCreateInput ("0",500,360 ,40,20)
GUICtrlCreateLabel ("Reps :",460,363 ,40,20)
GUICtrlCreateInput ("30",500,330,40,20)
GUICtrlCreateLabel ("Temps en secondes :",390,330 ,110,20)
GUICtrlCreateLabel($timer, 250, 80, 110, 80,$SS_CENTER)
GUICtrlSetFont (-1,50,700)
GUICtrlCreateLabel($repsr, 250, 180, 110, 80,$SS_CENTER)
GUICtrlSetFont (-1,50,700)
GUICtrlCreateButton("START", 50, 330, 85, 25)
GUICtrlCreateButton("RESET", 150, 330, 85, 25)
;role du imput
$time=5
$reps=10
$timer=$time
HotKeySet ("{SPACE}", start)
HotKeySet ("r",reset)
HotKeySet ("a",aa)
Func start ()
if $timer>0 Then
Do
Sleep (1000)
$timer-=1
GUICtrlCreateLabel($timer, 250, 80, 110, 80,$SS_CENTER)
GUICtrlSetFont (-1,50,700)
until $timer=0
EndIf
if $timer=0 Then
$repsr=$repsr+$reps
$timer=$time
GUICtrlCreateLabel($timer, 250, 80, 110, 80,$SS_CENTER)
GUICtrlSetFont (-1,50,700)
GUICtrlCreateLabel($repsr, 250, 180, 110, 80,$SS_CENTER)
GUICtrlSetFont (-1,50,700)
beep (800,200)
EndIf
EndFunc
Func reset ()
$reps=0
$repsr=0
$timer=0
$time=0
GUICtrlCreateLabel($timer, 250, 80, 110, 80,$SS_CENTER)
GUICtrlSetFont (-1,50,700)
GUICtrlCreateLabel($repsr, 250, 180, 110, 80,$SS_CENTER)
GUICtrlSetFont (-1,50,700)
EndFunc
Func aa ()
$repsr += 10
GUICtrlCreateLabel($repsr, 250, 180, 110, 80,$SS_CENTER)
GUICtrlSetFont (-1,50,700)
EndFunc
GUISetState(@SW_SHOW)
Sleep(100000000)
#include <Date.au3>
#include <Sound.au3>
#include <Misc.au3>
#include <StaticConstants.au3>
$reps=0
$repsr=0
$timer=0
$time=0
$junk=1
GUICreate("Reps", 600, 400)
GUICtrlCreateInput ("0",500,360 ,40,20)
GUICtrlCreateLabel ("Reps :",460,363 ,40,20)
GUICtrlCreateInput ("30",500,330,40,20)
GUICtrlCreateLabel ("Temps en secondes :",390,330 ,110,20)
GUICtrlCreateLabel($timer, 250, 80, 110, 80,$SS_CENTER)
GUICtrlSetFont (-1,50,700)
GUICtrlCreateLabel($repsr, 250, 180, 110, 80,$SS_CENTER)
GUICtrlSetFont (-1,50,700)
GUICtrlCreateButton("START", 50, 330, 85, 25)
GUICtrlCreateButton("RESET", 150, 330, 85, 25)
;role du imput
$time=5
$reps=10
$timer=$time
HotKeySet ("{SPACE}", start)
HotKeySet ("r",reset)
HotKeySet ("a",aa)
Func start ()
if $timer>0 Then
Do
Sleep (1000)
$timer-=1
GUICtrlCreateLabel($timer, 250, 80, 110, 80,$SS_CENTER)
GUICtrlSetFont (-1,50,700)
until $timer=0
EndIf
if $timer=0 Then
$repsr=$repsr+$reps
$timer=$time
GUICtrlCreateLabel($timer, 250, 80, 110, 80,$SS_CENTER)
GUICtrlSetFont (-1,50,700)
GUICtrlCreateLabel($repsr, 250, 180, 110, 80,$SS_CENTER)
GUICtrlSetFont (-1,50,700)
beep (800,200)
EndIf
EndFunc
Func reset ()
$reps=0
$repsr=0
$timer=0
$time=0
GUICtrlCreateLabel($timer, 250, 80, 110, 80,$SS_CENTER)
GUICtrlSetFont (-1,50,700)
GUICtrlCreateLabel($repsr, 250, 180, 110, 80,$SS_CENTER)
GUICtrlSetFont (-1,50,700)
EndFunc
Func aa ()
$repsr += 10
GUICtrlCreateLabel($repsr, 250, 180, 110, 80,$SS_CENTER)
GUICtrlSetFont (-1,50,700)
EndFunc
GUISetState(@SW_SHOW)
Sleep(100000000)