Agendador de tarefas no Dephi ?

Question

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 ?...

Aroldo Zanela · Answer

Colega,Veja as op��es dispon�veis:[code:1:cd4824d237]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.[/code:1:cd4824d237]...

Aroldo Zanela · Answer

Colega,Veja as op��es dispon�veis:[code:1:9484fb0db9]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.[/code:1:9484fb0db9]As fun��es acima est�o declaradas na unit windows e pertencem a API do Windows (User32.DLL)....

Glaubergs · Answer

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

Aroldo Zanela · Answer

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

Glaubergs · Answer

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 ...

F�rum Agendador de tarefas no Dephi ? #159351