Yommexplorerocx pour ce qui veulent un vrai explorateur windows

Soyez le premier à donner votre avis sur cette source.

Vue 15 478 fois - Téléchargée 2 410 fois


Description

voilà après quelques temps de réflexion j'ai trouvé la solution à la première version de cette objet qui avait quelques problème une fois compilé...en effet, en DLL ActiveX, le projet ne fonctionnait plus, alors j'ai passé tout cela en ocx et là cela semble fonctionner...

petit rappel sur cet objet :

transformer un treeview en arborescence de répertoire , un listview en explorateur de fichier, le tout de manière interractive et en 2 lignes de code pour l'utilisateur !!! si, si je vous jure ;-)

Pour les explications des fonctionnalités alors :
le TVExplorer :
- gestion des icones réels des répertoires (même l'icone du CD-ROM qui change, la main sur les répertoires partagés, la flèche des raccourcis ...)
- choix du niveau de la racine de l'arborescence (Bureau, Poste de Travail...)
- choix d'un répertoire à ouvrir (ex : c:\windows)
- gestion du menu contextuel
- liaison avec une listview pour navigation synchronisée (ne pas confondre avec natation synchronisée!!!)

les 4 derniers paramètres sont modifiables au cours de l'execution.

le LVExplorer:
- choix du mode d'affichage (grands icones, liste...)
- choix du répertoire des fichiers
- choix de filtre sur les fichiers à afficher, le caractère de séparation étant le pipe = chr(124) (ex : "*.jpg|*.bmp" )
- choix d'inclure ou non les répertoires avec les fichiers
- utilisation du menu contextuel
  • cette option déclenche l'utilisation d'un menu popup sur les titres des colonnes en mode lvwReport(détail) pour afficher/masquer des colonnes
  • cette option déclenche l'utilisation d'un menu popup sur la zone vide du listview pour afficher les menus "Affichage", "Réorganiser les icones Par"
  • cette option déclenche l'utilisation du double-click ou de la touche [ENTER] sur un fichier pour l'executer
  • cette option déclenche l'utilisation du double-click sur un répertoire du listview pour "rentrer" dans le répertoire SI le listview est lié à un treeview
  • cette option déclenche l'utilisation de la touche [retour] pour revenir au dossier parent si le listview est lié à un treeview

- utilisation du click sur une colonne en mode lvwReport (détail) pour réorganiser les fichiers

tous les paramètres sont modifiables en cours d'execution

Infos sur les + de cette OCX (et non plus dll...) pour ceux qui ne seraient pas encore convaincus:
- et bien déjà c'est un ocx !!!!!!! seule l'ajout d'un controle YommExplorer et 2 lignes de code vous permettent d'obtenir le résultat du screenshot
- contrairement à l'ancien DirExplorer ou le FileExplorer, vous pouvez inclure autant de Treeview ou de Listview que vous désirez sur vos fenetres...Pour une deuxième fenetre vous rajouter le YommExplorer et remettez vos 2 lignes de codes.
- pour le LVExplorer, le nom des colonnes, la largeur, la justification etc...en mode lvwReport (détail) est fonction du répertoire dans lequel vous vous trouvez...de plus , le nom des colonnes est directement pris du fichier shell32.dll (ainsi que les termes "grands icones", "liste" etc...) ce qui implique une traduction automatique en fonction de la langue de l'OS
- pour la flèche affichée lors de tri dans le titre d'une colonne en mode lvwReport (détail), elle est également prise du fichier shell32.dll donc l'image n'est pas fixée dans la dll (encore quelque chose de dynamique !!!)

ça suffit la je crois, vous êtes convaincus. non??? alors jetez un coup d'oeil au code nécessaire pour l'utilisation de cette dll!!!

Source / Exemple :


Option Explicit

Private Sub Form_Load()
    Call YommExplorer1.LVSub.Add(ListView1,)
    Call YommExplorer1.TVSub.Add(TreeView1, ListView1)
End Sub

Conclusion :


Alors toujours pas convaincu ????????

Petite info:
pour utiliser cet ocx , vous devez ajouter à votre projet :
- la référence à l'ocx (YommExplorerOCX)
- les composants "Microsoft Windows Common Controls 5.0 (SP2)"

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Simplesurfer
Messages postés
2
Date d'inscription
vendredi 30 novembre 2007
Statut
Membre
Dernière intervention
20 avril 2008

10/10
je voulai, savoire si tu peu crer un ki explore des fichier ki nexist po sur le disc dur (un remote explorer par exemple)
par exemple je veu ajouter un fichier "blabla.exe" il lajoute avec licon dun exe mai kil nextst po sur le disc dur merci davence
(dsl pour mon françai je suis po françai :$)
cs_titicar
Messages postés
181
Date d'inscription
jeudi 30 mai 2002
Statut
Membre
Dernière intervention
19 août 2012

Bonjour Maypeur,

As-tu lu les différents commentaires ci-dessus. Je dis ça car tu as l'air d'avoir exactement le même problème que Mikaels35 (datant de 10/09/2005 15:50:39).
Et juste plus bas (datant du même jour, mais à 18:35:05), Mikaels35 semble avoir résolu le problème en suivant les conseils de DARKSIDIOUS (donc, toujours du même jour!).
Cela dit et de mémoire, j'ai eu un problème (pas au premier essai) de variable 'String' (sans doute le même problème que toi et d'autres), mais je n'ai pas cherché plus loin.

Si tu veux utiliser cette source, regarde déjà les commentaires de DARKSIDIOUS.
@+ et bon prog!
Maypeur
Messages postés
5
Date d'inscription
lundi 1 octobre 2007
Statut
Membre
Dernière intervention
16 janvier 2008

Bonjour !
mon probleme j'ai un type incompatible meme sans rien avoir toucher au code ! j'ai essayer vos differente manip mais rien y fais

mon code est celui fourni avec l'archive .

ca bloque a cette ligne :

Call YommExplorer1.LVSub.Add(ListView1, lvwReport, "c:")

merci .
yomm
Messages postés
515
Date d'inscription
dimanche 17 février 2002
Statut
Membre
Dernière intervention
10 mars 2008
2
Salut MSTARSUP5,

je fais un tour rapide sur vbfrance donc j'en profite pour te remercier pour ta note et ton commentaire.

@+ et bon devs

Yomm
mstarsup5
Messages postés
527
Date d'inscription
lundi 15 octobre 2007
Statut
Membre
Dernière intervention
10 octobre 2013

(Et avec un 10/10 en plus que j'avais oublié! ;-) )

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.