Hola
Quisiera saber como se actualiza el texbox cuando me estoy desplazando por el Grid, y en caso contrario tambien, es decir cuando me desplazo con los botones siguientes y anterior quiero que se actualice el Grid
Adjunto el ejemplo
Gracias.
Claudio
Actualizar GRID con TEXBOX
Moderator: Rathinagiri
-
- Posts: 132
- Joined: Thu Jul 31, 2008 12:05 pm
Actualizar GRID con TEXBOX
- Attachments
-
- agenda.gif (16.74 KiB) Viewed 3493 times
-
- AGENDA.rar
- (5.96 KiB) Downloaded 293 times
- mustafa
- Posts: 1162
- Joined: Fri Mar 20, 2009 11:38 am
- DBs Used: DBF
- Location: Alicante - Spain
- Contact:
Re: Actualizar GRID con TEXBOX
Hola Claudio
te dejo un ejemplo generado con mi programa
WinPrg: http://hmgforum.com/viewtopic.php?f=9&t=628&start=10
haber si te sirve
Un Saludo
Mustafa
te dejo un ejemplo generado con mi programa
WinPrg: http://hmgforum.com/viewtopic.php?f=9&t=628&start=10
haber si te sirve
Un Saludo
Mustafa
- Attachments
-
- Sample.zip
- (750.8 KiB) Downloaded 350 times
-
- Posts: 132
- Joined: Thu Jul 31, 2008 12:05 pm
Re: Actualizar GRID con TEXBOX
Hola Mustafa
Te agradezco por tu ayuda
Lo voy a probar
Tengo que adaptarlo para que se use el GRID
Saludos
Claudio
Te agradezco por tu ayuda
Lo voy a probar
Tengo que adaptarlo para que se use el GRID
Saludos
Claudio
- mustafa
- Posts: 1162
- Joined: Fri Mar 20, 2009 11:38 am
- DBs Used: DBF
- Location: Alicante - Spain
- Contact:
Re: Actualizar GRID con TEXBOX
Hola Claudio
He modificado el Browse para que se pueda ver el abance y retroceso
de las lineas de los TeXBOX
en el Browse le he añadido al final:
ON CHANGE {|| ArribAbajo() } // <-------- añadir esta sentencia
y veras que en:
*---------------------------------*
Function ArribAbajo() // <-------- añadir esta sentencia
Win_1A.Tet_01.value := AGENDA->CODIGO
Win_1A.Tet_02.value := AGENDA->NOME
añadir resto Base de datos
Mirate el nuevo Sample, la Base de Datos funciona Sincronizada con el
Browse y el TexBox.
Un saludo
Mustafa
He modificado el Browse para que se pueda ver el abance y retroceso
de las lineas de los TeXBOX
en el Browse le he añadido al final:
ON CHANGE {|| ArribAbajo() } // <-------- añadir esta sentencia
y veras que en:
*---------------------------------*
Function ArribAbajo() // <-------- añadir esta sentencia
Win_1A.Tet_01.value := AGENDA->CODIGO
Win_1A.Tet_02.value := AGENDA->NOME
añadir resto Base de datos
Mirate el nuevo Sample, la Base de Datos funciona Sincronizada con el
Browse y el TexBox.
Un saludo
Mustafa
- Attachments
-
- SampleA.zip
- (751.21 KiB) Downloaded 350 times