Agendador de tarefas no Dephi ?

11/05/2003

2

Eu costumo baixar muita coisa na Internet e queria fazer um programa que desconectasse da Internet às 5:55 da manhã, fechasse sozinho e depois desligaria o computador ... Tem como fazer isso ?


Responder

Posts

11/05/2003

Aroldo Zanela

Colega,

Veja as opções disponíveis:

ExitWindowsEx(EWX_SHUTDOWN, 0);//desliga a máquina não sei se funciona no ME ou XP. 
ExitWindowsEx(EWX_Force, 0);//Fecha tudo no windows 
ExitWindowsEx(EWX_Logoff, 0);//logoff no windows 
ExitWindowsEx(EWX_Reboot, 0);// Reinicia o windows 
ExitWindowsEx(EWX_Poweroff, 0);//Desliga a máquina se a sua fonte permitir. 
ExitWindowsEx(EWX_Force+EWX_Shutdown, 0);//Desliga sem ser questionado.



Responder

11/05/2003

Aroldo Zanela

Colega,

Veja as opções disponíveis:

ExitWindowsEx(EWX_SHUTDOWN, 0);//desliga a máquina não sei se funciona no ME ou XP. 
ExitWindowsEx(EWX_Force, 0);//Fecha tudo no windows 
ExitWindowsEx(EWX_Logoff, 0);//logoff no windows 
ExitWindowsEx(EWX_Reboot, 0);// Reinicia o windows 
ExitWindowsEx(EWX_Poweroff, 0);//Desliga a máquina se a sua fonte permitir. 
ExitWindowsEx(EWX_Force+EWX_Shutdown, 0);//Desliga sem ser questionado.


As funções acima estão declaradas na unit windows e pertencem a API do Windows (User32.DLL).


Responder

11/05/2003

Glaubergs

OK, só mais uma coisa pra eu poder fazer o programa: qual o comando pra fechar um arquivo em execução ?


Responder

11/05/2003

Aroldo Zanela

Colega,

Acabei de postar para outra dúvida aqui:
http://clubedelphi.videomart.com.br/viewtopic.php?t=11207


Responder

11/05/2003

Glaubergs

if FindWindow(´OpusApp´, nil) > 0 then
PostMessage(FindWindow(´OpusApp´, nil ), WM_CLOSE,0,0);

OK, eu coloquei algo parecido com isso mas no meu caso não serve. O que eu gostaria que ele fechasse não está aberto em uma janela. É o Discador UOL, que fica apenas com um ícone perto do relógio ... Quando eu fecho o programa ele começa a fechar todos os aplicativos do micro mas aih ele pergunta se deseja manter a conexão ...


Responder
×
+1 DevUP
Acesso diário, +1 DevUP
Parabéns, você está investindo na sua carreira