je prends concience que "OpenFileRequester" permet de choisir des fichiers. Mais ce que j'aimerais, c'est qu'il choisisse un dossier. A mon avis, c'est une autre instruction qu'il faut utiliser... Mais laquelle ?
Merci d'avance
Code : Tout sélectionner
OpenWindow(0, 0, 0, 749, 515, "ImageGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
Global Repertoire$
calcul=0
OptionGadget(13, 16, 400, 190, 20, "Crypter/Décrypter au même endroit.")
OptionGadget(14, 16, 420, 122, 20, "Crypter/Décrypter ici :")
SetGadgetState(13, 1)
StringGadget(15, 142, 420, 540, 20, "")
ButtonGadget(16, 690, 420,43,20,"Open")
; Si clic gauche sur l'arbre ou déplacement avec les flèches, alors afficher les fichiers dans la fenêtre liste fichiers
;Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
Repeat
Evenement = WindowEvent()
If Evenement = #PB_Event_Gadget
If EventGadget()=16
file.s=OpenFileRequester("Choisissez un dossier",GetCurrentDirectory(),"",1) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; tout faux !! ='(
EndIf
window_event = WaitWindowEvent(5) ;changing the progressbar's will always cause this to catch an event
While window_event <> 0
If window_event = #PB_Event_CloseWindow : Break 2: EndIf
window_event = WindowEvent()
Wend
EndIf
Delay(5)
Until Evenement = #PB_Event_CloseWindow
End
;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;