Fórum Como impedir que um sistema seja fechado...? #342770

Olá pessoal to querendo esconder o sistema do CTRL+ALTE+DEL e da barra de tarefas...

Como eu faço isso...?

Estou tendando com essa função e nada está dando erro....

O meu propósito é colocar um Edit para eu digirar o tempo que o computador ficará ligado, quando o tempo acabar o sistema vai fechar todos os programas e desligar automaticamente...





implementation


function RegisterServiceProcess (dwProcessID, dwType: DWord) : DWord; stdcall; external ´KERNEL32.DLL´;

{$R *.DFM}



procedure TForm1.Button1Click(Sender: TObject);
begin
//Esconder...
RegisterServiceProcess(GetCurrentProcessID,1);
end;

No evento Onclick do botão Aparecer insira o seguinte código:

procedure TForm1.Button2Click(Sender: TObject);
begin
//Mostrar...
RegisterServiceProcess(GetCurrentProcessID,0);
end;