Programme beim Shutdown des PC's ausführen.

[bjacke]

Habe das aus dem Easy Delphi Helper:

const=WM_QUERYENDSESSION

Delphi-Quellcode:

private
  procedure WMQueryEndSession (var M: TWMQueryEndSession); message 
    WM_QUERYENDSESSION;

Delphi-Quellcode:

procedure TForm1.WMQueryEndSession (var M: TWMQueryEndSession);
begin
  inherited; //Wichtig
  //Hier kommt dann der Quellcode rein z.B.
  ShowMessage('Das Programm wird jetzt gleich durch Windows beendet');
end;