Ver Mensaje Individual
  #2  
Antiguo 15-08-2008
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Pues sólo tendrías que pasar el parámetro correcto a tu función:

Código Delphi [-]
BuscaPasta('C:\SWEDA\SWD*')

Y sería deseable agregar

Código Delphi [-]
FindClose(sBusca);

al final de tu función.

// Salud
Responder Con Cita