Page 1 sur 1
[R] Compteur
Posté : sam. 11 avr. 2009 02:15
par touslesmatins
Bonjour,
Besoin d'aide pour corriger le script "compteur".
Voilà ,ce compteur incremente ou enleve manuellement 1 au compteur via des boutons.
Ce que je souhaiterais faire, c'est que le nombre apparaisse non pas à gauche comme dans le script mais caler le nombre à droite. Et beaucoup plus difficile je souhaiterais qu il apparaisse sous cette forme : 001 et non pas 1.
Est ce possible ? et si oui qui qq1 peut m'aider ?
Merci
► Afficher le texte
Code : Tout sélectionner
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Local $nMsg, $i,$font
$GUI1 = GUICreate("COMPTEUR", 100, 100, -1, -1, BitOR($WS_MINIMIZEBOX,$WS_SYSMENU,$WS_MAXIMIZE))
$btnCountplus1 = GUICtrlCreateButton("Ajoute",10,145,70,30)
$btnCountmoins1 = GUICtrlCreateButton("Retire",10,185,70 ,30)
GUICtrlCreateLabel("Compteur: ", 10,50)
$font = "High speed"
GUISetFont(55, 100,"", $font)
$labelCounter1 = GUICtrlCreateLabel("", 92, 132, 902, 100)
GUICtrlSetColor(-1,65280) ; vert fluo
GUICtrlSetBkColor(-1, 0)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $btnCountplus1
$i=$i+1
GUICtrlSetData($labelCounter1,$i)
sleep(100)
Case $btnCountmoins1
$i=$i-1
GUICtrlSetData($labelCounter1,$i)
sleep(100)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Re: [..] Compteur
Posté : sam. 11 avr. 2009 04:10
par orax
Il reste un problème avec Stringformat : ça n'affiche pas 3 zéros dans les nombres négatifs.
► Afficher le texte
Code : Tout sélectionner
$labelCounter1 = GUICtrlCreateLabel("", 92, 132, 902, 100, $ES_RIGHT) ; pour aligner à droite
GUICtrlSetData($labelCounter1, StringFormat("%03d", $i)) ; pour les 3 zéros
Re: [..] Compteur
Posté : sam. 11 avr. 2009 11:48
par touslesmatins
Merci beaucoup oRAX. Pour mon utilisation je n ai pas besoin de traiter des nombres negatifs.
Par contre j'ai ce message..
► Afficher le texte
$labelCounter1 = GUICtrlCreateLabel("", 350, 35, 602, 170, $ES_RIGHT) ; pour aligner à droite
WARNING: $ES_RIGHT: possibly used before declaration.
$labelCounter1 = GUICtrlCreateLabel("", 350, 35, 602, 170, $ES_RIGHT)[/spoiler]
Re: [..] Compteur
Posté : sam. 11 avr. 2009 12:30
par Toiinou
Il faut rajouter cet include: #include <EditConstants.au3> .
Bonne journée.
Re: [..] Compteur
Posté : sam. 11 avr. 2009 12:47
par touslesmatins
C'est parfait Toiinou, merci.
