OCX - ARBRE STYLE DE L'EXPLORATEUR WINDOWS
cs_azerty25
Messages postés
1114
Date d'inscription
jeudi 19 décembre 2002
Statut
Membre
Dernière intervention
6 mai 2007
-
8 avril 2004 à 06:46
Philippe734 Messages postés 308 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 15 juin 2015 - 9 nov. 2004 à 22:38
Philippe734 Messages postés 308 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 15 juin 2015 - 9 nov. 2004 à 22:38
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/21744-ocx-arbre-style-de-l-explorateur-windows
https://codes-sources.commentcamarche.net/source/21744-ocx-arbre-style-de-l-explorateur-windows
9 nov. 2004 à 22:38
16 avril 2004 à 09:14
Public Property Get Path() As String
Dim Dossier As String
Dossier = Arbre.SelectedItem.Key
If Left(Dossier, 1) ">" Then Dossier Mid(Dossier, 2)
If Right(Dossier, 1) <> "" Then Dossier = Dossier & ""
Path = Dossier
End Property
16 avril 2004 à 07:39
Merci également à slr, je vais essayer de modifier le contrôle comme tu me l'as dis. Cela va surement être dur, je n'ai jamais fais ce genre de chose, mais c'est un bon apprentissage.
Bonne prog a tous
++
15 avril 2004 à 23:27
tu peux encapsuler le code précédent dans
Public Property Get LePath() as String
'Code
End Property
A+
15 avril 2004 à 23:26
Private Sub Lynx_Arbre1_SelectFolder(Dossier As String)
End Sub
Dossier <= chemin sélectionné ...
15 avril 2004 à 21:03
Je risque de paraître stupide, mais je n'ai pas de ".Nodes"
Une explication ou une autre méthode svp.
A+
15 avril 2004 à 20:19
for i=1 to Arbre.Nodes.Count
if Arbre.Nodes(i).Selected=True Then
LePath=Arbre.Nodes(i).FullPath
end if
next i
par exemple.
A+
15 avril 2004 à 19:59
c'est du très beau boulot. 10/10
Petite question. Je n'ai pas trouver comment récupérer le chemin du repertoire sélectionné (ex: Lynx_Arbre1.path).
Peut tu me renseigner à ce sujet ?
15 avril 2004 à 19:50
c'est du très beau boulot. 10/10
Petite question. Je n'ai pas trouver comment récupérer le chemin du repertoire sélectionné (ex: Lynx_Arbre1.path).
Peut tu me renseigner à ce sujet ?
12 avril 2004 à 10:25
bravo !
ca merite largement un 10
continu comme ca :p
8 avril 2004 à 11:55
8 avril 2004 à 11:38
Chez moi pas de réseau et ça ne plante pas !?
Peux tu m'en dire + Stp
NOTA: Il se peut que la recherche lorsqu'on clique sur l'icone Réseau soit longue ... comme dans l'explorer d'ailleurs il me semble
8 avril 2004 à 11:35
tendance a planter ;)
mais 10/10 quand meme...
8 avril 2004 à 09:45
J'aimerais en fait pouvoir rajouter des raccourcis, créer un noeud (librairies) à la racine pour y ajouter des dossiers ou des objets à l'intérieur, est-ce que tu crois que cela peut se faire facilement ?
en tout cas, bravo pour ce code très complet.
8 avril 2004 à 06:46