FoxPro/Visual FoxPro - Datos de Grid a Form

Hola.. a todos...
tengo un form en el que tengo un combo para sacar los clientes de una
optica, abajo tengo un grid para mostrar todas las visitas que ha tenido el
cliente o paciente, en el evento click del combo tengo lo siguiente:

sele clientes
lnombre=Thisform.Combo2.Value
sele GAFAS
set filter to Alltrim(GAFAS.PACIENTE)=Alltrim(lnombre)
GO Bottom
Thisform.Grid1.Refresh

pero requiero que en el Grid, al hacer DblClick en el registro de la ultima
visita del paciente obtenga el contenido de todos los campos de dicho
registro y meterlo en las VarMem para complementar los TextBox del Form y
poderlo imprimir o mostrar al cliente.

Muchas gracias..

El grid, muestra el contenido de una tabla. Cuando te posicionas en el ultimo registro, la tabla tambien esta en el ultimo registro.

En el dobleclick del grid hace esto
SELEC gafas
**Hace lo que quieras ahi.

bueno, yo no programa con varmem, mejor lo hago orientado a objetos, asi de sencillo:

en el click del text1, del grid u otro evento que te convenga:

select gafas
set filter to Alltrim(GAFAS.PACIENTE)=Alltrim(lnombre)

Thisform.text1.value=gafas.nombre
Thisform.text2.value=gafas.fecha_de_consulta
Thisform.text3.value=gafas.direccion && o el dato que quieras mostrar

Thisform.Grid1.Refresh

Suerte►

bueno, yo no programa con varmem, mejor lo hago orientado a objetos, asi de sencillo:

en el click del text1, del grid u otro evento que te convenga:

select gafas
set filter to Alltrim(GAFAS.PACIENTE)=Alltrim(lnombre)

Thisform.text1.value=gafas.nombre
Thisform.text2.value=gafas.fecha_de_consulta
Thisform.text3.value=gafas.direccion && o el dato que quieras mostrar

Thisform.Grid1.Refresh

Suerte►

Hola.. amigos...
Muchas gracias a todos... ya tome muy en cuenta sus consejos y este FORM ya esta funcionando a la perfeccion.

Aprovechando la ocasion para preguntarles donde podré encontrar un Manual para programar formularios directamente en PRG como dice Neo directamente a objetos...

mil gracias... bye..