AutoIt Français

Bonjours à tous, j'ai un probleme que je ne suis pas capable d'y remédier

-J'aimerais faire un GUI au lieu de un InputBox (Voir la ligne 54 dans mon code plus bas) ou sa:

;Demande quel est le chiffre
$entrer = InputBox("Question", "Quel est le chiffre entre " & $nb &  " et " & $nb2 & "?")

-Je suis pas capable de faire un GUI qui remplace le InputBox avec les $nb et $nb2

-Je suis pas capable avec le GUI qui remplace le InputBox de faire fonctionner le code corectement

Voici mon code Complet:

► Afficher le texteMini Jeux mes sans GUI au niveau de l'inputBox

Code : Tout sélectionner

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

$Form1 = GUICreate("Form1", 372, 106, 192, 124)
$oneplayer = GUICtrlCreateButton("Un Joueur", 8, 16, 172, 70, $BS_FLAT)
$twoplayer = GUICtrlCreateButton("Deux Joueurs", 192, 16, 172, 70, $BS_FLAT)
GUISetState(@SW_SHOW)

$Form2 = GUICreate("De quoi à quoi?", 228, 150, 193, 124)
$nbcase = GUICtrlCreateInput("Le plus petit chiffre ici", 48, 40, 129, 21)
$Label1 = GUICtrlCreateLabel("Le Plus Petit Chiffre", 32, 8, 164, 24)
GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
$MyButton1 = GUICtrlCreateButton("Ok", 8, 112, 68, 30, $BS_FLAT)
$MyButton2 = GUICtrlCreateButton("Annuler", 152, 112, 68, 30, $BS_FLAT)
GUISetState(@SW_HIDE)

$Form3 = GUICreate("De quoi à quoi?", 228, 150, 193, 124)
$nbcase2 = GUICtrlCreateInput("Le plus grand chiffre ici", 48, 40, 129, 21)
$Label2 = GUICtrlCreateLabel("Le Plus grand chiffre" , 32, 8, 180, 24)
GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
$MyButton3 = GUICtrlCreateButton("Ok", 8, 112, 68, 30, $BS_FLAT)
$MyButton4 = GUICtrlCreateButton("Annuler", 152, 112, 68, 30, $BS_FLAT)
GUISetState(@SW_HIDE)
$Form4 = GUICreate("Quel est le chiffre?", 341, 175, 192, 124)
$entrer = GUICtrlCreateInput("Quel est le chiffre?", 24, 56, 281, 21)
$Label3 = GUICtrlCreateLabel("Quel est le chiffre entre ?", 32, 8, 274, 28)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$MyButton5 = GUICtrlCreateButton("Ok", 8, 136, 100, 30, $BS_FLAT)
$MyButton6 = GUICtrlCreateButton("Indice", 120, 136, 100, 30, $BS_FLAT)
$MyButton7 = GUICtrlCreateButton("Annuler", 232, 136, 100, 30, $BS_FLAT)
GUISetState(@SW_HIDE)


While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
;Button un joueur
        Case $oneplayer
GUISetState(@SW_SHOW,$Form2)
Case $MyButton1, $nbcase
$nb = GUICtrlRead($nbcase)
GUISetState(@SW_HIDE, $Form2)
GUISetState(@SW_SHOW, $Form3)
Case $MyButton3, $nbcase2
$nb2 = GUICtrlRead($nbcase2)
GUISetState(@SW_HIDE, $Form3)

;Donne un chiffre au hazard
$chiffre = Random($nb, $nb2, 1)
   while 1
;Demande quel est le chiffre
$entrer = InputBox("Question", "Quel est le chiffre entre " & $nb &  " et " & $nb2 & "?")

;Regarde si on a la bonne réponse
If Number($entrer) = $chiffre Then
    MsgBox(0,"Réponse","Bonne Réponse! La réponse était bien " & $chiffre)
 Exit
Else
 ;mauvaise réponse mais a cause du While il recommence
 MsgBox(0,"Mauvaise", "Mauvaise Réponse")
EndIf
WEnd
Case $twoplayer
  ;Minimum
    $nb = InputBox("De quoi à Quoi?", "Quel est le minimum chiffre possible?")
    if @error = 1 then
 Exit
EndIf
;Maximum
$nb2 = InputBox("De quoi à Quoi?", "Quel est le maximum chiffre possible?")
if @error = 1 then
 Exit
EndIf
;Donne un chiffre au hazard
$chiffre = Random($nb, $nb2, 1)

   while 1
