FoxPro/Visual FoxPro - Datos de Grid a Form

 
Vista:

Datos de Grid a Form

Publicado por Amado (63 intervenciones) el 22/05/2007 02:10:06
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..
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Datos de Grid a Form

Publicado por Plinio (7841 intervenciones) el 22/05/2007 02:54:49
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.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 65
Ha mantenido su posición en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

RE:Datos de Grid a Form

Publicado por neo (1604 intervenciones) el 22/05/2007 15:16:10
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►
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 65
Ha mantenido su posición en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

RE:Datos de Grid a Form

Publicado por neo (1604 intervenciones) el 22/05/2007 15:16:13
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►
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Datos de Grid a Form

Publicado por Amado (63 intervenciones) el 23/05/2007 01:40:50
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..
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar