Delphi 6: Réalisation d'un explorateur de fichiers



Ce tutoriel ayant été réalisé avec la version américaine de Delphi, il est possible qu'il existe des différences entre les textes des éléments utilisés dans cet article et ceux de Delphi 6 version française. Pour cette raison, et pour éviter des traductions approximatives, je donnerais le texte américain...

La réalisation d'un mini-explorateur de fichiers est très simple grâce aux nouveaux composants de Delphi 6. Il suffit de choisir les bons composants, et le tour est joué !!!


Mise En place de l'interface

Placez tout d'abord un composant TCoolBar (onglet Win32) sur votre fiche.



Il sera automatiquement placé dans le haut de votre fiche. Ce composant servira à stocker la ComboBox. Sélectionnez maintenant un composant "TShellComboBox" (onglet "Samples") et placez-le dans la TCoolBar.



Vous verrez qu'une ligne de composant a été créée automatiquement dans la TCoolBar, mais qu'il reste un grand espace gris. Pour le supprimer, sélectionnez la TCoolBar et mettez sa propriété "AutoSize" sur True. Vous verrez désormez que le composant "TShellComboBox" occupe la totalité du composant.



Maintenant, placez un composant TSplitter (onglet "Additionnal") sur votre fiche. Par défaut, il occupe une collone complète à gauche de votre fiche. Mettez sa propriété "Align" sur alTop, et mettez sa propriété "Height" sur 3. Ce composant servira à séparer notre colonne du reste des composants.



Placez un composant "TShellTreeView" (onglet "Samples") sur la gauche de votre fiche.



Placez un composant "TShellListView" (onglet "Samples") sur la droite de votre fiche.



Mettez la propriété "Align" de votre "TShellTreeView" sur "alLeft". A présent, placez à nouveau un composant "TSplitter" (onglet "Additionnal") sur votre fiche, et mettez sa propriété "Width" sur 3. Enfin, Sélectionnez le composant "TShellListView" et mettez sa propriété "Align" sur "alClient".

Liaison des composants

Si vous executez votre application à ce stade (touche F9), vous verrez qu'elle est tout à fait fonctionnelle, mais que chacun des 3 composants de gestion de fichier fonctionne indépendemment des 2 autres, or ce que nous voulons est justement qu'ils interagissent. Il faut donc lier les composants entre eux. Sélectionnez le composant "TShellTreeView", et mettez sa propriété "ShellComboBox" sur votre ComboBox, et mettez sa propriété "ShellListView" sur votre ListView.



A présent, executez à nouveau votre application (touche F9). Voilà, vous pouvez sélectionner un répertoire dans n'importe lequel des 3 composants, les 2 autres sont actualisés automatiquement.


Pauffinage


A présent que votre application est fonctionnelle, il ne reste plus qu'à travailler un peu le look !!! Tout d'abord, ajoutez un composant "TStatusBar" (onglet Win32) et placez-le sur votre fiche. Il sera automatiquement placé en bas de la fiche, et il apportera une petite touche visuelle non négligeable...



Puis, ajoutez un composant "TMainMenu", et ajoutez un élément de menu "Quitter". Même avec un seul élément de menu, votre application aura meilleure allure...



Enfin, réglez la propriété "ViewStyle" de votre "TShellListView" de sorte à obtenir votre type de vision préférée.



Et voilà, c'est tout ce qu'il y a à savoir pour réaliser un explorateur... compliqué, non ?


3 requête(s) SQL executée(s) en 0.001 Secs - Temps total de génération de la page : 0.007 Secs