FoxPro/Visual FoxPro - Archivos de una carpeta en grid

Buen día

Quisiera que me ayudaran a poner en un Grid la lista de archivos que tengan la extensión ".DBF" que están en una carpeta. Ejemplo: La carpeta C:\Tablas tiene 3 archivos tabla1.dbf , tabla2.dbf , tabla3.dbf. Que en el El Grid despliegue:

tabla1.dbf
tabla2.dbf
tabla3.dbf

Gracias

Busca en la ayuda. la funcion ADIR ahi tienes un ejemplo de como obtener los archivos en un array y luego sacar los nombres en una variable

Hola lo que podrías hacer

BOTON 1 PORCEDIMENTO CLICK
WITH THISFORM

STORE ALLTRIM(GETDIR()) TO _DIR

IF !EMPTY(_DIR)
STORE SUBSTR(ALLTRIM(_DIR),1,LEN(ALLTRIM(_DIR)) - 1) TO .TEXT1.VALUE
ENDIF
.BOTON2.CLICK()

.REFRESH
ENDWITH

BOTON2 PROCEDIEMETNO ClICK
WITH THISFORM
SELECT TABLAS
ZAP

LOCAL _RUTA

STORE '"'+ALLTRIM(.TEXT1.VALUE)+'\*.JPG"' TO _RUTA

STORE ADir(arrat, &_RUTA) TO nTotF,_TOT

For I = 1 To nTotF
SELECT TABLAS
APPEND BLANK
REPLACE CAM1 WITH ALLTRIM(arrat[i,1])
next I

.REFRESH
ENDWITH

A mi me funciona bien espero que a ti también

Saludos

Es más simple como lo propone Leonardo Daniel... aunque hay diferentes modos de lograrlo podrías hacerlo así...
Por supuesto debe estar ya activo el grid y el RecordSourceType del mismo debe estar como 1-Alias.