Shutdown-Folder, oder: Wie starte ich ein Prog beim Win-Runterfahren?

[Guido Eisenbeis]

Zitat von Iwo Asnet:

Schreib Dir ein kleines Programm ohne sichtbares Fenster, reagiere auf die Message "WM_QUERYENDSESSION", setze die Lautstärke herab oder mach sonstwas. Im Messagehandler musst Du auf die Message reagieren (result auf TRUE/1) setzen.

Hab ich gemacht. Das funktioniert auch in ein paar Tests. Es ist aber irgendwie nur eine Notlösung, da hierbei nur der konkrete Fall mit dem Runtersetzen der Lautstärke zum Erfolg führt. Es ist auch bei Result := True schön zu sehen, wie rund um das eigene Programm alle anderen beendet werden: Alle sichtbaren Fenster werden geschlossen, und im Systray macht es plop, plop, plop und ein Programm nach dem aderen verschwindet. Unter anderem auch das Antiviren-Programm.

Deshalb Notlösung, weil das nicht so "sauber" ist. Ein anderes Programm, das etwas länger braucht (z. B. zum Aufräumen in Temp-Ordnern oder das vielleicht noch eine kleine Sicherung der wichtigsten Daten machen soll), untergräbt die Sicherheitsmaßnahmen. Vielleicht kann es auch garnicht richtig laufen, weil schon Dienste und Programme beendet sind, die es braucht.

Wie gesagt, ich kann den Umfang nicht einschätzen, aber es wäre eine Notlösung.

Zitat von CCRDude:

Ich verweise nochmal vorsichtig auf meinen Tipp weiter oben - Winlogon-DLLs sind einfach erstellt, und haben den Vorteil, daß sie nicht von Windows beendet werden, wie Windows halt so versucht, Programme beim Herunterfahren zu beenden.

Das habe ich nicht vergessen. Aber offen gesagt, wird mir der Aufwand langsam zu hoch. Zu dieser Lösung habe ich keine Code-Beispiele, und ich habe bisher nur vielleicht 3 oder 4 DLLs programmiert. Ich müsste also praktisch bei Null anfangen und ebenso wie beim Thema "Winlogon Notification Packages", das du freundlicherweise verlinkt hast.

Wenn du ein Code-Beispiel oder einen Link hast, und / oder mir was sagen kannst über die Abläufe und Wirkungen dieser Lösung (z. B. ob da andere Progs beendet werden, wie bei QUERYENDSESSION), könnte ich den Aufwand vielleicht ein wenig überblicken.

Guido.

[CCRDude]

Klar kann ich Dir dazu auch etwas mehr liefern, war nur am Wochenende nicht am Entwicklungsrechner

In InnoSetup installiere ich meine DLL so:

Code:

[Files]
Source: WinLogonExample.dll; DestDir: {win}; Flags: restartreplace overwritereadonly uninsrestartdelete

[Registry]
; http://msdn.microsoft.com/en-us/library/aa379402(VS.85).aspx
Root: HKLM; Subkey: SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\Notify\WinLogonExample; ValueType: expandsz; ValueName: DllName; ValueData: WinLogonExample.dll; Flags: uninsdeletekey
Root: HKLM; Subkey: SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\Notify\WinLogonExample; ValueType: string; ValueName: Logoff; ValueData: LogoffHandler
Root: HKLM; Subkey: SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\Notify\WinLogonExample; ValueType: string; ValueName: Shutdown; ValueData: ShutdownHandler
Root: HKLM; Subkey: SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\Notify\WinLogonExample; ValueType: dword; ValueName: Asynchronous; ValueData: 1

Oder anders gesagt, das sind drei bis vier Registry-Einträge, die nötig sind. Die Namen der Handler müssen identisch mit den DLL-Exports sein, Du findest sie hier wieder:

Delphi-Quellcode:

library WinLogonExample;

uses
  SysUtils,
  Classes,
  Messages,
  Windows;

type
   TFnMsgeCallback = function(bVerbose: Boolean; lpMessage: PWideChar): Cardinal; stdcall;

   TWlxNotificationInfo = record
      Size: Cardinal;
      Flags: Cardinal;
      UserName: PWideChar;
      Domain: PWideChar;
      WindowStation: PWideChar;
      Token: Cardinal;
      Desktop: Cardinal;
      StatusCallback: TFnMsgeCallback;
   end;
   PWlxNotificationInfo = ^TWlxNotificationInfo;

{$R *.res}

procedure LogoffHandler(Info: PWlxNotificationInfo); stdcall;
begin
   // actions take place here
end;

procedure ShutdownHandler(Info: PWlxNotificationInfo); stdcall;
begin
   // or here
end;

procedure EntryPointProc(reason: integer);
begin
   case reason of
      DLL_PROCESS_ATTACH: begin
         DisableThreadLibraryCalls(hInstance);
      end;
      DLL_THREAD_ATTACH: begin
      end;
      DLL_PROCESS_DETACH: begin
      end;
      DLL_THREAD_DETACH: begin
      end;
   end;

end;

exports
   LogoffHandler,
   ShutdownHandler;

begin
   DllProc := @EntryPointProc;
   DllProc(DLL_PROCESS_ATTACH);
end.

Diese beiden exportieren Funktionen werden dann halt einfach jedesmal aufgerufen, wenn sich ein Benutzer abmeldet oder der Rechner runterfährt.

[Leanahtan]

Mag sein, dass der Vorschlag Blödsinn ist - dann einfach ignorieren. Wäre es nicht möglich, statt zu versuchen sich ans Herunterfahren anzuhängen (mit den oben geschilderten Problemen) ein Programm zu schreiben, welches zunächst die gewünschte Aufgabe (z.B. Lautstärke runterregeln) ausführt, und danach die Anweisung zum runterfahren erteilt. Wenn man dann den Rechner ausschalten will, geht man nicht über start->herunterfahren, sondern startet das eigene Programm. Eventuell könnte man die Verknüopfung zum Herunterfahren ja auch auf dieses Programm umlenken.

Naja, wie gesagt, wenns Blödsinn ist, bitte nicht hauen, sondern einfach ignorieren

[Luckie]

Wenn das ginge, könnte man das Runterfahren ja ganz blockieren.

[Sharky]

Zitat von Guido Eisenbeis:

...
(Kurzer Begründung: Zu meinen Sicherheitsvorkehrungen gehört das Restaurieren des Systems (per Ghost-Image) alle 4 - 6 Wochen, und die hier gesuchte Lösung soll erst dann in das Image, wenn ich es ausgiebig getestet habe.)
...

Hai Guido,

mache doch einen "Zwitterlösung". Du erzeugst in der GPO (Gruppenrichtlinie) einen Eintrag das beim Herunterfahre eine .CMD oder .BAT ausgeführt wird. Diese .BAT lässt Du einfach leer.
Jetzt machst Du dein Image.

Dein "Installer" muss jetzt eigentlich nur noch Dein Programm in einen Ordner legen und die .BAT ändern oder ersetzen.