Estimados Amigos, necesito su ayuda, tengo una ventana de datos que se carga con una consulta de un archivo MySql, La ventana muestra cinco l铆neas de datos, en un momento, pero si hay mas l铆neas de informaci贸n, el usuario debe hacer movimientos con las flechas cursoras o con el mousse, el desplazamiento necesario para seguir observando mas l铆neas de informaci贸n, mi pregunta es, se puede hacer alguna funcion o la clase xbrowse, tiene una opcion para que se vaya desplazando de forma automatica linea a linea por un cierto tiempo y retornar al principio y volver al inicio y empezar de nuevo, la secuencia.
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour desplazar en Xbrowse
kpidata:
La informaci贸n que proporcionas es escasa, asumo que alg煤n
otro usuario agrega m谩s l铆neas y esas son la que no se ven.
Si es el caso, te recomiendo las siguientes dos l铆neas de c贸digo:
oRs:Requery()
oBrw:Refresh()
Espero sirvan de algo
Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Mi idea seria poner un Timer para que cada 2 segundos
salta de rengl贸n
As铆 le entend铆.
Amigos, el tema es que genero un browse con servicios de taller a realizar, estos datos los digita una persona en una oficina y en el taller deben ir viendo esta informacion,
el tema es que en la pantalla solo se visualizan 5 lineas de los datos a procesar, para ver mas... el tecnico debe ir al computador y mover el mousse o las flechas cursoras para ir viendo las lineas que estan mas abajo del xbrowse... pero si el tecnico se olvida.. no ve el detalle que esta mas abajo, por lo que necesito saber como es que logro hacer que cada cierto tiempo, el programa con el xbrowse abierto, pase del foco de la linea 1 a la linea 2, y despues a la linea 3 y asi hasta la linea... N, para despues, volver al inicio y empezar de nuevo... aun cuando se agregan nuevas lineas, a lo menos que me muestre el contenido completo de la consulta, y asi.. si son mas de 5 filas, el sistema solo pase a la 6, 7, 9, etc.. y al rato volver a la 1 y asi volver a comenzar...
kpidata:
Entonces, creo, es una combinaci贸n de la respuesta de Javier (Saludos Javier) y la m铆a
Hacer un timer que cada n segundos haga el ReQuery() y el Refresh()
Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Estimados, trato de entender lo que me dicen, pero me pierdo, mi conocimiento de Xbrowse es limitado, en pocas palabras, tengo estas 3 dudas en particular.
a) Debo dejar el foco al ingresar a la consulta.
b) Ya en la primera linea... como hago para que baje solo a la segunda.
c) ya en el final, como hago para que suba a la primera linea... del browse... y empezar de nuevo
Kpidata
Utilizando un Timer as铆 te podes mover
Utilizando un Timer as铆 te podes mover
oBrw:GoDown(nLine) //Abajo
oBrw:GoUp(nLine) //Arriba
oBrw:GoBottom() //Final
oBrw:GoTop() //InicioSaludos,
Adhemar C.
Adhemar C.
Esto es con DBF pero es casi identico a Mysql
#include "FiveWin.ch"
#include "xbrowse.ch"
FUNCTION Main()
local oChild, oBrw, oTimer
USE CUSTOMER NEW
DEFINE WINDOW oChild TITLE "Mueve Solo"
@ 0,0 XBROWSE oBrw OF oChild AUTOCOLS ALIAS "CUSTOMER" LINES CELL 105,80 pixel
WITH OBJECT oBrw
:CreateFromCode()
:bPastEof := {|| oBrw:GoTop()} //Esto hace que cuando intentes pasar el ultimo registro, vuelva solo al primero
END
oChild:oClient := oBrw
DEFINE TIMER oTimer INTERVAL 1000 ACTION Mover(oBrw) OF oChild // Un segundo de demora
ACTIVATE WINDOW oChild ON INIT (oBrw:SetFocus(), oTimer:Activate())
RETURN NIL
STATIC FUNCTION Mover(oBrw)
oBrw:GoDown()
oBrw:Refresh()
RETURN nilEstimados... amigos... fueron de mucha ayuda... el ultimo comentario me ayudo al final de resolver el problema... quedo super bien