Flavio A. Zago Posted July 18, 2002 Report Share Posted July 18, 2002 Saudacoes a todos. Como posso inconizar o seguinte programa do lado direito da barra de tarefa do Windows? (Ao lado do relogio) PS. Utilizo a versao 1.95 do FiveWin #Include "FiveWin.ch" STATIC oWnd,; lActive := .F. FUNCTION Main() LOCAL oTmr DEFINE WINDOW oWnd TITLE "Stand By" DEFINE TIMER oTmr INTERVAL 2000; ACTION CheckFile() OF oWnd ACTIVATE TIMER oTmr ACTIVATE WINDOW oWnd ICONIZED RETURN NIL FUNCTION CheckFile() IF ! lActive lActive = .T. IF FILE('C:\TESTE.TXT') MsgBeep() ENDIF lActive = .F. ENDIF RETURN NIL Grato Flavio genese@linkway.com.br Quote Link to comment Share on other sites More sharing options...
Admin1361303104 Posted July 22, 2002 Report Share Posted July 22, 2002 OLá, Você poderá encontrar um exemplo na área de download. (Download/Fivewin-Classes Novas/taskbar.zip) []'s Gregório citação:Saudacoes a todos. Como posso inconizar o seguinte programa do lado direito da barra de tarefa do Windows? (Ao lado do relogio) PS. Utilizo a versao 1.95 do FiveWin #Include "FiveWin.ch" STATIC oWnd,; lActive := .F. FUNCTION Main() LOCAL oTmr DEFINE WINDOW oWnd TITLE "Stand By" DEFINE TIMER oTmr INTERVAL 2000; ACTION CheckFile() OF oWnd ACTIVATE TIMER oTmr ACTIVATE WINDOW oWnd ICONIZED RETURN NIL FUNCTION CheckFile() IF ! lActive lActive = .T. IF FILE('C:\TESTE.TXT') MsgBeep() ENDIF lActive = .F. ENDIF RETURN NIL Grato Flavio genese@linkway.com.br id=quote>id=quote> Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.