Problema ListBox.Perform

[dfarias]

Buenos dias. Me encuentro hace 2 dias buscando la solucion al siguiete problema que se ha presentado recientemente. Luego de haber cambiado parte del codigo del programa (que no es donde falla) al volver a compilar y ejecutarlo no volvio a funcionar la busqueda de archivos dentro de un directorio. Lo he probado en diferentes pc y en diferentes redes. Compilado con D7 y ejecutado en xp sp3.

Código Delphi [-]
//Modulo para importar
...
   path1:= 'C:\ENLACE\IMPORTAR\' + '*.txt';
   memo1.Lines.Append(path1);
   ListBox1.Perform(LB_DIR, 0, Integer(PChar( path1 )));

Este simple código que funcionaba perfectamente ahora dice que el directorio esta vacio cuando en realidad hay mas de 10 archivos. Ya el arbol no me deja ver el bosque.

[ecfisa]

Hola dfarias.

¿ Has probado si usando un TFileListBox te presenta el mismo problema ?

Código Delphi [-]
  ...
  path1:= 'C:\ENLACE\IMPORTAR\' + '*.txt';
  FileListBox1.Directory:= path1;
  ...

Saludos.