Newsgroup: it.comp.lang.visual-basic
Titolo: Ancora io, ancora ListView...AIUTOO!!!

Okz, risolto con il FolderTreeview che ormai mi rigiro come mi pare
(pare vero) mi resta solo questo malefico di ListView. Ho provato ad
aggiungere la barretta grigia ma manco questa mi funziona :(( Ho
scritto, in base a quanto dice l' AUto Quick Info, questa riga qua:
Lv1.ColumnHeaders.Add , , "Prova", 10, center
e già non funziona, non fa niente, non mi da errore ma non mi si fila
porprio però...ma si fa così per aggiungere quella barra? E poi...ma
come si fa per visualizzare il contenuto di una directory li
dentro!!!! Ma possibile che nessuno lo sappia fare?

Ciao, scusa ma non ho ben capito cosa vuoi fare, ma da quel poco credo che
tu voglia riempire una lista con l'elenco dei files presenti in una dir.
Allora, prima di tutto, nelle proprietà personalizzate della LV devi
settare, nel primo tab, la voce view a "3 - lvwReport".
In questo modo potrai utilizzarla con delle colonne, come vuoi tu.
Ora puoi o settare da progetto quante colonne avrà, oppure successivamente a
run-time.
Per l'elenco ti basta una sola colonna creata adesso.
Quindi clicca sul tab "colum Headers" e scegli "insert column", settanto
anche l'etichetta.
Ora, inserisci il seguente codice per riempirla con i files.
Dim TipoFiles As String
Dim InitDir   As String
Dim Elenco    As String
ListView1.ListItems.Clear
TipoFiles = "*.txt" 'per filtrare i files
InitDir = "c:\documenti" 'Directory in cui cercare
Elenco = Dir(InitDir & "\" & TipoFiles)
    While Not Elenco = ""
        ListView1.ListItems.Add , , Elenco
        Elenco = Dir
    Wend
Occhio che se devi realizzare ListView a più colonne il codice differisce un
poco per "sincronizzare" le varie colonne.
Bye
--
Tango
www.af.mil
ICQ: 35463931

 dentro!!!! Ma possibile che nessuno lo sappia fare?
Qui si ritorna al discorso del TreeView... questi due controlli nascono per
visualizzare quello che ti pare, non solo files e cartelle, per cui te lo devi
caricare tu!
Intanto comincia a leggere la pagina della guida relativa al ListView, dove ti
spiega come e' organizzato il controllo, in particolare il significato degli
oggetti ListItem e ColumnHeader...
Detto questo, non ho mai usato il FolderTreeView ma scommetto che da qualche
parte esporra' una Property che ti dice qual'e' il percorso della cartella
selezionata, a questo punto dovrai fare qualcosa del genere:
'diciamo che strPath contiene il percorso corrente
'ottenuto in qualche modo dal FolderTreeView
Dim strFile As String
'verifichiamo che il path finisca sempre con uno "\"
If Right$(strPath, 1) <> "\" Then strPath = strPath & "\"
'inizializziamo il nostro listview
LV1.HideColumnHeaders = False
LV1.View = lvwReport
'Definiamo 2 colonne: nome e dimensione del file
LV1.ColumnHeaders.Add , , "Nome", 2000, lvwColumnLeft
LV1.ColumnHeaders.Add , , "Dimensione", 1000, lvwColumnRight
'recuperiamo tutti i files nel percorso specificato
strFile = Dir$(strPath & "*.*", vbNormal + vbHidden + vbSystem)
Do While strFile <> ""
    'aggiungiamo gli item nel ListView
    Set FileItem = LV1.ListItems.Add(, , strFile)
    'recuperiamo la dimensione in bytes (usando il path completo)
    'e la visualizziamo nella seconda colonna
    FileItem.SubItems(1) = FileLen(strPath & strFile)
    'Leggiamo il prossimo file
    strFile = Dir$
Loop
a questo punto se vuoi puoi abbellire il tutto con icone, ulteriori dettagli
ecc..
Ciao
--
Luca Dormio
luca....@tin.it
luca....@sig-la.com

tu voglia riempire una lista con l'elenco dei files presenti in una dir.
Perfetto!! Hai capito benisimo invece :)) Grazie!! Grazie mille :)) Ho
capito, il resto ora lo vedo da solo, se ho domande da farti circa il
codice che hai sacritto te le farò :)) Per quanto riguarda le più
colonne forse ho già capitoocme gestire la cosa, FORSE eh!! :)) Poi ho
anche l' esempio postatomi dal buon Pal, insomma, ho fatto al volo due
o tre prove e sembra anadare :)))))), adesso dovrei avert tutto!!!
Grazie ancora.
Saluti, ciao ciao.