Buscar

Habilitando e desabilitando a proteção de tela via delphi

Código

{É possível habilitar e desabilitar o Protetor de Tela (Scren-Saver), via programação utilizando a API do Windows SystemParametersInfo, que é utilizada para ajustar algumas opções do ambiente Windows. }

function ScreenSaver(AEnabled: Boolean): Boolean;
var
Flag: byte;
begin
if AEnabled then
Flag := 1
else
Flag := 0;

Result := SystemParametersInfo(SPI_SETSCREENSAVEACTIVE, Flag, nil, 0);
end;

 

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%

Detalhes da dica

Categoria: Windows
Adicionada dia: 23/01/04
Por: Jose Ribeiro
Visualizada: 3564 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009