GARANTIR DESCONTO

Fórum Detectando a saída do Windows #175994

19/08/2003

0

Alguém tem algo pronto, que realmente funcione relacionado à saída do Windows?

Por Exemplo:

Eu quero fazer um programa que detecta a chamada de saída do Windows, ou o Desligamento do Windows ou a efetuação de logoff, alguém sabe fazer isto?

Atenciosamente, NetCrusher


Netcrusher

Netcrusher

Responder

Posts

19/08/2003

Nildo

Para detectar a finalização do Windows, deve-se capturar a mensagem WM_ENDSESSION. Estes passos devem ser tomados:

Declarar uma rotina de manipulação de mensagens na sessao private de sua form:

procedure WMEndSession(var Msg : TWMEndSession); message WM_ENDSESSION;
Adicionar a procedure à seção implementation de sua unit:

procedure TForm1.WMEndSession(var Msg : TWMEndSession);
begin
if Msg.EndSession = TRUE then
ShowMessage(´O Windows está finalizando ´ + #13 + ´às ´ +
FormatDateTime(´c´, Now));
inherited;
end;


// Dica 154 do Dicas e Truques de Delphi - 800 dicas: http://www.lloydsoft.hpg.com.br


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar