Problemas ao desligar o Windows
Olá, tenho um programa que roda no tray do windows.... ele eh executado na inicializacao do windows, porem quando vou finalizar o windows o programa nao deixa o windows desligar... como soluciono este problema.
Desde já agradeco.
Desde já agradeco.
Titanius
Curtidas 0
Respostas
Manoeljr
29/12/2003
Declare essa procedure na cláusula Private da unit principal de seu aplicativo:
procedure WMQueryEndSession (var Msg : TWMQueryEndSession); message WM_QueryEndSession;
Em seguida Digite o Corpo da Procedure na seção implementation da mesma unit:
procedure TForm1.WMQueryEndSession (var Msg : TWMQueryEndSession);
begin
Application.ProcessMessages;
Application.terminate;
Msg.Result := 1;
end;
Acredito que assim seu aplicativo agora deixara o windows se desligar normalmente, Qualquer dúvida me manda um e-mail.
procedure WMQueryEndSession (var Msg : TWMQueryEndSession); message WM_QueryEndSession;
Em seguida Digite o Corpo da Procedure na seção implementation da mesma unit:
procedure TForm1.WMQueryEndSession (var Msg : TWMQueryEndSession);
begin
Application.ProcessMessages;
Application.terminate;
Msg.Result := 1;
end;
Acredito que assim seu aplicativo agora deixara o windows se desligar normalmente, Qualquer dúvida me manda um e-mail.
GOSTEI 0