;Demande quel est le chiffre
MsgBox(1,"Réponse", $chiffre)
$entrer = InputBox("Joueur 1", "Joueur 1: " & @CRLF & "Quel est le chiffre entre " & $nb & " et " & $nb2 & " ?", "","*")
If @error = 1 then
 Exit
EndIf
;Regarde si on a la bonne réponse
If Number($entrer) = $chiffre Then
    MsgBox(0,"Réponse","Bonne Réponse! La réponse était bien " & $chiffre)
 Exit
Else
 ;mauvaise réponse mais a cause du While il recommence
 MsgBox(0,"Mauvaise", "Mauvaise Réponse")
EndIf

$entrer = InputBox("Joueur 2", "Joueur 2: " & @CRLF &"Quel est le chiffre entre " & $nb & " et " & $nb2 & " ?", "","*")
If @error = 1 then
 Exit
EndIf
;Regarde si on a la bonne réponse
If Number($entrer) = $chiffre Then
    MsgBox(0,"Réponse","Bonne Réponse! La réponse était bien " & $chiffre)
 Exit
Else
 ;mauvaise réponse mais a cause du While il recommence
 MsgBox(0,"Mauvaise", "Mauvaise Réponse")
EndIf
WEnd

EndSwitch
WEnd

EDIT IMPORTANT

Voici le GUI qui remplace le InputBox que j'aimerais

Code : Tout sélectionner

$Form4 = GUICreate("Quel est le chiffre?", 341, 175, 192, 124)
$entrer = GUICtrlCreateInput("Quel est le chiffre?", 24, 56, 281, 21)
$Label3 = GUICtrlCreateLabel("Quel est le chiffre entre " & $nb &  " et " & $nb2 & "?"", 32, 8, 274, 28)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$MyButton5 = GUICtrlCreateButton("Ok", 8, 136, 100, 30, $BS_FLAT)
$MyButton6 = GUICtrlCreateButton("Indice", 120, 136, 100, 30, $BS_FLAT)
$MyButton7 = GUICtrlCreateButton("Annuler", 232, 136, 100, 30, $BS_FLAT)
GUISetState(@SW_SHOW)

Merci beaucoup de votre aide

Code : Tout sélectionner

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

ConsoleWrite( _InputBoxX(10, 20) & @CRLF)

Func _InputBoxX($nb, $nb2)
    $Form4 = GUICreate("Quel est le chiffre?", 341, 175, 192, 124)
    $entrer = GUICtrlCreateInput("Quel est le chiffre?", 24, 56, 281, 21)
    $Label3 = GUICtrlCreateLabel("Quel est le chiffre entre " & $nb &  " et " & $nb2 & "?", 32, 8, 274, 28)
        GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
    $MyButton5 = GUICtrlCreateButton("Ok", 8, 136, 100, 30, $BS_FLAT)
    $MyButton6 = GUICtrlCreateButton("Indice", 120, 136, 100, 30, $BS_FLAT)
    $MyButton7 = GUICtrlCreateButton("Annuler", 232, 136, 100, 30, $BS_FLAT)
    GUISetState(@SW_SHOW)

    While 1
        $msg = GUIGetMsg()
        Switch $msg
            Case $MyButton7
                GUIDelete($Form4)
                Return -1
            Case $MyButton6
                ;# ajouter le code pour l'indice #
            Case $MyButton5
                $read = GUICtrlRead($entrer)
                GUIDelete($Form4)
                Return $read
        EndSwitch
    WEnd
EndFunc

Umm désoler je ne suis plus trop sur de comprendre

En gros j'aimerait ajouter le GUI a mon Code et remplacer l'ImputBox

Edit en faite j'aimerais juste que mon code reste identique mais que je remplace le inputBox par le GUI mais je n'y arrive pas..

Merci

si ta pas compris c'est que ton niveau en autoit est vraiment bas (sans vouloir te véxer)

Ce que je t donné c'est une fonction (_InputBoxX) elle prend 2 parametres: tes 2 nombres (max et min)

et pour l'utiliser, dans ton code, a la place de

Code : Tout sélectionner

$text = InputBox(...)

tu fait

Code : Tout sélectionner

$text = InputBoxX($min, $max)

Tout ca bien sur apres avoir ajouter le code de la foncion (c.a.d. ce qui commence de Func et qui se termine par EndFunc) ton ton script

AutoIt Français

[..] GUI à la place d'une InputBox

[..] GUI à la place d'une InputBox

Re: [..] GUI à la place d'une InputBox

Re: [..] GUI à la place d'une InputBox

Re: [..] GUI à la place d'une InputBox