AutoIt Français

bonjour alors j'ai créer un script avec une gui principale qui permet de:
-lancer le scrip
-d'expliquer
-de régler
-de quitter

mais quand je clique sur le bouton reglage une gui de réglage s'ouvre sa marche mais c'est lorsque je veux revenir sur le gui principale les bouton ne marche plus

merci d'avance

► Afficher le texte

Code : Tout sélectionner

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
    $clicc = 0xFFFFFF
$entrepage = 0xFFFFFF
$2 = 0xFF6600
$0 = 0xFF6600
$1 = 0x215582
$pariseffectuer = 0
$couleurfindepage = 0x206080
$temp_pour_mettre_en_place_debut_en_gros = 5000
$temp_crool = 400
$temp_charge_paris = 4000
$temp_datente_entre_miseparis_et_selection = 175
$temp_avant_misedefoz = 175
$temp_pour_valider = 125
$temp_pour_charge_tout_paris = 5500
$temp_pour_chargement_page_si_erreur = 1500
$coup_de_scrool = 2
$affichage_paris_effectuer = 4 ;en seconde

#Region ### START Koda GUI section ### Form=
Global $Form1 = GUICreate("bot paris autot", 633, 447, 192, 124)
Global $Button1 = GUICtrlCreateButton("c'est parti", 256, 168, 75, 25, $WS_GROUP)
GUICtrlCreateLabel("", 272, 56, 4, 4)
Global $Button2 = GUICtrlCreateButton("je quitte", 256, 208, 75, 25, $WS_GROUP)
Global $Button3 = GUICtrlCreateButton("a lire avant d'utiliser", 184, 64, 227, 89, $WS_GROUP)
Global $button4 = GUICtrlCreateButton("reglage (optionelle)", 245, 248,100,45, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit

  Case $Button1
      test()
Case $Button3
    MsgBox(64,"a lire", "veullez vous connecter et vous mettre dans les paris puis lancer le script")
Case $Button2
    MsgBox(16,"bye", "bye ...",1)
    Exit
Case $button4
;~  GUI DE REGLAGE **************************************************************************************************************
;~  *****************************************************************************************************************************
    Global $Form1 = GUICreate("Form1", 633, 447, 192, 124)
Global $Input1 = GUICtrlCreateInput("400", 256, 112, 121, 21)
Global $Input2 = GUICtrlCreateInput("4", 256, 168, 121, 21)
Global $Input3 = GUICtrlCreateInput("5500", 256, 232, 121, 21)
Global $Input4 = GUICtrlCreateInput("2", 256, 296, 121, 21)
Global $Label1 = GUICtrlCreateLabel("temp entre deux scrool", 120, 112, 132, 25)
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetBkColor(-1, 0xFF0000)
Global $Label2 = GUICtrlCreateLabel("temp d'affichage de la fenetre paris effectuer", 120, 168, 132, 25)
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetBkColor(-1, 0xFF0000)
Global $Label3 = GUICtrlCreateLabel("temp pour charger la fenetre principal (avec tout les paris)", 120, 225, 132, 40)
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetBkColor(-1, 0xFF0000)
Global $Label4 = GUICtrlCreateLabel("coup de roulette", 120, 296, 132, 25)
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetBkColor(-1, 0xFF0000)
Global $Label5 = GUICtrlCreateLabel("si vous ne savez pas a quoi correspond ces reglages laisser les reglage par default"& @CRLF &"tout reglage fait n'est pas enregistrer pour toujour a chaque relancement du programme les reglage ce remette par default", 180, 16, 284, 70)
GUICtrlSetColor(-1,  0xFF0000 )
GUICtrlSetBkColor(-1, 0x0000FF)
Global $Label6 = GUICtrlCreateLabel("(seconde)", 380, 168, 132, 25)
Global $Label7 = GUICtrlCreateLabel("(milliseconde)", 380, 112, 132, 25)
Global $Label8 = GUICtrlCreateLabel("(milliseconde)", 380, 232, 132, 25)
Global $Label9 = GUICtrlCreateLabel("(milliseconde)", 380, 296, 132, 25)
const  $label10 = GUICtrlCreateLabel("(exemple: 1 seconde = 1000 milliseconde)", 200, 400, 284, 70)

Global $Button1 = GUICtrlCreateButton("enregistrer", 504, 376, 91, 33, $WS_GROUP)
Global $Button2 = GUICtrlCreateButton("quitter", 504, 200, 91, 33, $WS_GROUP)
GUICtrlSetState($Button2,$GUI_DISABLE)
GUISetState(@SW_SHOW)

While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
   Case $Button1
       GUICtrlSetState($Button2,$GUI_ENABLE)
     $temp_crool = GUICtrlRead($Input1)
     $affichage_paris_effectuer = GUICtrlRead($Input2)
     $temp_pour_charge_tout_paris = GUICtrlRead($Input3)
     $coup_de_scrool = GUICtrlRead($Input4)
 Case $Button2
     GUISetState(@SW_HIDE)
EndSwitch
WEnd
;fin de la gui de reglage ******************************************************************************************************************************
EndSwitch
WEnd






Func test()
        $somme = InputBox("valeur paris", "quel mise veut tu mettre , attention la somme entrer sera mise a chaque paris!!!")
ToolTip("creer par *****", 80,80 ,"createur")
MsgBox(64, "bot paris automatique", "EVITER DE TOUCHER LA SOURIS!!" & @CRLF & "mettez vous en plein ecran" & @CRLF & "et connecter vous et mettez vous dans les paris" & @CRLF & "vous avez 5 seconde apres avoir cliquer sur ok")
Sleep($temp_pour_mettre_en_place_debut_en_gros)
$clic=PixelSearch(184, 408,323, 525, $clicc)
MouseClick("left",$clic[0], $clic[1],1, 0)
Do   ;.......................................................
Sleep($temp_crool)
    $jeparie=PixelSearch(188, 463, 709, 730, $0)
    If Not @error then
        $pariseffectuer = $pariseffectuer+1
MouseClick("left", $jeparie[0], $jeparie[1],1,0)
Sleep($temp_charge_paris)

$miseparis=PixelSearch(181, 413,559, 629, $1)
If Not @error then
    Sleep($temp_datente_entre_miseparis_et_selection)
MouseClick("left", $miseparis[0], $miseparis[1],1,10)
Sleep($temp_avant_misedefoz)
Send ($somme)
sleep($temp_pour_valider)
$valider=PixelSearch(548, 534,871, 666, $2)
MouseClick("left", $valider[0], $valider[1],1,0)
Sleep($temp_pour_charge_tout_paris)
Else
    MouseClick("left",385, 65)
Send("site")    ;page 2!!!!!!!!!!!!!!!!!!!!
Send("{enter}")
Sleep($temp_pour_chargement_page_si_erreur)
$entrepage=PixelSearch(182, 461, 360, 712, $entrepage)
MouseClick("left", $entrepage[0], $entrepage[1])
EndIf
Else
    MouseWheel("down", $coup_de_scrool)
    $findepage = PixelGetColor( 989, 683)
EndIf
Until ($findepage = $couleurfindepage)


MsgBox(0,"paris effectuer","vous avez effectuer " & $pariseffectuer & " paris en tout pour l'instant", $affichage_paris_effectuer)

    EndFunc

Bonjour,

J'ai fait un petit exemple simple expliquant la notion de parent enfant qu'il manque dans votre script:

Code : Tout sélectionner

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

$Form1_P = GUICreate("Parent", 623, 442, 192, 124)
$ButtonP1 = GUICtrlCreateButton("Vers enfant", 328, 248, 75, 25)
GUISetState(@SW_SHOW)

$Form1_E = GUICreate("Enfant", 327, 266, 449, 249, "", "", $Form1_P)
$ButtonE1 = GUICtrlCreateButton("&retour parent", 73, 187, 75, 25, $WS_GROUP)
GUISetState(@SW_HIDE)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $ButtonP1
            GUISwitch($Form1_E)
            GUISetState(@SW_SHOW)
        Case $ButtonE1
            GUISetState(@SW_hide)
            GUISwitch($Form1_P)
    EndSwitch
WEnd

C'est très rapide j'espère que ça va vous aider

ok merci de ta reponse rapide je part regarder tout de suite

edite: c'est bon sa marche encore merci

par contre je n'est plus la croix pour fermer comment on la remet?

merci

très bonne question que je ne me suis jamais pausé

je regarde

OK OK j'attends ta réponse. voila mon code si sa peut t'aider

► Afficher le texte

Code : Tout sélectionner

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

;~ **********************************************************************************************************************************
;~ **********************************************************************************************************************************
;~ **********************************************************************************************************************************
 $clicc = 0xFFFFFF
 $somme = 0
$entrepage = 0xFFFFFF
$2 = 0xFF6600
$0 = 0xFF6600
$1 = 0x215582
$pariseffectuer = 0
$couleurfindepage = 0x216282
$temp_pour_mettre_en_place_debut_en_gros = 5000
$temp_crool = 400
$temp_charge_paris = 4000
$temp_datente_entre_miseparis_et_selection = 175
$temp_avant_misedefoz = 175
$temp_pour_valider = 125
$temp_pour_charge_tout_paris = 5500
$temp_pour_chargement_page_si_erreur = 1500
$coup_de_scrool = 2
$affichage_paris_effectuer = 4 ;en seconde
$temp_apres_site_entrer = 1500
$temp_avant_rentrer_site = 100
$temp_repos = 1250
;~ **********************************************************************************************************************************
;~ **********************************************************************************************************************************
;~ **********************************************************************************************************************************

$Form1_parent = GUICreate("bot paris autot", 633, 447, 192, 124,"","")

GUISetState(@SW_SHOW)
$Button1 = GUICtrlCreateButton("c'est parti", 256, 168, 75, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("je quitte", 256, 208, 75, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("a lire avant d'utiliser", 184, 64, 227, 89, $WS_GROUP)
$buttonversreglage = GUICtrlCreateButton("reglage (optionelle)", 245, 248,100,45, $WS_GROUP)
GUISetState(@SW_SHOW)


;~ **********************************************************************************************************************************
;~ **********************************************************************************************************************************
;~ **********************************************************************************************************************************
$Form2_enfant = GUICreate("enfant", 633, 447, 192, 124,"","",$Form1_parent)
            $Input1 = GUICtrlCreateInput("400", 256, 112, 121, 21)
 $Input2 = GUICtrlCreateInput("4", 256, 168, 121, 21)
$Input3 = GUICtrlCreateInput("5500", 256, 232, 121, 21)
$Input4 = GUICtrlCreateInput("2", 256, 296, 121, 21)
$Label1 = GUICtrlCreateLabel("temp entre deux scrool", 120, 112, 132, 25)
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label2 = GUICtrlCreateLabel("temp d'affichage de la fenetre paris effectuer", 120, 168, 132, 25)
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label3 = GUICtrlCreateLabel("temp pour charger la fenetre principal (avec tout les paris)", 120, 225, 132, 40)
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label4 = GUICtrlCreateLabel("coup de roulette", 120, 296, 132, 25)
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label5 = GUICtrlCreateLabel("si vous ne savez pas a quoi correspond ces reglages laisser les reglage par default"& @CRLF &"tout reglage fait n'est pas enregistrer pour toujour a chaque relancement du programme les reglage ce remette par default", 180, 16, 284, 70)
GUICtrlSetColor(-1,  0xFF0000 )
GUICtrlSetBkColor(-1, 0x0000FF)
$Label6 = GUICtrlCreateLabel("(seconde)", 380, 168, 132, 25)
$Label7 = GUICtrlCreateLabel("(milliseconde)", 380, 112, 132, 25)
$Label8 = GUICtrlCreateLabel("(milliseconde)", 380, 232, 132, 25)
$Label9 = GUICtrlCreateLabel("(milliseconde)", 380, 296, 132, 25)
$label10 = GUICtrlCreateLabel("(exemple: 1 seconde = 1000 milliseconde)", 200, 400, 284, 70)
Global $Button10 = GUICtrlCreateButton("enregistrer", 504, 376, 91, 33, $WS_GROUP)
Global $Button9 = GUICtrlCreateButton("retour menue principale", 495, 200, 130, 33, $WS_GROUP)
GUICtrlSetState($Button9,$GUI_DISABLE)
GUISetState(@SW_HIDE)
;~ **********************************************************************************************************************************
;~ **********************************************************************************************************************************
;~ **********************************************************************************************************************************


While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button2
            Exit
        Case $Button1
            bot()
        case $Button3
            MsgBox(0,"","metter vous dans les paris et lancer le script")
        case $buttonversreglage
            GUISwitch($Form2_enfant)
            GUISetState(@SW_SHOW)
        Case $Button10
             GUICtrlSetState($Button9,$GUI_ENABLE)
     $temp_crool = GUICtrlRead($Input1)
     $affichage_paris_effectuer = GUICtrlRead($Input2)
     $temp_pour_charge_tout_paris = GUICtrlRead($Input3)
     $coup_de_scrool = GUICtrlRead($Input4)
 Case $Button9
     GUISetState(@SW_HIDE)
     GUISwitch($Form1_parent)
     GUICtrlSetState($Button9,$GUI_DISABLE)

    EndSwitch
    WEnd

;~ **********************************************************************************************************************************
;~ **********************************************************************************************************************************
;~ **********************************************************************************************************************************
;~ **********************************************************************************************************************************
;~ **********************************************************************************************************************************
;~ **********************************************************************************************************************************
;~ **********************************************************************************************************************************
;~ **********************************************************************************************************************************
;~ **********************************************************************************************************************************

Func bot()
    $somme = InputBox("","mise € attention cette somme sera mise a chaque paris")
ToolTip("creer par *****", 80,80 ,"createur")
MsgBox(64, "bot paris automatique", "EVITER DE TOUCHER LA SOURIS!!" & @CRLF & "mettez vous en plein ecran" & @CRLF & "et connecter vous et mettez vous dans les paris" & @CRLF & "vous avez 5 seconde apres avoir cliquer sur ok")
Sleep($temp_pour_mettre_en_place_debut_en_gros)
$clic=PixelSearch(184, 408,323, 525, $clicc)
MouseClick("left",$clic[0], $clic[1],1, 0)
Do   ;.......................................................
Sleep($temp_crool)
    $jeparie=PixelSearch(188, 463, 709, 730, $0)
    If Not @error then
        $pariseffectuer = $pariseffectuer+1
MouseClick("left", $jeparie[0], $jeparie[1],1,0)
Sleep($temp_charge_paris)

$miseparis=PixelSearch(181, 413,559, 629, $1)
If Not @error then
    Sleep($temp_datente_entre_miseparis_et_selection)
MouseClick("left", $miseparis[0], $miseparis[1],1,10)
Sleep($temp_avant_misedefoz)
Send ($somme)
sleep($temp_pour_valider)
$valider=PixelSearch(548, 534,871, 666, $2)
MouseClick("left", $valider[0], $valider[1],1,0)
Sleep($temp_pour_charge_tout_paris)
Else
    MouseClick("left",385, 65)
Send("site")   
Send("{enter}")
Sleep($temp_pour_chargement_page_si_erreur)
$entrepage=PixelSearch(182, 461, 360, 712, $entrepage)
MouseClick("left", $entrepage[0], $entrepage[1])
EndIf
Else
    MouseWheel("down", $coup_de_scrool)
    $findepage = PixelGetColor( 495, 684)
EndIf
Until ($findepage = $couleurfindepage)


MsgBox(0,"paris effectuer","vous avez effectuer " & $pariseffectuer & " paris en tout pour l'instant", $affichage_paris_effectuer)

Remplacez la ligne de création de votre parents par celle ci :

Code : Tout sélectionner

$Form1_parent = GUICreate("bot paris autot", 633, 447, 192, 124)

je te remerci sa fonctionne

AutoIt Français

[R] Revenir sur la gui principale avec bouton fonctionnel

[R] Revenir sur la gui principale avec bouton fonctionnel

Re: [..] Revenir sur la gui principale avec bouton fonctionnel

Re: [..] Revenir sur la gui principale avec bouton fonctionnel

Re: [..] Revenir sur la gui principale avec bouton fonctionnel

Re: [..] Revenir sur la gui principale avec bouton fonctionnel

Re: [..] Revenir sur la gui principale avec bouton fonctionnel

Re: [..] Revenir sur la gui principale avec bouton fonctionnel

Re: [R] Revenir sur la gui principale avec bouton fonctionnel