[R] Compteur

[touslesmatins]

Bonjour,

Serait il possible de creer une gui avec 1 compteur "lumineux" avec 2 boutons qui correspondrait à +1 et -1 ce qui permettrait d ajouter ou retirer 1 au compteur.
(avec une vraie apparence compteur)
Merci

[GaRydelaMer]

Bonsoir

Oui tout est possible avc AutoIt ou presque.

Aprés tout dépend de ce que tu appelle un compteur !!

Mais l'idée:
Faire tous ca avec des Images pour le coté lumineux et pareil pour les "boutons" + et -
Images de 0 à 9, ou un vue mètre façon vieil ampli


Comme tu peux ajouter des évènements sur le click de ces images pour changer l'image de la GUI qui correspond à la valeur du compteur, on faisait comme ca sur les sites web pour gérer les compteurs de visite.

1 créer les 10 images, choisir une largeur fixe pour chaque chiffre
2 calculer le nb de caractère de la valeur du compteur
3 dimensionner la GUI = nb * largeur image + marge gauche + marge droite + largeur de images + et -
4 Qd on click sur + ou -, on refait le calcul du point 3

Edit:
pour un vue mètre et autre exemple de manipulation d'image sur le forum anglais
http://www.autoitscript.com/forum/index ... l=rotation

[touslesmatins]

Merci... je vais suivre tes conseils et voir.... euh et pour le compteur, il s incremente uniquement quand j appuie manuellement sur le bouton par exemple +1.

Ce que je souhaite c est un truc un peu plus sexy que ça...

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example1()

; example 1
Func Example1()
    Local $msg

    GUICreate("My GUI"); will create a dialog box that when displayed is centered
    $btnCount = GUICtrlCreateButton("Count",10,10)
    GUICtrlCreateLabel("Counter: ", 10,50)
    $labelCounter = GUICtrlCreateLabel("",60,50,80)
    GUISetState(@SW_SHOW)    

; Run the GUI until the dialog is closed
    While 1
        $msg = GUIGetMsg()
        if $msg = $btnCount Then
            for $i = 1 To 10
                GUICtrlSetData($labelCounter,$i)
                sleep(1000)
            Next
        EndIf
        If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    WEnd
    GUIDelete()
EndFunc;==>Example1

Une aide me serait la bienvenue

[touslesmatins]

re,

Voilà ce que je veu faire pour le script, mais pas design... je continue.
Pour ceux que ca interesse

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

    Local $msg, $i

    GUICreate("My GUI"); will create a dialog box that when displayed is centered
    $btnCountplus = GUICtrlCreateButton("Ajoute",10,10)
    $btnCountmoins = GUICtrlCreateButton("Retire",80,10)
    GUICtrlCreateLabel("Compteur: ", 10,50)
    $labelCounter = GUICtrlCreateLabel("",60,50,80)
    GUISetState(@SW_SHOW)    

; Run the GUI until the dialog is closed
    While 1
        $msg = GUIGetMsg()
        if $msg = $btnCountplus Then
                $i=$i+1
                GUICtrlSetData($labelCounter,$i)
                sleep(100)
        ElseIf $msg = $btnCountmoins Then
                $i=$i-1
                GUICtrlSetData($labelCounter,$i)
                sleep(100)
        If $msg = $GUI_EVENT_CLOSE Then Exit
            endif
    WEnd
    GUIDelete()

A bientot

[touslesmatins]

Merci.
Je crois que je vais deplacer ce post, car il ne correspond plus à la demande de script.
merci