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