OVH Cloud OVH Cloud

Pour Jacques93

2 réponses
Avatar
Pascal
Bonsoir jacques,

j'abuse peut-être, si c'est le cas ne te gêne pas pour me le dire, je
comprendrai parfaitement.

avec la sub suivante (qui fonctionne à merveille, encore merci) je n'arrive
pas, lorsque je clique sur un dossier à lui donner le focus, le focus vient
tjs sur le premier de la liste.
une petite idée?

Bien à toi

Pascal

Private Sub ShowRep()
Me.Label4 = Me.Dir1.Path
With Me.ListView1
.ListItems.Clear

For i = 0 To Me.Dir1.ListCount - 1
s = Mid(Me.Dir1.List(i), InStrRev(Me.Dir1.List(i), "\") + 1)
.ListItems.Add , , s, 1
Next i
End With
ShowFile
End Sub

2 réponses

Avatar
Jacques93
Bonsoir Pascal,
Pascal a écrit :
Bonsoir jacques,

j'abuse peut-être, si c'est le cas ne te gêne pas pour me le dire, je
comprendrai parfaitement.

avec la sub suivante (qui fonctionne à merveille, encore merci) je n'arrive
pas, lorsque je clique sur un dossier à lui donner le focus, le focus vient
tjs sur le premier de la liste.
une petite idée?

Bien à toi

Pascal

Private Sub ShowRep()
Me.Label4 = Me.Dir1.Path
With Me.ListView1
.ListItems.Clear

For i = 0 To Me.Dir1.ListCount - 1
s = Mid(Me.Dir1.List(i), InStrRev(Me.Dir1.List(i), "") + 1)
.ListItems.Add , , s, 1
Next i
End With
ShowFile
End Sub




Pour ce qui est de ta question, il y a quelque chose qui m'échappe.
Lorsque tu sélectionnes un dossier, on change de dossier et on affiche
son contenu (les sous-répertoires dans le ListView, les fichiers dans le
FileListBox). Sur quelles bases tu décides de donner le Focus à un des
dossiers ?

Sinon de manière générale, dans un Listview :

Me.ListView1.ListItems(i).Selected = True

liée à la propriété :

Me.ListView1.MultiSelect

(Séléction multiple ou non)

PS (amical) ;-) :
<Copie JCB On>
Remarque préalabale :
Un message posté dans un forum ne doit JAMAIS s'adresser nominativement
à un individu, et encore moins faire figurer son nom dans le titre !
Les groupes de discussion sont un espace ouvert à TOUS, ils ont une
structure COLLECTIVE.

Donc s'adresser spécialement à un internaute peut être considéré comme
méprisant envers les AUTRES...
(du style "Je m'adresse à DUSCHMURZ car vous les autres blaireaux vous
ne saurez pas me répondre" ;-) )

</Copie JCB Off>

Ne le prends pas mal, tout le monde a le droit de répondre dans la
mesure oû la question est posée sur un forum public.

--
Cordialement,

Jacques.
Avatar
Pascal
bonsoir,
oups! navré pour cette erreur!
c'est en forgeant qu'on devient forgeron!

je ne le prend nullement mal, et ne pense pas avoir été méprisant envers les
autres,
je m'étais adressé à toi car tu étais l'auteur de cette sub et je pensais
que tu ne suivrait plus le post précédent puisque considéré comme résolu et
de surcroit ne connaissait pas cette ""règle"", maintenant oui.
---------------------
Pour ce qui est de ta question, il y a quelque chose qui m'échappe. <
lorsque tu sélectionnes un dossier, on change de dossier et on affiche <
son contenu (les sous-répertoires dans le ListView, les fichiers dans le <
FileListBox). Sur quelles bases tu décides de donner le Focus à un des <
dossiers ?


--------------------
les dossiers sont affichés dans le listview, leurs contenu dans un
fileListbox
Sont donc toujours apparent le dossier dans le listview et le contenu dans
fileListbox
dans le répertoire choisis il n'y a pas de sous-dossiers seulement dossiers
et contenu de ceux-ci


bien à toi et merci pour ta réponse

Pascal


"Jacques93" a écrit dans le message de news:
O39EpgO$
Bonsoir Pascal,
Pascal a écrit :
> Bonsoir jacques,
>
> j'abuse peut-être, si c'est le cas ne te gêne pas pour me le dire, je
> comprendrai parfaitement.
>
> avec la sub suivante (qui fonctionne à merveille, encore merci) je


n'arrive
> pas, lorsque je clique sur un dossier à lui donner le focus, le focus


vient
> tjs sur le premier de la liste.
> une petite idée?
>
> Bien à toi
>
> Pascal
>
> Private Sub ShowRep()
> Me.Label4 = Me.Dir1.Path
> With Me.ListView1
> .ListItems.Clear
>
> For i = 0 To Me.Dir1.ListCount - 1
> s = Mid(Me.Dir1.List(i), InStrRev(Me.Dir1.List(i), "") + 1)
> .ListItems.Add , , s, 1
> Next i
> End With
> ShowFile
> End Sub
>

Pour ce qui est de ta question, il y a quelque chose qui m'échappe.
Lorsque tu sélectionnes un dossier, on change de dossier et on affiche
son contenu (les sous-répertoires dans le ListView, les fichiers dans le
FileListBox). Sur quelles bases tu décides de donner le Focus à un des
dossiers ?

Sinon de manière générale, dans un Listview :

Me.ListView1.ListItems(i).Selected = True

liée à la propriété :

Me.ListView1.MultiSelect

(Séléction multiple ou non)

PS (amical) ;-) :
<Copie JCB On>
Remarque préalabale :
Un message posté dans un forum ne doit JAMAIS s'adresser nominativement
à un individu, et encore moins faire figurer son nom dans le titre !
Les groupes de discussion sont un espace ouvert à TOUS, ils ont une
structure COLLECTIVE.

Donc s'adresser spécialement à un internaute peut être considéré comme
méprisant envers les AUTRES...
(du style "Je m'adresse à DUSCHMURZ car vous les autres blaireaux vous
ne saurez pas me répondre" ;-) )

</Copie JCB Off>

Ne le prends pas mal, tout le monde a le droit de répondre dans la
mesure oû la question est posée sur un forum public.

--
Cordialement,

Jacques.