Page 1 sur 1
qui peux m'aider pour un programme svp
Publié : dim. 25/juil./2004 12:10
par jbernard13
bonjour
je voudrais comment creer une application qui qunad je cliquerai sur le bouton search
me vera apparaitre le contenu du repertoire temp
er apres je pourrais effacer les fichiers contenu dans ce repertoire
mais voila je sais pas faire ça avec pure basic ....
merci
Jbernard13
Publié : dim. 25/juil./2004 12:40
par Backup
tu veux que tous les fichier s'efface tous seul? ou tu veux pouvoir effacer certain fichiers et pas d'autres ?
parceque dans ce dernier cas je t'orienterai vers les Requester (voir doc du pure)
et la fonction
Resultat = DeleteFile(NomFichier$)
(vraiment pas dur a faire !! )
Publié : dim. 25/juil./2004 12:52
par jbernard13
ce que faire
c'est de cliquer sur un bouton
et le contenu du repertoire s'affiche
et densuite de choir les fichiers que veux supprimer
Publié : dim. 25/juil./2004 13:40
par Backup
et voila !!!
Code : Tout sélectionner
; by dobro
;- Window Constants
;
Enumeration
#Window
EndEnumeration
;- Gadget Constants
;
Enumeration
#Button
EndEnumeration
Procedure Open_Window()
If OpenWindow(#Window, 329, 152, 193, 83, #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar , "repertoire")
If CreateGadgetList(WindowID())
ButtonGadget(#Button, 40, 20, 111, 36, "repertoire")
EndIf
EndIf
EndProcedure
Open_Window()
Repeat
Event = WaitWindowEvent()
If Event = #PB_EventGadget
;Debug "WindowID: " + Str(EventWindowID())
GadgetID = EventGadgetID()
If GadgetID = #Button
;c:\WINDOWS\Temp
NomFichier$ = OpenFileRequester("efface un fichier choisie", "c:\WINDOWS\Temp\", "*.*", 0 , #PB_Requester_MultiSelection)
Resultat = DeleteFile(NomFichier$)
EndIf
EndIf
Until Event = #PB_EventCloseWindow
End
;
Publié : dim. 25/juil./2004 14:53
par jbernard13
merci
peux me commenter le code
merci bien
Jbernard
Publié : dim. 25/juil./2004 15:17
par jbernard13
et comencer progammer un bouton recherche d'un fichier sur le disque dur ?
merci
Publié : dim. 25/juil./2004 17:12
par Lukky
He Dobro ensuite si t'as deux minutes, tu veux pas passer un p'tit coup d'aspirateur chez moi ?
JL
Publié : dim. 25/juil./2004 17:44
par Backup
Publié : dim. 25/juil./2004 19:15
par Lukky
Heee t'es pas fou de mettre ça sur le forum !!
T'imagine si ma femme voit ça les mauvaises idées que ça pourrait lui donner !!
Briseur de ménage
JL
Publié : dim. 25/juil./2004 21:10
par jbernard13
arreter un peu de polluer les messages
OK
Publié : dim. 25/juil./2004 21:13
par julien
Dobro se déchaine...
