Delphi dicas

Desligar/reiniciar/logoff sistemas windows

Usando o WinExec para Desligar/Reiniciar/Logoff no Windows





WinExec('Shutdown  -f -t 00', SW_SHOWNORMAL);  //faz logoff do sistema



WinExec('Shutdown  -s -f -t 00', SW_SHOWNORMAL);  //reinicia o sistema



WinExec('Shutdown  -r -f -t 00', SW_SHOWNORMAL);  //desliga o sistema





Obs.: Creio que so vai funcionar em VCL, Se o Administrador bloquear o nao tiver o shutdown no sitemas esses nao vao funcionar...

por : Gustavo Dos Santos