Saludos, existe un control que te hace todo eso sin molestarte mucho es el control FileChooser, que se encuentra en la pestaña de controles denominada "Dialog". Sin embargo, si te gusta irte a pie lo que tienes que hacer es esto (bueno por lo menos lo que se me ocurre):
Inserta los controles listview y un dirview, luego usa este codigo, (la funcion listar es una modificacion de una respuesta que di anteriormente puedes ubicarla en este mismo foro en la pagina 5):
' Gambas class file
'Desarrollado por Miguel Hernandez Liebano
'
[email protected]
'cuando se cambia el directorio que llame a la funcion listar
PUBLIC SUB DirView1_Click()
listar()
END
'funcion listar que hace todo el trabajo
PUBLIC SUB listar()
'variable que vamos a usar se explican por si solas =)
DIM cad AS NEW string[]
DIM buffer AS String
DIM bucle AS Integer
DIM cadena AS String
cadena = DirView1.Current
ListView1.Clear
EXEC ["ls", cadena] TO buffer 'lista los archivos del directorio y los coloca en buffer
cad = Split(buffer, "\n")
cad.remove(0)
cad.remove(cad.count - 1)
FOR bucle = 0 TO cad.count - 1
ListView1.Add(cad[bucle], cad[bucle], )
NEXT
END
espero te sirva.
