FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Como capturar inactividad
Posts: 47
Joined: Wed Apr 05, 2006 07:42 PM
Como capturar inactividad
Posted: Tue Sep 09, 2008 05:31 PM

Hola,

Requiero cerrar una ventana cuando no hay actvidad en x numero de segundos.... como pudiera hacer esto ?

Gracias

Rene

Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Como capturar inactividad
Posted: Thu Sep 11, 2008 10:23 PM

Rene,

Que elementos tienes en esa ventana ? Men煤 principal ? Barra de botones ?

La idea es usar un timer que incrementaria una variable cada x segundos y al llegar a un determinado valor, cerraria la ventana.

Al ejecutar una opci贸n del menu 贸 de la barra de botones, pondrias el contador a cero y dejarias de incrementar la variable. Al volver de la opci贸n ejecutada, volver铆as a incrementar el contador.

Puedes usar una variable que controle si has comenzado una acci贸n y asi dejar de incrementar el contador.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
Como capturar inactividad
Posted: Fri Sep 12, 2008 02:08 PM

Hola.
Lo hago asi:
Defino el protector de pantallas del windows en unos 5 min con una contrase帽a. y listo,
y cuando debo de dejar la pc con la app en actividad, defino en una tecla la llamada al protector

Function Main()
...
SetKey(VK_F12,{||Bloqueo()}) // F12 activa el savescreen del windows
....
.

......
Function Bloqueo(oTimer)
oTimer:DeActivate()
SendMessage(oWnd:hWnd,274,61760,0)
Return Nil

Posts: 47
Joined: Wed Apr 05, 2006 07:42 PM
Como capturar inactividad
Posted: Fri Sep 12, 2008 05:06 PM

Gracias por contestar.

Lo que quiero hacer es cerrar una ventana de un sistema cuando no se este usando para evitar tener las bases de datos abiertas ya que hay muchos problemas de apagones de luz y eso hace que se est茅n corrompiendo las bases seguido.

Gracias

Continue the discussion