Timer em screen

[Carlos Lima]

Buenas tardes,
Necesito crear un temporizador en la pantalla principal del programa y que el temporizador cada 15 minutos realice una operación para mí, mientras la aplicación se está ejecutando.
Alguien me puede ayudar.
Gracias por adelantado

[Allan Raúl Acuña]

CON ESTE TRUCO PODEMOS HACER QUE CADA CIERTO TIEMPO SE CONSULTE UNA TABLA DE MENSAJES PARA USUARIOS EN RED O CHEQUEAR PARA REVISAR SI TENEMOS NUEVO CORREO...EN FIN._SCREEN.ADDOBJECT('OTIME','TIMERSCREEN')* DEFINICION DE LA CLASE TIMERSCREEN* MUESTRA UN RELOJ EN UN WAIT WINDOW* ESTE SE ACTUALIZA CADA UN SEGUNDODEFINE CLASS TIMERSCREEN AS TIMER       INTERVAL= 1000   PROCEDURE TIMER        WAIT WINDOW (TIME()) NOWAIT   ENDPROCENDDEFINE

_SCREEN.ADDOBJECT('OTIME','TIMERSCREEN')

O BIEN

* DEFINICION DE LA CLASE TIMERSCREEN

* MUESTRA UN RELOJ EN UN WAIT WINDOW

* ESTE SE ACTUALIZA CADA UN SEGUNDO

DEFINE CLASS TIMERSCREEN AS TIMER

       INTERVAL= 1000

   PROCEDURE TIMER

        WAIT WINDOW (TIME()) NOWAIT

   ENDPROC

ENDDEFINE

Lic. Allan Raul Acuna
Analista Programador
msn= allan...@hotmail.com
skype= NicEasySoft
            +(505) 8 999 8950

Managua, Nicaragua

Centroamerica

---

De: publice...@googlegroups.com <publice...@googlegroups.com> en nombre de Carlos Lima <carlos...@gmail.com>
Enviado: martes, 10 de mayo de 2022 11:58
Para: Comunidad de Visual Foxpro en Español <publice...@googlegroups.com>
Asunto: [vfp] Timer em screen

 

--
Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/12e46694-5cb5-48e9-9082-95f09d667a83n%40googlegroups.com.

[ZeRoberto]

Primero creas una clase timer con el tiempo y con la función que va a realizar luego lo añades al screen

Saludos

Ze

--

[Dsan]

Hola colegas...

Ahí me disculpan pero yo desde que me inicie con foxpro visual, he tenido muy mala experiencia con los Timer... En mi caso no me gusta usarlo y si hay otras formas de solucionar mejor.

1. Se puede hacer un formulario base, por tipos de procesos, en el  Actívate de cada formulario poner DODEFAULT(), crear una función para llamarse en la clase base fVerifyClose en mi caso, acá llamas a tu tabla en el servidor y si un campo indica 1 pasa sin acción, si es 0 inactivo, aplica el fVerifyClose con un alerta que se va cerrar la aplicación por mantenimiento o algún motivo... Esto lo puedes poner también en Move del objeto principal.

Y si alguien se fue y dejó la app abierta, la puedes cerrar desde el servidor si usas tablas dbf y el exe si está usando carpetas compartidas. 

Si es cliente servidor con mysql, sql serv. u otro, pos en la funcion Verificar Handle, no permitis conectarse hasta que tu campo en el server este activo, o sea si esta abierto el sistema no importa porque la conexion estara muerta, si al verificar el campo esta en 0. este va enviar mensaje y pasar el nHandle a 0.

El Sistema web es más centralizado, los mantenimientos... el problema es cuando hay un usuario registrando una caja chica cheque sujeto a rendición  y son 150 registros y se los matas el proceso o le cerras usando timer, sabelo ya tienes un enemig@ en esa empresa, antes de aplicar cierre total por timer te aconsejo si hay este caso, te aconsejo todo registro digitado  grabarlo local y al entrar a esa ventana indicarle al usuario si desea continuar un documento nuevo o recuperar el que estaba trabajando...

Saludos

DS

--

[Victor Espina]

Un timer con una frecuencia de 1 seg que se este ejecutando permanentemente para hacer consultas en una BD es una PESIMA idea.  Un refresco tan alto va a afectar la usabilidad del programa SI o SI.

Victor Espina