FoxPro/Visual FoxPro - agarrar solo los txt con Adir()

necesito que al utilizar el adir() sobre una carpeta solo se vayan al arreglo los puros archivo txt
es posible?
saludos

HOLA EDGAR

Yo usaria en ves de ADIR(), un GETGILE(" "),

Porque ?

Tiene la ventaja que puede buscar en cualquier dispositivo ya sea disco duro, pendrive, cd, disquete etc. y asi no limitar el sistema.

ejemplo:

baseb=getFILE("TXT","","",0," Buscar Archivo de texto")

por omision buscara en la capeta por default, pero el usuario tendra la opcion de buscar donde quiera

PD: EN BASED QUEDA EL NOMBRE DEL ARCHIVO SELECCIONADO

ESPERO TE SIRVA

ACM

SET DEFAULT TO c: ucarpeta
=ADIR(arreglo,"*.TXT")

***para ver si es verdad
FOR i = 1 TO ALEN(arreglo,1)
? arreglo[i,1]

ENDFOR

gracias otra vez a plinio y andres por la solucion
funciona perfecto
saludos