[..] Rechercher et sauvegarder (Search & Save)

Aide sur les Interfaces Graphique Utilisateurs (GUI).
Règles du forum
.
Répondre
Avatar du membre
SmErT
Niveau 2
Niveau 2
Messages : 21
Enregistré le : jeu. 05 nov. 2009 11:15
Localisation : Algérie
Status : Hors ligne

[..] Rechercher et sauvegarder (Search & Save)

#1

Message par SmErT »

Salut a tous,

voila j'ai réaliser une petite GUI qui se base sur l'UDF FileListToArrayNT.
dont voila le

Code : Tout sélectionner

#NoTrayIcon

#include <Array.au3>
#include <FileListToArrayNT.au3>
#include <File.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Search & Save", 613, 433, 350, 219)

$Label1 = GUICtrlCreateLabel("Emplacement :", 24, 16, 120, 20)
$emplacement = GUICtrlCreateInput("C:\;D:\..:\;X:", 130, 16, 169, 24)

$Label2 = GUICtrlCreateLabel("Nom Fichier :", 24, 48, 120, 20)
$nom_fichier = GUICtrlCreateInput("*.txt", 130, 48, 169, 24)


$Label3 = GUICtrlCreateLabel("Enregistre sous :", 24, 80, 120, 20)
$Input3 = GUICtrlCreateInput("c:\k.txt", 130, 80, 169, 24)

$Label4 = GUICtrlCreateLabel("Liste des Fichiers trouver :", 24, 128, 180, 20)
$List1 = GUICtrlCreateList("", 24, 160, 553, 214)

$Recherce = GUICtrlCreateButton("Recherce", 512, 16, 75, 25)
$Enregistre = GUICtrlCreateButton("Enregistre", 336, 392, 75, 25)
$Annuler = GUICtrlCreateButton("Annuler", 424, 392, 75, 25)
$Quitter = GUICtrlCreateButton("Quitter", 512, 392, 75, 25)

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Recherce
            $sPath = GUICtrlRead($emplacement)
            $sFilter = GUICtrlRead($nom_fichier)
            $iRetItemType = 0
            $iRetPathType = 0
            $bRecursive = true
            $sExclude = ""
            $iRetFormat = 1
            $sFile = GUICtrlRead($Input3)
            ;Recherches des fichies avec les extantion  "*.mp3;*.ogg;*.wma;*.acc;*.flv;*.mkv;*.avi;*.wmv;*.ogm"
            $search=_FileListToArrayNT($sPath, $sFilter, $iRetItemType, $iRetPathType, $bRecursive, $sExclude, $iRetFormat)
            ;Creation de la liste de fichier rechercher.
            $s_search=_ArrayToString($search)
            GUICtrlSetData($List1, $s_search)

        Case $Enregistre
            _FileWriteFromArray($sFile, $search, 1)
        Case $Annuler
        Case $Quitter
            Exit

    EndSwitch
WEnd
 
L'interface se comporte comme suit:

En introduit:
1) Le chemin
2) Le nom de fichier,filtre...
3) le chemin et le nom de fichier a enregistre

a la fin en peut enregistre la liste de la recherche 3).

donc si vous accepter votre mission :P de bien vouloir m'aider a amélioré cette GUI.

par exemple d'ajouter des filtres de recherche comme
la taille: <,> ou entre min et max
la date: de la création, modification...

aaa il y a t-il un moyen d'arrêter la recherche avec le bouton Annule.

merci.
Répondre