... aFiles:=Array( ADir( Curdrive()+":\"+cfILES+"\"+"*.*", aFiles ) ) if len(aFiles)==0 msgInfo("La carpeta esta vacía. Debe añadir ficheros asociados") endif cGetFile( "Todos los archivos (*.*)|*.*", "Contenido de la carpeta",, Cfiles,,,OFN_ENABLESIZING,,) ...