[[seoane]]

Una forma curiosa de hacerlo es así:

Código Delphi [-]
  Listbox1.Perform(LB_DIR,DDL_ARCHIVE,lParam(PChar('c:\*.*')));

Esto cargaría en un Tlistbox los archivos que se encontraran en C:\