FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexActive topicsAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour No apaga con programa que tiene TIMER
acuellar
Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM

No apaga con programa que tiene TIMER

Posted: Wed Jun 24, 2009 10:11 PM
Hola a todos

Tengo un programa oculto con un timer que recuerda las tareas pendientes, funciona bien, el problema es que no deja apagar el computador.
Aqui el c贸digo para que me ayuden:
Code (fw): Select all Collapse
#Include "FiveWin.ch"

FUNCTION Main()
   Private oWnd,oTimer,lSalir:=.F.,xBdr:=0

   DEFINE WINDOW oWnd FROM 0,1 TO 0,1 STYLE WS_POPUP
       
   ACTIVATE WINDOW oWnd ON INIT (Muestra(),TimerOn(oWnd),oWnd:Hide()) VALID lSalir
  oTimer:end()
  
Return Nil
*
Static Function TimerOn(oWnd)
  
  DEFINE TIMER oTimer INTERVAL 10000 ACTION Muestra()
    
  ACTIVATE TIMER oTimer
  xBdr:=1
Return(nil)
*
Static Function Muestra()
       Local cMensaje:="",vBdr:=0
    
       If xBdr=1
          oTimer:DeActivate()
       Endi
       
       IF MsgNoYes("INFORMATICA TIENE:"+CRLF+"2 Tareas Pendientes"+CRLF+"Desea que le recuerde en 1 hora?" +CRLF, "Recordar " )
          lSalir:=.F.
          If xBdr=1
             oTimer:Activate()
          Endi
       Else 
           lSalir:=.T.
          oWnd:End()
      Endi
          
Return(nil)

Desde ya muchas gracias por sus respuestas

Saludos

Adhemar
Saludos,



Adhemar C.
acuellar
Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM

Re: No apaga con programa que tiene TIMER

Posted: Thu Jun 25, 2009 06:50 PM

Amigos...

Alguna ayudita o sugerencia.

Saludos

Adhemar

Saludos,



Adhemar C.
TecniSoftware
Posts: 244
Joined: Fri Oct 28, 2005 06:29 PM

Re: No apaga con programa que tiene TIMER

Posted: Fri Jun 26, 2009 12:14 PM

Para apagar la pc podrias hacer :

ShellExecute( 0, "Open", "C:\Windows\System32\ShutDown.exe", " -s", 0, 1 )

Saludos!

Alejandro Cebolido

Buenos Aires, Argentina
ronaldo
Posts: 139
Joined: Fri Nov 25, 2005 04:38 PM

Re: No apaga con programa que tiene TIMER

Posted: Fri Jun 26, 2009 02:14 PM

veja se voc锚 n茫o esta utilizando o VALID na WINDOW?

Ronaldo

Ronaldo Minacapelli
Sistemas, Hospedagem e Cria莽茫o de WebSites
http://www.bazevani.com.br
acuellar
Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM

Re: No apaga con programa que tiene TIMER

Posted: Fri Jun 26, 2009 02:42 PM

Gracias Distinguidos

Ya habia probado con ShutDown desde el Ejecutar, pero no funciona
No siempre se querra apagar, puede ser que quiera reiniciar o cambiar de sesi贸n.

He encontrado un programa KillProc.exe, el cual he colocado en un .BAT en el escritorio el cual tienen que ejecutar antes de apagar, reiniciar o cambiar de sesi贸n.

Tengo una idea como el programa esta corriendo, como puedo hace para que con una combinacion de teclas por decir Alt-S pueda desactivar el timer y cerrar el programa.
En que parte del c贸digo debo colocar y como?

Gracias una vez mas por sus aportes

Saludos cordiales

Adhemar

Saludos,



Adhemar C.
yury
Posts: 56
Joined: Wed May 23, 2007 02:01 PM

Re: No apaga con programa que tiene TIMER

Posted: Fri Jun 26, 2009 05:56 PM
elimine o VALID da window...

Code (fw): Select all Collapse
ACTIVATE WINDOW oWnd ON INIT (Muestra(),TimerOn(oWnd),oWnd:Hide()) // VALID lSalir
Yury Marcelino Al
yury030575@yahoo.com.br
vimansca@vimansca.com.br
Leme / SP - Brasil
acuellar
Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM

Re: No apaga con programa que tiene TIMER

Posted: Fri Jun 26, 2009 06:15 PM

Gracias Distinguido Yuri

Funciona perfecto.

Antes no le entendi a Ronaldo

Se le agradece mucho a todos

Saludos

Adhemar

Saludos,



Adhemar C.

Continue the discussion

Static archive 路 New replies & topics via GitHub Discussions