FiveTech Software tech support forums

areang wrote:Enrico,

Thank to reply about timer on dialog
I missing to add oTmr:hWndOwner := oDlg:hWnd

Now work fine.

How about OCX with DIALOG ?


Best Regard
Areang

I don't know, sorry.

EMG

Enrico,

Thank to reply about timer on dialog
I missing to add oTmr:hWndOwner := oDlg:hWnd

Now work fine.

How about OCX with DIALOG ?


Best Regard
Areang

Intenta esto a ver que tal va: Function CheckFile(oTmr) Select 1 Go 1 iF aRetiros->Ventas >= 15000 oTmr:DeActivate() <--------------------- MsgAlert("Favor de Retirar Efectivo de Caja","Advertencia") oTnr:Activate() <--------------------- ...

Hola: Como puedo hacer que un timer se detenga para posteriormente volver a activar, explico el caso: defino un timer Define TIMER oTmr INTERVAL 5000 ACTION CheckFile(oTmr) of oDlg . . ACTIVATE TIMER oTmr Function CheckFile(oTmr) Select 1 Go 1 iF aRetiros->Ventas >= 15000 MsgAlert("Favor ...

... * Etat d'attente permettant de réduire le temps CPU sous Windows * nDelai doit être indiqué en millisecondes STATIC BCOND STATIC oTmr STATIC NOUVDELAI := 1 STATIC ANCMILLI lExit := .F. ancFocus := GetFocus() IF oTmr = NIL .OR. NOUVDELAI != MAX(nDelai, PUBVAR(155)) NOUVDELAI := ...

... LOCAL RET:=.F. SALIR:=99 IF cProcesando ELSE RET:=.T. ENDIF if oMysql # nil .and. ret oMysql:Close() endif if ret TaskDelIcon( oTray ) IF oTmr # nil oTmr:Deactivate() ENDIF endif RETURN RET Saludos,