Yommexplorer.net explorer / explorateur de dossiers répertoires fichiers (vrais icones, menu contextuel, raffraichissement a

Soyez le premier à donner votre avis sur cette source.

Vue 19 478 fois - Téléchargée 2 025 fois

Description

Bonjour @ tous & toutes,

Voici la version .Net du YommExplorer OCX.
Reprise des anciennes fonctionnalités et ajout de nouvelles :

Pour le DirExplorer (arborscence répertoires)
- véritables icônes ( + racourcis , + partage)
- choix de la racine (bureau, poste de travail...)
- possibilité d'ajout d'un "racourcis" sous la racine
- checkbox 3 états
- affichage de fichiers
- menu contextuel windows
- raffraichissement automatique lorsqu'un dossier/fichier est créé par une autre appli ou via l'explorateur Windows
- récupération des nodes via énumération

Pour le FileExplorer (affichage des fichiers)
- véritables icônes ( + racourcis , + partage)
- possibilité de lier automatique le FileExplorer à un DirExplorer
- plusieur modes d'affichages : Liste, Détails, Icones et Mosaïque (cf impression écran pour ce dernier mode)
- menu contextuel + interraction automatique lors d'action du type copier/coller , nouveau document etc...
- possibilité de filtrer par extension
- possibilité d'afficher/masquer les dossiers
- possibilité d'afficher/masquer les éléments cachés
- utilisation des racourcis clavier (CTR+C, CTR+V , F2 ...)
- checkbox 2 états
- en mode détail : possibilité de modifier les colonnes affichés par click droit sur l'entête
- gestion du tri ("réorganiser par" ou par click sur l'entête de colonne en mode détail)
- récupération des items via énumération

et j'en oublie peut être...

bref tout plein de chose pour faire un vrai navigation dans une appli...

Source / Exemple :


'-------------------------------------------------------
'Exemples DirExplorer
'-------------------------------------------------------

'exemple pour obtenir la node sélectionnée:
    MsgBox(DirExplorer1.SelectedItem.Text)

'exemple pour obtenir les nodes cochées:
    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        MsgForNodeChecked(DirExplorer1.Root)
    End Sub

    Private Sub MsgForNodeChecked(ByVal Node As YommExplorer.DirExplorerNode)

        Dim NodeFille As YommExplorer.DirExplorerNode

        For Each NodeFille In Node.Nodes
            If NodeFille.IsExpanded = True Then
                MsgForNodeChecked(NodeFille)
            ElseIf NodeFille.CheckState = CheckState.Checked Then
                MsgBox(NodeFille.Text)
            End If
        Next

        If Node.CheckState = CheckState.Checked Then MsgBox(Node.Text)

    End Sub

'-------------------------------------------------------
'Exemples FileExplorer
'-------------------------------------------------------

'exemple pour récupérer les fichiers
    Dim fileitem As YommExplorer.FileExplorerItem

    For Each fileitem In FileExplorer1.Items
       Debug.Print(fileitem.Text)
    Next

'exemple pour récupérer les items cochés
    Dim fileitem As YommExplorer.FileExplorerItem

    For Each fileitem In FileExplorer1.Items
        If fileitem.Checked = True Then Debug.Print(fileitem.Text)
    Next

Conclusion :


les notions abordées ici :

- héritage d'un controle pour en faire un contrôle perso
- héritage de type pour ajouter et/ou modifier des types (exemple : TriStateTreeNode hérite de Node mais permet des nodes avec checkbox 3 états)
- surchage de fonction (exemple : fonction New de la class ClsDirectory)
- subclassing
- traitement des icones, informations des fichiers etc...
- ajout d'icône dans le header d'un listview
- gestion du menu contextuel Windows et du menu nouveau
- gestion des interfaces : IUnknown, IShellDetails, IEnumIDList, IShellFolder, IcontextMenu, IcontextMenu2, IcontextMenu3, IShellExtInit, IDropTarget
- implémentation d'une propriété de type enumeration (exemple : FileExplorerItemEnumerable)
- gestion du FileSystemWatcher et des threads différents

et bien d'autres encore...

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

guilleto
Messages postés
256
Date d'inscription
jeudi 23 octobre 2003
Statut
Membre
Dernière intervention
20 mars 2013
1
Bonjour à toutes et tous,

Je voudrais savoir comment :
1°) Mettre un répertoire par défaut dans le contrôle DirExplorer car apparemment celui-ci récupère un Integer et on ne pourrait pas passer un String en paramètre.
2°) Comment enlever la multi-sélection dans le contrôle FileExplorer ?
3°) Lorsque je clique sur un Item dans le contrôle FileExplorer, je n'ai pas l'évênement Clic qui s'enclenche !! Est-ce normal ?

Par avance merci.

Olivier
blq
Messages postés
97
Date d'inscription
vendredi 22 octobre 1999
Statut
Membre
Dernière intervention
13 juin 2016
1
Excellent !
cs_clave
Messages postés
3
Date d'inscription
samedi 8 novembre 2003
Statut
Membre
Dernière intervention
11 février 2010

Bonjour à tous,
Voila j'ai récupéré yomm explorer pour me faire un explorateur perso en vb.net 2008.
J'ai un petit problème dans la liaison entre le DirExplorer et le FileExplorer :
Premier problème:
A lexécution
Lorsque j'ajoute un sous-répertoire à un répertoire existant dans le FileExplorer pas de problème.
je rentre dans ce sous-répertoire et j'y ajoute un sous-répertoire.
La je ne peux pas entrer dans ce sous répertoire pour ajouter ou modifier son contenu.

Deusième problème:
A lexécution
Lorsque dans une arborescence à plusieurs niveaux, je supprime le n-ième sous-répertoires dans le FileExplorer, la mise à jour n'est pas répercutée dans le DirExplorer

Celui-ci ne se rafraichi pas
Si quelqu'un a une solution?
cs_Bilou47190
Messages postés
5
Date d'inscription
dimanche 24 août 2008
Statut
Membre
Dernière intervention
3 octobre 2011

Salut,
Je suis un peut en retard pour une question, mais je n'arrive pas à récupérer le nom du répertoire quand je click ds DIREXPLORER ou FILEXPLORER pour l'afficher style explorer windows dans la barre d'ADRESSE style combobox.
Comment fait'on ? Je débute.
Thierry
cs_Pachanka
Messages postés
19
Date d'inscription
mercredi 29 octobre 2003
Statut
Membre
Dernière intervention
9 janvier 2009

plop, tout d'abord bravo pour la source

question: j'ai recup le .ocx (direxplorer) que j'ai inclus dans un projet .net
mon probleme est que je n'arrive pas a recuperer l'evenement node_click pour connaitre le path complet de l'endroit ou je suis ainsi que le nom du fichier

j'ai vu que je pouvais faire un Dim objDir As DirExplorerOCX.DirExplorerNode
mais comment le rattacher au composant que j'ai cree graphiquement sur ma form?

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.