Chave de Registro para ligar/desligar o monitor

Delphi

05/07/2004

Olá!

Alguém sabe qual é a chave de Registro para ligar/desligar o monitor no windows2000?????????
:shock:


Ampaline

Ampaline

Curtidas 0

Respostas

Rômulo Barros

Rômulo Barros

05/07/2004

Siga: :arrow:

http://delphiforum.icft.com.br/forum/viewtopic.php?t=2708&highlight=desligar+monitor

http://delphiforum.icft.com.br/forum/viewtopic.php?t=39919&highlight=desligar+monitor

http://delphiforum.icft.com.br/forum/viewtopic.php?t=41103&highlight=desligar+monitor

http://delphiforum.icft.com.br/forum/viewtopic.php?t=18458&highlight=desligar+monitor

http://delphiforum.icft.com.br/forum/viewtopic.php?t=38032&highlight=desligar+monitor


GOSTEI 0
Reginaldo174

Reginaldo174

05/07/2004

procedure LigaMonitor (ligar: boolean);
begin
if ligar then
SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, -1)
else
SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 0);
end;


GOSTEI 0
Rômulo Barros

Rômulo Barros

05/07/2004

procedure LigaMonitor (ligar: boolean); begin if ligar then SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, -1) else SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 0); end;





http://delphiforum.icft.com.br/forum/viewtopic.php?t=39919&highlight=desligar+monitor


GOSTEI 0
POSTAR