EXPLORATEUR WINDOWS

cs_Zoltan67
Messages postés
91
Date d'inscription
mercredi 18 décembre 2002
Statut
Membre
Dernière intervention
25 juin 2003
- 11 juin 2003 à 10:45
cs_ym_trainz
Messages postés
160
Date d'inscription
vendredi 27 janvier 2006
Statut
Membre
Dernière intervention
21 avril 2015
- 14 juin 2008 à 22:13
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/7433-explorateur-windows

cs_ym_trainz
Messages postés
160
Date d'inscription
vendredi 27 janvier 2006
Statut
Membre
Dernière intervention
21 avril 2015

14 juin 2008 à 22:13
Salut RenField,

Ton ReyXplorer fonctionne à merveille. Je l'ai intégré dans ma dernière source.

J'ai cependant été obligé de ne mettre qu'un treeView par form (donc j'ai géré une MDIForm à l'aide de ton code http://www.vbfrance.com/code.aspx?ID=17487) En effet, j'avais une belle plante avec 2 treview sur la form...

Maintenant, il ne me reste plus qu'à éplucher en détail ton code pour gérer le DragDrog dans ton trieView... Dur dur...

En tous cas, merci une fois encore pour ce code.

Cordialement,
ym_trainz
Renfield
Messages postés
17287
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
71
5 mai 2008 à 10:25
le zip contient les sources du tlb (de mémoire)
cs_ym_trainz
Messages postés
160
Date d'inscription
vendredi 27 janvier 2006
Statut
Membre
Dernière intervention
21 avril 2015

1 mai 2008 à 12:26
Salut RenField,

Comme je sais que les ReySource fonctionnent ^^ ,
J'aime bien savoir pourquoi je n'arrive pas à les faire fonctionner donc j'approfondis ;-)

Je peux dire aussi que c'est plus stable avec ton code source qu'avec l'ocx compilée.

ch'tite question :
Je n'ai pas eu besoin de typelib.zip, c'est normal ? Peut-être qu'avec ma version de vb6, c'est déjà inclus ? (pour savoir si je devrai l'intégrer à mon projet le jour où je le mettrai en ligne)

(Bien sûr, ISHF_Ex.tlb est indispensable)

Cordialement,
ym_trainz
Renfield
Messages postés
17287
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
71
30 avril 2008 à 08:43
mtv doit etre Nothing a ce moment là...
ravi que tu te sois donné la peine
cs_ym_trainz
Messages postés
160
Date d'inscription
vendredi 27 janvier 2006
Statut
Membre
Dernière intervention
21 avril 2015

29 avril 2008 à 22:22
Salut RenField,

J'ai laissé tombé l'ocx de Yomm car j'avais une plante.
J'ai repris avec tes sources.

J'ai utilisé 2 treeview dans mon projet
Quand je termine mon prog, j'ai un message d'erreur (appli compilée ou pas):

Run-time error 91
Object variable or With block not set

J'ai vu qu'avec un on error, ça règle le problème qui n'apparaît qu'à la fermeture de l'appli :

Module_Treeview_Operation
procedure -> RemoveRootFolder.

Voilà, je n'ai pas trop saisi le pourquoi de la chose mais avec ce on error [exit sub], ça a l'air de coller.

Soit donc (pour ceux qui ne voit pas trop l'histoire ;-)

'# Permet de vider l'arbre
Public Sub RemoveRootFolder()
On Error GoTo err1 'Ajout en question
If mTv.Nodes.Count Then
mTv.Nodes(1).Root.Expanded = False
Call mTv.Nodes.Remove(mTv.Nodes(1).Root.Index)
End If
Exit Sub
err1:
'c'est l'erreur dans le unload des forms (terminate)
End Sub

En tous cas, encore bravo !
Cordialement,
ym_trainz
Afficher les 68 commentaires