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:
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...