Donc en ce moment je bloque sur le fait que j’aimerai que par un simple glissé de fichier ou un copier collé, les fichiers ce mette dans la files d’attente dans le menu déroulant a gauche de mon application.
Voici un aperçu du programme.
http://img10.hostingpics.net/pics/312504b.png
Voici mon code
Code : Tout sélectionner
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$structure = GUICreate("", 695, 250)
$MenuItem1 = GUICtrlCreateMenu("&Langue")
$MenuItem3 = GUICtrlCreateMenuItem("Français", $MenuItem1)
$MenuItem2 = GUICtrlCreateMenu("&Aide")
$MenuItem5 = GUICtrlCreateMenuItem("FAQ", $MenuItem2)
$MenuItem4 = GUICtrlCreateMenuItem("Condition général", $MenuItem2)
$MenuItem6 = GUICtrlCreateMenuItem("A propos", $MenuItem2)
$gauche = GUICtrlCreateGroup("", 0, -8, 217, 249)
$texte = GUICtrlCreateLabel("Déposé ici vos fichiers à extension :", 8, 8, 211, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Verdana")
$liste = GUICtrlCreateList("", 8, 48, 201, 175)
GUICtrlSetFont(-1, 8, 800, 0, "Verdana")
GUICtrlSetBkColor(-1, 0xFFFFE1)
$texte2 = GUICtrlCreateLabel("htm / html / css / js / php.", 8, 24, 152, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Verdana")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$droite = GUICtrlCreateGroup("", 216, -8, 497, 249)
$texte3 = GUICtrlCreateLabel("Sélectionné le dossier de destination des fichiers une foie la compression terminé.", 224, 8, 474, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Verdana")
$barre = GUICtrlCreateProgress(225, 72, 465, 17)
$compression = GUICtrlCreateButton("Compression", 224, 96, 139, 49)
GUICtrlSetFont(-1, 12, 800, 0, "Verdana")
$texte4 = GUICtrlCreateLabel("Cliqué sur compression pour lancer la compression. ", 225, 51, 305, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Verdana")
GUICtrlSetCursor (-1, 2)
$parcourir = GUICtrlCreateButton("Parcourir", 616, 24, 75, 20)
GUICtrlSetFont(-1, 8, 800, 0, "Verdana")
$destination = GUICtrlCreateInput("", 225, 24, 385, 21)
GUICtrlSetFont(-1, 8, 400, 0, "Verdana")
GUICtrlSetBkColor(-1, 0xFFFFE1)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $parcourir
GUICtrlSetData($destination,FileSelectFolder("Sélectionné le dossier de destination des fichiers une foie la compression terminé.", ""))
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

