Desligando o micro

Delphi

19/06/2003

Por favor alguém poderia me passar a função para se desligar o computador?
E se possível também, tem diferença da função dependendo da versão do Windows?

Valeu galera


:shock:


Lfernando

Lfernando

Curtidas 0

Respostas

Andrefsh

Andrefsh

19/06/2003

Use a dica abaixo. Acho que serve pra qualquer versão.

Desligando Windows via programação

function ExitWindowsEx(uFlags : integer; // shutdown operation
dwReserved : word) : boolean; // reserved
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;


GOSTEI 0
Andrefsh

Andrefsh

19/06/2003

Tente esta dica. Acho que ser pra qualquer versão. :?:

Desligando Windows via programação

function ExitWindowsEx(uFlags : integer; // shutdown operation
dwReserved : word) : boolean; // reserved
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;


GOSTEI 0
POSTAR