AutoIt Français

Code : Tout sélectionner

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:lien secret ;)
$Form2 = GUICreate("Dialog", 315, 234, 247, 189)
GUISetIcon("D:\003.ico")
$GroupBox1 = GUICtrlCreateGroup("", 8, 1, 297, 193)
$Plein = GUICtrlCreateCheckbox("Plein écran", 16, 168, 73, 17)
$Label1 = GUICtrlCreateLabel("Nom du joueur nord", 96, 24, 97, 17)
$Input1 = GUICtrlCreateInput("Input1", 88, 40, 121, 21)
$Input2 = GUICtrlCreateInput("Input2", 16, 112, 121, 21)
$Label2 = GUICtrlCreateLabel("Nom du joueur Ouest", 24, 96, 104, 17)
$Input3 = GUICtrlCreateInput("Input3", 176, 112, 121, 21)
$Label3 = GUICtrlCreateLabel("Nom du joueur est", 192, 96, 90, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("&OK", 9, 203, 75, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("&Cancel", 226, 203, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

    EndSwitch
WEnd

Code : Tout sélectionner

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\users\jeu de dame.kxf
$Form2 = GUICreate("Dialog", 315, 234, 247, 189)
GUISetIcon("D:\003.ico")
$GroupBox1 = GUICtrlCreateGroup("", 8, 1, 297, 193)
$Plein = GUICtrlCreateCheckbox("Plein écran", 16, 168, 73, 17)
$Label1 = GUICtrlCreateLabel("Nom du joueur nord", 96, 24, 97, 17)
$Inputa = GUICtrlCreateInput("Input1", 88, 40, 121, 21)
$Inputb = GUICtrlCreateInput("Input2", 16, 112, 121, 21)
$Label2 = GUICtrlCreateLabel("Nom du joueur Ouest", 24, 96, 104, 17)
$Inputc = GUICtrlCreateInput("Input3", 176, 112, 121, 21)
$Label3 = GUICtrlCreateLabel("Nom du joueur est", 192, 96, 90, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("&OK", 9, 203, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
;on cache les inputs, case et boutons
GUICtrlSetState ( $Inputb,$GUI_DISABLE)
GUICtrlSetState ( $Inputc,$GUI_DISABLE)
GUICtrlSetState ( $Plein,$GUI_DISABLE)
GUICtrlSetState ( $Button1,$GUI_DISABLE)


; jusque là j'ai créé mon interface ca ce n'étais pas trop dur j'ai utiliser koda. Mais j'ai compris comment cela fonctionne c'est le principale.

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

        ; Voilà c'est ici que je commence à m'en mêlé les pinceaux...
        ; ce que j'aimerais c'est dire au programme : si l'utilisateur à marquer autre chose que Input1, enregistrer et contrôler la cellule suivante. (si l'utilisateur ne tape rien, ne pas utiliser le $Button1...) (mais bloquer une fonction j'ai aucune idée de comment faire)
        ; J'ai bien entendus été voir dans help mais ca m'aide pas il y a des millier de code et donc je ne sais pas auquel me référencer :/

        Case $Inputa
            If GUICtrlRead ( $Inputa ) <> "Input1" Then GUICtrlSetState ( $Inputb,$GUI_ENABLE);on fait apparaître le deuxième input si diff de Input1

        Case $Inputb
            If GUICtrlRead ( $Inputb ) <> "Input2" Then GUICtrlSetState ( $Inputc,$GUI_ENABLE);on fait apparaître le troisième input si diff de Input2

        Case $Inputc
            If GUICtrlRead ( $Inputc ) <> "Input3" Then;on fait apparaître la case à coher si diff de Input3
            GUICtrlSetState ( $Plein,$GUI_ENABLE)
            EndIf

        Case $Plein
            If _IsChecked($Plein) Then
                Msgbox(0,"Info","Case cochée !",2)
                GUICtrlSetState ( $Button1,$GUI_ENABLE)
            Else
                Msgbox(0,"Info","Case non cochée !",2);on fait apparaître le bouton si case est cochée
            EndIf

        Case $Button1
            $Inputa0 = GUICtrlRead ( $Inputa )
            $INputb0 = GUICtrlRead ( $Inputb )
            $Inputc0 = GUICtrlRead ( $Inputc )
            Run ("C:\Program Files\Microsoft Games\Hearts.exe")
            WinWaitActive ("Dame de Pique")
            Send("{F5}")
            MouseClick ( "Left" , 1068, 389 , 1 , 50  )
            Send ( "{Ctrl+a}" & "{DEL}" & $Inputa0 & "{TAB}" & "{CTRL+a}" & "{DEL}"& $Inputb0 & "{TAB}" & "{CTRL+a}" & "{DEL}" & $Inputc0 & "{ENTER}" )

            ; Ici j'ai voulu lui dire que si la case est cochée, effectuer le click en plus mais si elle ne l'est pas je sais pas quoi lui dire alors j'ai mis une MsgBox... un peux lamentable vous avouerez :/
            ; mais je comprend pas même sur le site du zéro comment exploiter correctement les commande donné car ils utilise des MsgBox et non des commande. j'ai compris comment ca fonctionne les MsgBox mais ca m'en dit pas plus dans l'utilisation d'un programme.

            if GUICtrlRead ($Plein) = $GUI_CHECKED then
                MouseClick ( "Left" , 1503, 194 , 1 , 50  )
            Else
                MsgBox(0,"MisterASUS", "Bon jeu !")
            Endif


    EndSwitch
WEnd

Func _IsChecked($control)
    Return BitAND(GUICtrlRead($control), $GUI_CHECKED) = $GUI_CHECKED
EndFunc ;==>_IsChecked

Code : Tout sélectionner

FileExists ( $Ini_dir )
GUICtrlSetData ( $Inputa, IniRead ( $Ini_dir, "Dialog", "Nom du joueur nord", "Input2" ) )
GUICtrlSetData ( $Inputb, IniRead ( $Ini_dir, "Dialog", "Nom du joueur ouest", "Input1" ) )
GUICtrlSetData ( $Inputc, IniRead ( $Ini_dir, "Dialog", "Nom du joueur est", "Input3" ) )

Case $Sauvegarder
            If FileExists ( $Ini_dir ) Then IniDelete ( $Ini_dir, "Dialog" )
            IniWrite ( $Ini_dir, "Dialog", "Nom du joueur nord", GUICtrlRead ( $Inputa ) )
            IniWrite ( $Ini_dir, "Dialog", "Nom du joueur ouest", GUICtrlRead ( $Inputb ) )
            IniWrite ( $Ini_dir, "Dialog", "Nom du joueur est", GUICtrlRead ( $Inputc ) )

Code : Tout sélectionner

$MyIni = @scriptdir & "\myini.ini"   ; définit le fichier ini

If FileExists ($MyIni) Then 
    GUICtrlSetData ($Inputa, IniRead ($MyIni , "Dialog", "Nom du joueur nord", "Input2") )
    GUICtrlSetData ($Inputb, IniRead ($MyIni , "Dialog", "Nom du joueur ouest", "Input1") )
    GUICtrlSetData ($Inputc, IniRead ($MyIni , "Dialog", "Nom du joueur est", "Input3") )
EndIf

Case $Sauvegarder      ; si le fichier ini n'existe pas, il sera créé et/ou mis à jour automatiquement
    IniWrite ($MyIni , "Dialog", "Nom du joueur nord", GUICtrlRead ($Inputa) )
    IniWrite ($MyIni , "Dialog", "Nom du joueur ouest", GUICtrlRead ($Inputb) )
    IniWrite ($MyIni , "Dialog", "Nom du joueur est", GUICtrlRead ($Inputc) )