AutoIt Français

Bonjour,

J'aimerais créer un petit programme qui me permet d'entrer des données et de les conserver dans une Liste qui a pour but d'être consulter régulièrement.

Cependant je n'arrive pas à faire en sorte que les données saisie sont envoyer dans la liste.

Voici mon code :

Code : Tout sélectionner

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
Global $data
Global $Form1 = GUICreate("MyIntervention", 620, 441, 192, 124)
Global $List1 = GUICtrlCreateList("", 0, 0, 617, 409)
Global $Input1 = GUICtrlCreateInput($data, 5, 416, 540, 21)
Global $button1 = GUICtrlCreateButton("Send", 550, 416, 65, 22)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###






While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg

        Case $button1
            If GuictrlRead($Input1) = $data Then
                MsgBox(0, "test", "test")
            EndIf




  Case $GUI_EVENT_CLOSE
   Exit

 EndSwitch
WEnd

La msgbox ici sert uniquement de test pour voir si le programme arrive bien à lire ce que j'écrit dans le input lorsque je clique sur "send" mais apparemment il ne lit même pas ce que j'entre dans le input.

Pouvez m'éclairer et m'expliquer le fonctionnement des commandes qui me permettrait de réaliser ce petit soft ?

Cordialement Ks10

Bonjour,

DAns votre code :

Case $button1
If GuictrlRead($Input1) = $data Then
MsgBox(0, "test", "test")
EndIf

$data est déclaré mais vide donc votre condition ne peux être juste votre msgbox ne peux pas s'afficher.

j'ai corriger votre code si dessou (en laissant la msgbox mais en supprimant la condition)

Code : Tout sélectionner

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
Global $data
Global $Form1 = GUICreate("MyIntervention - GESA", 620, 441, 192, 124)
Global $List1 = GUICtrlCreateList("", 0, 0, 617, 409)
Global $Input1 = GUICtrlCreateInput($data, 5, 416, 540, 21)
Global $button1 = GUICtrlCreateButton("Send", 550, 416, 65, 22)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg

            Case $button1

                MsgBox(0, "test", GuictrlRead($Input1))
                GUICtrlSetData($List1,GuictrlRead($Input1))
                GUICtrlSetData($Input1,'')


  Case $GUI_EVENT_CLOSE
   Exit

 EndSwitch
WEnd

Merci =)

AutoIt Français

[R] GuiCtrlCreateList je n'arrive pas à envoyer les données

[R] GuiCtrlCreateList je n'arrive pas à envoyer les données

Re: [..] GuiCtrlCreateList je n'arrive pas à envoyer les don

Re: [..] GuiCtrlCreateList je n'arrive pas à envoyer les don