FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Pantalla Informativa
Posts: 883
Joined: Tue Oct 11, 2005 11:57 AM
Pantalla Informativa
Posted: Mon Jan 14, 2019 02:22 PM

Bs dias Fivewinners

Necesito ayuda en algo que se me solicito.

Hace a帽os atras hice una pantalla informativa que mostraba el estado de ciertos procesos dentro de una industria, eran solo 5 procesos
Hice un xbrowse con el nombre del procesos, estado y un dato numerico, Lo refrescaba cada 2 minutos. EL ingreso del dato se hacia en otra parte y modificaba unos datos en un DBF
Hasta ahi todo bien.

Ahora me pidieron algo parecido, hay cambios, uso MYSQL (no hay problema ahi) pero no conozco el numero total de items a mostrar, quizas sean mas de los que caben en una sola pantalla de xbrowse, si ese es el caso necesito hacerle un scroll automatico. No hay ingreso de datos ni manipulacion del programa en ese Pc, solo se usa para mostrar los datos

Cualquier ayuda sera bienvenida.

Saludos desde Chile.
Adolfo

;-) Ji,ji,ji... buena la cosa... "all you need is code"

http://www.xdata.cl - Desarrollo Inteligente
----------
Asus TUF F15, 32GB Ram, 2 * 1 TB NVME M.2, GTX 1650
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Pantalla Informativa
Posted: Mon Jan 14, 2019 02:32 PM

Despu茅s de a帽adir el nuevo registro, creo que un GoBottom te puede servir

Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noci贸n del tiempo

El secreto de la felicidad no est谩 en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 883
Joined: Tue Oct 11, 2005 11:57 AM
Re: Pantalla Informativa
Posted: Mon Jan 14, 2019 02:45 PM

Hola, gracias.
El problema que en ese equipo, no hay intervencion humana, en el tiempo transcurrido entre cada refresco de los datos, pueden desaparecer y aparecer hasta 30 datos nuevos y viejos.

La idea es que puedo refrescar el query sin problemas , pero como hago para que el xbrowse haga un scroll arriba o abajo en forma automatica, para ir mostrando TODOS los datos consultados y lo siga haciendo mientras no haya un nuevo refresco de datos.

Eso.

Saludos

;-) Ji,ji,ji... buena la cosa... "all you need is code"

http://www.xdata.cl - Desarrollo Inteligente
----------
Asus TUF F15, 32GB Ram, 2 * 1 TB NVME M.2, GTX 1650
Posts: 1364
Joined: Wed Jun 21, 2006 12:39 AM
Re: Pantalla Informativa
Posted: Mon Jan 14, 2019 03:00 PM

Y si cuando haces una inserci贸n refrescas el browse y ejecutas browse : gobottom() como te sugiri贸 Cristobal. No necesitas intervenci贸n humana de esta manera.

Saludos

Posts: 1344
Joined: Wed Nov 16, 2005 09:14 PM
Re: Pantalla Informativa
Posted: Mon Jan 14, 2019 03:54 PM
Hola Adolfo:
Creo que podrias realizarlo con 2 timers, uno para el refresco total de datos, y otro (mucho mas corto) para que haga un movimiento de a uno.
Algo asi como
Code (fw): Select all Collapse
DEFINE TIMER oTimer2 INTERVAL 4000 OF oWnd ACTION MoverProximo()
....

STATIC FUNCTION MoverProximo()
IF !oQry:EOF()
聽 聽 oQry:Skip()
聽 聽 ELSE 
聽 聽 oQry:GoTop()
ENDIF
oBrw:Refresh()
Posts: 346
Joined: Mon Oct 05, 2009 03:35 PM
Re: Pantalla Informativa
Posted: Mon Jan 14, 2019 03:59 PM
Hola Adolfo:

yo utilizo un dbf temporal el cual indexo el campo fecha + hora de forma descendente y uso el gotop() en el xbrowse, se refresca cada 30 segundos y no hay intervenci贸n del usuario.

SkyPe: armando.lagunas@hotmail.com

Mail: armando.lagunas@gmail.com
Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
Re: Pantalla Informativa
Posted: Mon Jan 14, 2019 05:43 PM

Hola a todos.....
prueba esto, a mi me funciona... pero 1ro debes averiguar cuantos registros vas a mostrar,,, en este caso siembre se visualizar谩n los 煤ltimos 10 registros...
tomando en cuenta que el campo "registro" es un autocorrelativo, asi que en este caso son dos consultas anidadas espero te sirva
SELECT * FROM ( SELECT * FROM productos ORDER BY registro DESC LIMIT 10) sub GROUP BY registro

Posts: 1088
Joined: Fri Oct 07, 2005 03:33 PM
Re: Pantalla Informativa
Posted: Tue Jan 15, 2019 01:31 AM

Adolfo,

puedes paginar, ya sea cambiando toda tu estructura por una p谩gina por dato o de manera hibrida un xBrowse por p谩gina sin hacer scroll

solo una idea

saludos

Marcelo

Posts: 162
Joined: Wed Feb 22, 2017 02:19 AM
Re: Pantalla Informativa
Posted: Tue Jan 15, 2019 03:56 AM

Estimado.
Hace muchos a帽os lo hice.
Mira Yo tengo algo parecido pero en una extension de monitor, Ahi tengo que mostrar evenos de produccion y otras cosillas, lo que hice fue muy simple ya que era mucha la informacion que tenia poner en un xbrowse, yo utilize un dlg o windows y fonts lejibles desde cierta distancia hice una plantilla que voy escribiendo y refrescando los datos de 2 maneras en el monitor .

Todo en Mysql.

1 Aquellos registros que no tengan mas cierto tiempo de haber sido acrulizados o incluidos como nuevos con un fecha / hora proceso
2 Hago un recorrido desde el 1er con skip hasta el EOF() y pongo un tiempo de espera en cada registro al final de tabla vuelvo al primero

Todo lo hice con un timer y me fue de perlas ,
Habe si te sirve la idea.

Regards.
S.I.T.U.
Sistemas Inteligentes de transporte urbano
http://www.situcr.com
oscarchacon@Situcr.com
Desarrollos BA4/B4j androide
Posts: 883
Joined: Tue Oct 11, 2005 11:57 AM
Re: Pantalla Informativa
Posted: Wed Jan 16, 2019 08:57 PM

Gracias a todos por los tips.
He estado fuera por algunos dias, revisare apenas pueda.

Saludos y gracias nuevamente.

Adolfo

;-) Ji,ji,ji... buena la cosa... "all you need is code"

http://www.xdata.cl - Desarrollo Inteligente
----------
Asus TUF F15, 32GB Ram, 2 * 1 TB NVME M.2, GTX 1650

Continue the discussion