Batch Index du Forum
S’enregistrerRechercherFAQMembresGroupesConnexion
Répondre au sujet Page 1 sur 1
[Code source] Double Clic sur une listbox
Auteur Message
Répondre en citant
Message [Code source] Double Clic sur une listbox 
Bonjour
voici une façon de faire un double clic sur une listview et de lancer une action Very Happy
ne pas oublier de telecharger l'udf ici

Code:

#include <Array.au3>
#include <FileListToArray3.au3>
; télécharger l'udf : http://www.google.ch/url?sa=t&rct=j&q=filelisttoarray3.au3&source=web&cd=2&ved=0CDQQFjAB&url=http%3A%2F%2Fwww.autoitscript.com%2Fforum%2Findex.php%3Fapp%3Dcore%26module%3Dattach%26section%3Dattach%26attach_id%3D21285&ei=26nsTpGaE4qB4ATh38nxCA&usg=AFQjCNGIIpbqqcjaSFOVaesS02K-wtrnkg&sig2=pB4Ygm7XY4AshSu2I3wVIw&cad=rja

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

GUIRegisterMsg($WM_COMMAND, "DoubleClick")
; lire http://www.autoitscript.com/autoit3/docs/functions/GUIRegisterMsg.htm

Global $LBN_DBLCLK
Global $Path = @DocumentsCommonDir
Local $color = 0xFFFFFF

;GUI PRINCIPAL
Global $Gui = GUICreate("Double clic sur une listview", 345, 218, 192, 124)
$backgroundColor = GUISetBkColor($color, $Gui)
Global $ListFile = GUICtrlCreateList("", 5, 5, 335, 200)
GUISetFont(8, 10, 400, 0, "MS Sans Serif")
GUISetState(@SW_SHOW, $Gui)

$ar_Array = _FileListToArray3($Path, "*.*", 2, 0, 0, "Drivers|Adobe Pdf") ; permet de lister tous le contenu du dossier indiqué à l'exception de Drivers et adobe pdf, les dossiers doivent être séparé par |
GUICtrlSetData($ListFile, _ArrayToString($ar_Array, "|", 1), $ar_Array[1]) ; affichage dans la listebox du résultat.
Do
   $Msg = GUIGetMsg()
Until $Msg = $GUI_EVENT_CLOSE



Func DoubleClick($hWnd, $iMsg, $iwParam, $ilParam)
   Local $iIDFrom, $iCode
   $iIDFrom = BitAND($iwParam, 0xFFFF) ; Low Word
   $iCode = BitShift($iwParam, 16) ; Hi Word
   Switch $iCode ; Controle du iCode
      Case 2 ; <= Double clic
         Switch $iIDFrom
            Case $ListFile
               $DossierSelectionne = GUICtrlRead($ListFile)
               msgbox(0,"Dossier","Dossier sélectionné est : " & $DossierSelectionne)
               ;Exit
         EndSwitch
   EndSwitch
EndFunc   ;==>DoubleClick







______________________________________________________
Faites paraitre votre batch sur BatchClipboard
Visiter le site web du posteur
Message Publicité 
PublicitéSupprimer les publicités ?


Répondre en citant
Message [Code source] Double Clic sur une listbox 
Lister le contenu d'un dossier : http://batch.xoo.it/t1659-Q-Lister-le-contenu-d-un-dossier.htm




______________________________________________________
Faites paraitre votre batch sur BatchClipboard
Visiter le site web du posteur
Message [Code source] Double Clic sur une listbox 


Montrer les messages depuis:
Répondre au sujet Page 1 sur 1
  



Index | créer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Copyright 2008 - 2016 // Batch