Shutdown wenn kein Benutzer angemeldet ist

[T.E.]

Moin moin,

ich habe ein kleines Problem:
und zwar habe ich eine Anwendung, die den Computer herunterfahren soll, auch wenn kein Benutzer angemeldet ist oder der Computer gerade gesperrt ist...
den Shutdown realisiere ich mit der folgenden Funktion:

Delphi-Quellcode:

function ExWindows(const AFlag: Word): Boolean;
var
  vi     : TOSVersionInfo;
  hToken : THandle;
  tp     : TTokenPrivileges;
  h      : DWord;
begin
  result:= false;

  vi.dwOSVersionInfoSize:=SizeOf(vi);

  if GetVersionEx(vi) then
  begin
    if vi.dwPlatformId = VER_PLATFORM_WIN32_NT then
    begin
      // Windows NT
      // Achtung bei Delphi 2 muß @hToken stehen ...
      if OpenProcessToken(GetCurrentProcess,TOKEN_ADJUST_PRIVILEGES,hToken) then
      begin
        LookupPrivilegeValue(nil,'SeShutdownPrivilege',tp.Privileges[0].Luid);
        tp.PrivilegeCount := 1;
        tp.Privileges[0].Attributes := SE_PRIVILEGE_ENABLED;
        h := 0;
        AdjustTokenPrivileges(hToken,False,tp,0,PTokenPrivileges(nil)^, h);
        CloseHandle(hToken);
        result := ExitWindowsEx(Aflag, 0);
      end;
    end
    else
    begin // Windows 95
      Result := ExitWindowsEx(Aflag, 0);
    end;
  end;
end;

und aufrufen tue ich sie folgendermaßen:

Delphi-Quellcode:

ExWindows(EWX_Shutdown  OR EWX_FORCE OR EWX_FORCEIFHUNG);

De Shutdown funktioniert auch einwandfrei, wenn ein Benutzer angemeldet ist... und auch aktiv ist, allerdings nicht wenn keiner angemeldet ist.

ABER wie bekomme ich das so hin, das der Computer auch bei nicht angemeldetem Benutzer oder bei gesperrtem PC heruntergefahren wird?
Wäre über konstruktive Vorschläge /Hilfe dankbar...

EDIT: ich habe trotz instensiven googelns keine funktionierende Lösung gefunden...

[Zwixx]

Eine normale Anwendung wird beim Logoff beendet. Das einzige was du machen kannst um ein Programm zu schreiben das auch ein logoff übersteht, es als Service zu machen. Dieser wird beim Windowsstart auch gestartet und erst dann wenn ein System wieder heruntergefahren wird beendet

[T.E.]

gut vielleicht sollte ich noch dazu sagen, das die anwendung ein Bildschirmschoner ist und auch als Systemschoner (wenn kein User angemeldet ist gestartet und ausgeführt wird) eingestellt ist...

[Zwixx]

Dann kann es sehr gut sein (ist nur eine Vermutung) das der anonyme Benutzer der das Login startet nicht die Berechtigung hat das System herunterzufahren.

[T.E.]

hm... und wie kann ich diesem Benutzer das Recht erteilen den PC mit diesem Screensaver herunterzufahren?

[quendolineDD]

Wenn ein Nutzer nicht die benötigten Privilegien hat, kannst du auch nicht in seinem Kontext solche Sachen erledigen. Deswegen ja der Rat, es als Service laufen zu lassen.