Réalisation d'un explorateur de fichiers

L'auteur

Site personnel

Liens sociaux

Viadeo Twitter Facebook Share on Google+   

I. Introduction

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é !!!

II. Mise En place de l'interface

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

Image non disponible

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.

Image non disponible

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.

Image non disponible

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.

Image non disponible

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

Image non disponible

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

Image non disponible

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".

III. 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.

Image non disponible

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.

IV. 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...

Image non disponible

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...

Image non disponible

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

Image non disponible

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

Liste de mes articles :
Delphi 6 : Réalisation d'un explorateur de fichiers
Delphi 6 : Création d'un menu 'à la Office 2000'
Delphi 7: Réaliser un Client FTP à l'aide des composants Indy
Delphi 7 : Donner le style Windows XP à vos applications sous Windows XP
Portage d'applications CLX entre Delphi 6 et Kylix
Tri par Sélection
Ce document est issu de http://www.developpez.com et reste la propriété exclusive de son auteur. La copie, modification et/ou distribution par quelque moyen que ce soit est soumise à l'obtention préalable de l'autorisation de l'auteur.