FiveTech Software tech support forums

Dear All,

I used oTimer in many screen. It's should be close in valid clause.

How can I check, which oTimer are still running?

Thanks in advance,

... Does exist an alternative to sleep function? Is it possible to active a second timer? When the function polling is in execution I perform a oTimer:deactivate() obviously at the end before RETURN here is a oTimer:activate() Many thanks

... Use a timer and change the icon I tried but I not Know How make it If lOld oMsgItem2:SetText("Archivio non aggiornato!" ) DEFINE TIMER oTimer OF oMsgItem2 ; INTERVAL 400 ; ACTION oMsgItem2:SetBitmap( MSG_ALERT, MSG_ALERT ) )) //??? ACTIVATE TIMER oTimer Endif

... pruebas hasta que consiga enlacar para liarme con el resto. Gracias #include "FiveWin.ch" #include "hbcurl2.ch" static oWnd, oTimer, oReader, oTdif, oFTP, oInternet, nDis //----------------------------------------------------------------------------// function Main() local ...

... Ya he conseguido abrir la página dónde se identifica el usuario. Activo un oTimer que cada 3 segundos comprueba que se haya identificado correctamente y el servidor haya redirigido a la Url con el "?code=". El ActiveX ...

I wish show the time on the ribbon

DEFINE FONT oFontBig NAME "MS Sans Serif" SIZE 0, -38
DEFINE TIMER oTimer OF ::oWndMain ACTION ::oBar:aDialogs[1]:Say( 0, 135, Time(),, , oFontBig )
ACTIVATE TIMER oTimer

It run ok
but How I can to make transparent the text ?

define window... DEFINE TIMER oTimer_Connection OF M->oWnd INTERVAL 30000 ACTION (oTimer_Connection:DeActivate(), Connection_Test(), oTimer_Connection:Activate()) procedure Connection_Test() Local oError, lConectaNovamente := .f. TRY if !M->oServer:Execute( "SET @dummy=0" ) M->oSe...

Dear Mr.Rao,

I will test and feedback to you.

nageswaragunupudi wrote:

Code: Select all  Expand view

AEval( GetAllWin(), { |o| If( o == nil .or. o:hWnd == GetWndApp(), nil, o:End() ) } )
 

Thanks you so much.

Dear Uwe,

I got the solution as your recommendation, it works fine now. The lOpen will be .F. in the Main procedure (Home) after return from sub-dialog.

Thanks for an idea.
Dutch

... a window http://www.pflegeplus.com/IMAGES/Autoclose.jpg #include "fivewin.ch"#define SC_CLOSE   0xF060STATIC oWnd, oTimer, lOpen[3]FUNCTION MAIN()local oDlg[3], oBtn[4] I := 1FOR I := 1 TO 3    lOpen[3] := .F.NEXTDEFINE WINDOW ...

Dear All, I need to close all activated dialog by autooff() *alike screen saver*. I can use this below function for automatic log off (popup login screen) the program. http://forums.fivetechsupport.com/viewtopic.php?f=6&t=21595&start=0&hilit=getInputState I need to return...

Try to move the timer activation to the ON INIT clause (oTimer_1:Activate()).

EMG