FoxPro/Visual FoxPro - LIST y el EDIT

Hola Amigos de LWP:

Les agradeceria, me ayuden en esto:
Tengo un Formulario con un List en el cual me muestra todos los PRG de la carpeta que quiero, Lo que quiero, es que cuando me desplace por la lista osea me ubique en cualquier PRG me muestre el contenido en un Thisform.Edit, algo asi como cuando le das: TYPE MENU.PRG.

Gracias por la ayuda y hasta pronto

Lo que se me ocurre en este momento es usar el evento INTERACTIVECHANGE junto con la función FILETOSTR() para visualizar en el control que sea el archivo.

Hola RAUL:

y gracias por atender mi pregunta, voy a probar estps comandos.

Gracias y Hasta pronto.

Buenas,
La sugerencia de Raúl es muy buena, lo probe poniendo el siguiente codigo en Interactivechange de la lista:

* verificamos si es un archivo prg o se trata de la ruta
if ".prg" $ this.value
* tomamos la ruta del archivo a mostrar mas el nombre del archivo
strprograma = this.list(2) + this.value
* cargamos a el objeto edit de nombre programa
ThisForm.programa.value = FILETOSTR(strprograma)
thisform.refresh
endif

Saludos.

Hola amigo:

Gracias, por tu sugerencia, voy a bajarlo y probar como me va,

Hasta pronto