Desligando windows via programação
Código
Function ExitWindowsEx(uFlags : integer; dwReserved : word) : boolean; external 'user32.dll' name 'ExitWindowsEx';
procedure Tchau;
const
EWX_LOGOFF = 0; // Dá "logoff" no usuário atual
EWX_SHUTDOWN = 1; // "Shutdown" padrão do sistema
EWX_REBOOT = 2; // Dá "reboot" no equipamento
EWX_FORCE = 4; // Força o término dos processos
EWX_POWEROFF = 8; // Desliga o equipamento
begin
ExitWindowsEx(EWX_FORCE, 0);
end;
É só isso.
Publicidade
Vote na dica
Quantidade de votos: 0 votos
Aceitação: 0%
Detalhes da dica
Categoria: Windows
Adicionada dia: 11/04/07
Por: Samuel Bergman Cavalcanti Souza
Visualizada: 3171 vezes
Adicionada dia: 11/04/07
Por: Samuel Bergman Cavalcanti Souza
Visualizada: 3171 vezes
COLUNISTAS
Publicidade
Enquete
O que achou do novo site?
Validações
Publicidade
Enquete
O que achou do novo site?
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009