Buongiorno!!

Avrei bisogno di ottenere un elenco dei file contenuti in una directory. Sapete come posso fare?
ho provato con findfirst ma non mi prende niente

questo sarebbe il mio pezzo di codice in cui sr è un TSearchRec..
non funziona
codice:
 repeat
   findFirst('C:\dirProva',0,sr);
   mem.Lines.Add(sr.Name);
 until findnext(sr)<>0;
 findclose(sr);
Chi sa aiutarmi?

Grazie
Ciao