[DELPHI] lista dei file nelle subfolder

[kate71]

Salve !
Sto tentando di fare una un programmino che mi salvi in un file.txt
la lista dei file e delle eventuali subfolder all'interno
di una cartella .
L'elenco dei file è stato piuttosto seplice ..
con questa istruzione me lo fa tranquilamente

DirectoryListBox1.FileList.Items.SaveToFile('file. txt');

Vorrei prima di tutto ricavarmi il nome della cartella
in modo da salvare la lista in un file NomeCartella.txt
ma non riesco a ricavarmi il nome della directory!!


Per quanto riguarda la lista di file nelle subfolder:
avevo pensato di fargli fare la lista delle subfolder
utilizzando un count delle cartelle che trovava...
e successivamente fargli prendere la FileList di ciscuna
cartella ma non sono riuscita a farlo...

potete darmi qualche consiglio per procedere?
Come posso ricavare il nome della cartella?
e come posso fare una lista di file nelle sub folder e delle
subfolder stesse?
vorei che il file riportasse un testo di questo tipo

--- nome_subfolder1 ----
file1
file2
--- nome_subfolder2 ----
file1
file2
--- nome_subfolder_n---
file1
file2

Grazie
Kate71

[alka]

Ciao,
ti dico subito che, secondo me, usare una DirectoryListBox è sprecato poichè ci sono funzioni adatte allo scopo senza ricorrere all'uso di un controllo visuale che consuma inutilmente delle risorse.

Il modo più efficiente per ottenere cartelle e sottocartelle è di utilizzare una funzione ricorsiva.

Però un collega su it.comp.lang.delphi ha prodotto una classe che può fare al caso tuo; non l'ho provata, in verità, ma dai commenti che si sono susseguiti pare funzionare bene.

Questo è il link alla discussione:
http://makeashorterlink.com/?A2BD45C37.

Ciao!

[kate71]

Grazie !
funziona perfettamente !!

:metallica