[R] GUICtrlCreateList et Scroll horizontal

[Vins83]

Salut les jeunes,sa fart?

Voilà mon petit souci,un peu bete,mais y a un truc qui m'échappe sur un :

Code : Tout sélectionner

GUICtrlCreateList ( "" , 5 , 80 , 790 , 495 , BitOR ( $WS_VSCROLL , $WS_HSCROLL , $LBS_DISABLENOSCROLL ) )

Le Scroll ne fonctionne pas en horizontal.... et seulement en vertical... une idée?

[MiXS]

Ben ca va super
Mais le script ?

[Vins83]

Hello ,ben je pensé que c'était pas forcement important le reste a vrai dire...

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstants.au3>

;Variables
Global $Titre = "LiveCD"
Global $version = "0.0.1"
Global $7z = "7z.exe"

$CreateurISO = GUICreate ( "LiveCD" , 800 , 600 , - 1 , - 1 )
GUICtrlSetFont ( - 1 , 20 , 400 , 0 , "Arial" )
GUISetIcon ( @ScriptDir & "\LiveCD.exe" , 0 )
; dossier source
GUICtrlCreateLabel ( "Sélectionner le dossier Source I386 ( CD Microsoft Windows XP ) :" , 10 , 13 , 315 , 25 )
$InputDossierI386 = GUICtrlCreateInput ( "" , 325 , 10 , 440 , 20 , - 1 , $WS_EX_CLIENTEDGE )
$BouttonDossierI386 = GUICtrlCreateButton ( "..." , 770 , 9 , 25 , 22 )
; Créer le LiveCD
$BouttonCreerliveCD = GUICtrlCreateButton ( "Créer le LiveCD" , 5 , 40 , 260 , 30 )
; Vue de la Copie en cour
$livecd = GUICtrlCreateList ( "" , 5 , 80 , 790 , 495 , BitOR ( $WS_VSCROLL , $WS_HSCROLL , $LBS_DISABLENOSCROLL ) )
GUISetState ( @SW_SHOW )
While 1
$msg = GUIGetMsg ( )
Select
; Exit
Case $msg = $GUI_EVENT_CLOSE
Exit
; Boutton Dossier Source I386
Case $msg = $BouttonDossierI386
choisissezledossiersources ( )
; Créer le LiveCD
Case $msg = $BouttonCreerliveCD
creationdulivecd ( )
GUICtrlSetState ( $BouttonCreerliveCD , $gui_disable )
EndSelect
WEnd
; Choisissez le dossier Sources
Func choisissezledossiersources ( )
Local $ChoixDossier = FileSelectFolder ( "Choisissez le dossier Sources I386 de votre CD Windows XP" , "" )
If StringRight ( $ChoixDossier , 4 ) <> "I386" Then
MsgBox ( 4096 , "" , "Vous n'avez pas choisi le dossier nommé I386" , 3 )
choisissezledossiersources ( )
Else
GUICtrlSetData ( $InputDossierI386 , $ChoixDossier )
GUICtrlSetState ( $BouttonCreerliveCD , $gui_enable )
EndIf
EndFunc ; == >choisissezledossiersources
; Fonction de création du liveCD
Func creationdulivecd ( )

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Extraction des Drivers
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

; ADM8511.SYS
If Not FileExists ( GUICtrlRead ( $InputDossierI386 ) & "\driver.cab" ) Then
GUICtrlSetData ( $livecd , 'Extraction de "' & GUICtrlRead ( $InputDossierI386 ) & '\driver.cab\ADM8511.SYS" a échoué' )
Else
RunWait ( '"' & @ScriptDir & '\7z.exe" - y x "' & GUICtrlRead ( $InputDossierI386 ) & '\driver.cab" - o"' & @ScriptDir & '\LiveCD\i386\system32\DRIVERS\" ADM8511.SYS ADPTSF50.SYS - r' , '' , @SW_HIDE )
GUICtrlSetData ( $livecd , 'Extraction de "' & GUICtrlRead ( $InputDossierI386 ) & '\driver.cab\ADM8511.SYS" vers "' & @ScriptDir & '\LiveCD\i386\system32\DRIVERS\ADM8511.SYS"' )
EndIf

EndFunc ; == >creationdulivecd

Voilà les jeunes,et merci pour votre aide.

[MiXS]

Ben j'ai essayé chez moi et c'est pareil !
J'ai cherché un peu sur le net et j'ai pas trouvvé grand chose a ce sujet (peut-etre qu'il y a quelque chose mais j'ai pas vu) !
Enfin bon j'aimerais bien savoir moi aussi car la c'est bizarre !

[arrkhan]

Plop,

le sujet à déja été abordé sur ce forum il me semble (ou sur l'ancien)

Allez donc faire un tour par ici = http://www.autoitscript.com/forum/index ... opic=34433

[ani]

bonjour,

Alors je vais vous donner une petite aide supplémentaire, lors d'un problème simple ou complexe, rien ne sert de faire des recherches sur le web, les solution se trouve dans l'aide, rien ne vous empeche d'y faire une recherche sur les mots clé comme $WS_VSCROLL , $WS_HSCROLL , $LBS_DISABLENOSCROLL, vous y trouverez divers exemple et des fonction dont vous n'utilisez pas, si ca ne fonctionne toujours pas, aller sur le site de l'éditeur faite une recherche avec les mots clé, si la recherche n'amène à rien, faite la demande ici :p

déclare le dim

Code : Tout sélectionner

dim $livecd
$livecd=GUICtrlCreateList ( "" , 5 , 80 , 790 , 495 , $WS_VSCROLL + $WS_HSCROLL)

ou

Code : Tout sélectionner

$livecd = GUICtrlCreateList ( "" , 5 , 80 , 790 , 495 , BitOR ( $WS_VSCROLL , $LBS_DISABLENOSCROLL , $WS_HSCROLL ) )

ou bien utiliser un GUICtrlCreateEdit a la place du GUICtrlCreateList .

regarder l'include GuiEdit.au3 qui dispose de pas mal d'ajout, ma version n'est pas ajour