[..] Aide concernant le lancement et l'arrêt de fonctions

[dieweb]

Bonjour à tous, nouveau depuis quelques temps sur ce fabuleux logiciel qu'est Autoit.
J'ai quelques questions (je tiens à préciser que j'ai lu les tutos de base fournis par le forum et j'ai fait des recherches, je tiens à le dire avant que l'on me dise que je me suis permis de poster sans même faire attention aux topics d'initiation autoit)

1ère question:
Disons par exemple que j'ai trois fonctions

Code : Tout sélectionner

Func verifier-que-paint-est-lancé
; code contenu dans la fonction
Return 1
EndFunc

Func lancer-le-logiciel-paint
; code contenu dans la fonction
Return 1
EndFunc

Func dessiner-un-cercle
; code contenu dans la fonction
Return 1
EndFunc

$verifier-que-paint-est-lancé = ****
$lancer-le-logiciel-paint = ****
$dessiner-un-cercle = ****

(bon ces 3 fonctions je sais les faire aisément, c'est pourquoi j'ai mis des ***, là n'est pas mon probleme ^^)

J'aimerais avoir 2 possibilités:
-si le logiciel paint est lancé: dessiner un cercle
-si le logiciel paint n'est pas lancé: lancer paint et dessiner un cercle
Logiquement j'utilise donc les fonctions de conditions Si (fonction est vraie) ;action a effectuer, sinon ; action a effectuer.
Est ce que je devrais écrire ceci ? Ai-je le droit d'addionner des actions les unes à la suite des autres ?

Code : Tout sélectionner

If $verifier-que-paint-est-lancé= 1 Then 
$dessiner-un-cercle

Else 
$lancer-le-logiciel-paint
$dessiner-un-cercle

Deuxieme question:
Disons que j'ai 1 fonction qui fonctionne en boucle, et qu'avec une certaine Condition (If, Else), je souhaite que cette fonction s'arrête: devrai-je mettre tout simplement

Code : Tout sélectionner

Do
$verifier-que-le-logiciel-paint-est-lancé
$verifier-que-internet-explorer-est-lancé
If ($verifier-que-le-logiciel-paint-est-lancé = 1) Then
MsgBox(0,"Note", "Le logiciel est lancé !")
$verifier-que-internet-explorer-est-lancé = 0  [color=#004000];je veux que si paint soit lancé, la verification en boucle d'internet explorer soit arreté ![/color]
Else
MsgBox(0,"Note", "Le logiciel n'est pas lancé !")
EndIf
Until ($verifier-que-le-logiciel-paint-est-lancé = 1)

Tout ceci n'est qu'à titre d'exemple, je cherche seulement à m'améliorer.

Merci de vos conseils.

[mikell]

Salut !
Tu devrais prendre de suite l'habitude de parler le plus possible en code
Pour tes questions :

Code : Tout sélectionner

Global $paint   ;<= on initialise la variable
Func _cercle()
If Not ProcessExists("mspaint.exe") Then   ; <= le test
    Run("mspaint.exe") 
EndIf
$paint = 1   ;<= témoigne que paint existe
dessiner-un-cercle  ;<= action
EndFunc

on teste juste que paint n'est pas lancé, si non => on le lance

Code : Tout sélectionner

While ProcessExists("mspaint.exe")<>0
.....
Wend

La boucle tourne tant que paint est lancé
Mais comme il y a toujours plusieurs manières de faire la même chose, le choix va donc dépendre du reste du script

[dieweb]

Merci bcp de ta réponse simple et rapide !!! . Je vais m'entraîner maintenant !

[Tlem]

Je suppose que la création du cercle n'est qu'une partie de ce qui peut être fait. Perso, je séparerais le test de l'exécution des dessins.

Code : Tout sélectionner

If VerifieEtLance() Then
    DessineUnCercle()
Else
    MsgBox(16, 'Erreur', 'Paint ne peut être lancé')
EndIf

Func VerifieEtLance()
    Local $PID = 0
    If Not ProcessExists("mspaint.exe") Then
        $PID = Run("mspaint.exe")
        If $PID <> 0 Then
            Return 1
        Else
            Return 0
        EndIf
    Else
        Return 1
    EndIf
EndFunc

Func DessineUnCercle()
    ; code contenu dans la fonction
    Return 1
EndFunc

[mikell]

Evidemment, mais ça c'est l'étape suivante...
Apparemment c'est un débutant, vous allez pas commencer à nous le stresser

[Tlem]

Heuu débutant certes, mais :

je tiens à préciser que j'ai lu les tutos de base fournis par le forum et j'ai fait des recherches
...
...
bon ces 3 fonctions je sais les faire aisément, c'est pourquoi j'ai mis des ***, là n'est pas mon probleme ^^
...
...
Merci de vos conseils.

Moi, quand on me dit les choses comme ça, je crois la personne sur parole !
Et puis, j'ai pas fait un truc de malade. Tout est logique. ^^

[mikell]

Bien sûr c'est logique... mais à qqun qui s'interroge sur la manière de poser une condition, on commence pas à y balancer une louche de fonctions pleines de Return, quoi

[Tlem]

Bah, je compte sur vous pour lui sortir la tête de l'eau si il n'y arrive pas.
Mais je doute que ce soit nécessaire.