Tema: Listar ficheros de un directorio y subdirectorios
Ver Mensaje Individual
  #2  
Antiguo 29-11-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
  
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Si en Edit1.Text está la ruta, es muy probable que te falte una barra, probá de este modo:
Código Delphi [-]
  ...
 dir := IncludeTrailingPathDelimiter(edit1.Text);  // Incluye delimitador si no existe
 mascara:= '*.*';
 if FindFirst(dir + mascara, faAnyFile, SR) = 0 then
  ...

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Última edición por ecfisa fecha: 29-11-2011 a las 20:02:44. Razón: agregar comentario al código
Responder Con Cita