FoxPro/Visual FoxPro - ¿ COMO ACTUALIZAR UN GRID DESDE UN CURSOR

 
Vista:

¿ COMO ACTUALIZAR UN GRID DESDE UN CURSOR

Publicado por Diablesa (3 intervenciones) el 06/11/2006 22:29:09
Hola amigos :
necesito un código de ejemplo para ver como actualizo un Grid desde
un Cursor..osea a manera que voy almacenando datos que me vayan
apareciendo el Grid de Consulta .
Nota necesito solo código de ejemplo si es a bién.
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:¿ COMO ACTUALIZAR UN GRID DESDE UN CURSOR

Publicado por Plinio (7841 intervenciones) el 06/11/2006 23:27:04
El grid es una representacion de un cursor o tabla. Pon el origen de datos del grid a ese cursor y todos los cambios que haga al cursor se presentan en el grid.
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:¿ COMO ACTUALIZAR UN GRID DESDE UN CURSOR

Publicado por juan (537 intervenciones) el 07/11/2006 15:39:21
EJEMPLO

** En un botón de Grabar
* Agregar registros desde un cursor
** cada vez que agregue un nuevo registro el Grid1 se
**actualizará ,osea aparecerá este registro al final de
**la tabla ,en este caso no es necesario crear una tabla Temporal

Sele micursor

publi xnom
xnom=Thisform.Pageframe1.Page1.Text2.Value
INSERT INTO FOTOS(codigo,nombre) ;
VALUES(cod,xnom)

* = TABLEUPDATE(.T.)

Thisform.Pageframe1.Page1.Text1.Value=" "
Thisform.Pageframe1.Page1.Text2.Value=" "
**-----------------------------------------------**


Thisform.Pageframe1.Page2.Grid1.AllowAddNew=.f.
Thisform.Pageframe1.Page2.Grid1.ColumnCount=2
Thisform.Pageframe1.Page2.Grid1.Column1.Header1.Caption="Código"
Thisform.Pageframe1.Page2.Grid1.Column1.ControlSource="fotos.codigo"
Thisform.Pageframe1.Page2.Grid1.Column1.FontBold=.t.
**-------------------------------------------------------------------------""

Thisform.Pageframe1.Page2.Grid1.Column2.Header1.Caption="Nombre Foto "
Thisform.Pageframe1.Page2.Grid1.Column2.ControlSource="fotos.nombre"
Thisform.Pageframe1.Page2.Grid1.Column2.Format="!"
**---------------------------------------------------------------------
ThisForm.Pageframe1.Page2.Grid1.RecordSource="Select *From fotos into cursor cursor2"
ThisForm.Pageframe1.Page2.Grid1. RecordSourceType=4


Thisform.Pageframe1.Page2.Grid1.Refresh


Thisform.Refresh
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