Creer une sorte de console en AutoIT

[Fermé]
Signaler
Messages postés
131
Date d'inscription
samedi 30 octobre 2010
Statut
Membre
Dernière intervention
3 avril 2017
-
Bonjour,

Bon voilà je fais un certain script et je voudrai afficher ce que fait le ligiciel en temps réel dans un Edit par exemple afficher un test ping a google genre ping google : ok et en dessous par exemple connexion au serveur ftp mais sais effacer les infos précédentes voilà un bout du code :/

http://puu.sh/4kLho/872e0a850f.png

#include <ButtonConstants.au3>

#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiStatusBar.au3>
#include <ProgressConstants.au3>
#include <WindowsConstants.au3>



#Region ### START Koda GUI section ### Form=D:SimonDocumentsDropboxTeamScriptinterface.kxf
Global $Form1 = GUICreate("TeamSpeak auto-install By K3nix", 571, 321, 266, 254)
Global $MenuItem1 = GUICtrlCreateMenu("&Fichier")
Global $MenuItem2 = GUICtrlCreateMenu("&Options")
Global $MenuItem3 = GUICtrlCreateMenu("&Aide")
Global $Zone_info = GUICtrlCreateEdit("", 24, 16, 361, 105, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$WS_VSCROLL))
GUICtrlSetData(-1, "Bienvenue dans Teamspeak Auto-install !") ;& @CRLF & @CRLF & "Veuillez choisir vos options...");Cadre de gauche


GUICtrlSetBkColor(-1, 0xFFFFFF)
Global $Serveur = GUICtrlCreateCheckbox("Installer TS server", 216, 232, 129, 25)
Global $TraductionFr = GUICtrlCreateCheckbox("Traduire en Français", 32, 232, 169, 25)
Global $Informations = GUICtrlCreateGroup("Paramètres", 8, 176, 529, 89)
GUICtrlCreateGroup("", -99, -99, 1, 1)
Global $progressBar = GUICtrlCreateProgress(8, 144, 534, 17)
Global $Button1 = GUICtrlCreateButton("Installer", 384, 200, 145, 49)
GUICtrlSetState(-1, $GUI_DISABLE)
Global $systemInfo = GUICtrlCreateEdit("", 394, 17, 161, 105, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$WS_VSCROLL))
GUICtrlSetData(-1, "Information OS :")
GUICtrlSetBkColor(-1, 0xFFFFFF)
Global $StatusBar1 = _GUICtrlStatusBar_Create($Form1)
Global $Statut = GUICtrlCreateGroup("Statut", 8, 0, 553, 137)
GUICtrlCreateGroup("Version à télécharger ?", -99, -99, 1, 1)
Global $choixVersion = GUICtrlCreateCombo("Version à télécharger ?", 24, 200, 345, 25, BitOR($CBS_DROPDOWNLIST,$CBS_AUTOHSCROLL), $WS_EX_CLIENTEDGE)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

#cs

$Form1 = titre de la fenetre
$MenuItem1 Fichier
$MenuItem2 Options
$MenuItem3 = Aide
$Serveur = case serveur
$TraductionFr = case traduction
$progressBar = barre de progression
$Button1 = bouton installer
$choixVersion = combobox version

$Zone_info = edit de gauche
$systemInfo = edit de droite

#ce
GUICtrlSetData($Zone_info, ("test")) ; voilà le test a remplacé le message de bienvenue !