Wie findet man den richtigen angemeldeten Windows Benutzer

[DavidKlimas]

In der Richtung hab ich schon gesucht, konnte aber keine Beispiele zur WTSQuerySessionInformation finden.

Ich probier das mal aus

[Zacherl]

Ich sehe grade, dass es für die aktuelle Sitzung sogar Konstanten gibt. Folgender Aufruf sollte für dich funktionieren:

Delphi-Quellcode:

function WTSQuerySessionInformationW(hServer: THandle; SessionId: DWord; WTSInfoClass: DWord;
  var ppBuffer: LPTSTR; var BytesReturned: DWord): BOOL; stdcall;
  external 'Wtsapi32.dll';

procedure WTSFreeMemory(pMemory: Pointer); stdcall;
  external 'Wtsapi32.dll';

procedure Test;
const
  WTS_CURRENT_SERVER_HANDLE = 0;
  WTS_CURRENT_SESSION       = DWord(-1);
const
  WTSUserName = 5;
var
  Buffer: LPTSTR;
  BytesReturned: DWord;
begin
  if WTSQuerySessionInformationW(WTS_CURRENT_SERVER_HANDLE, WTS_CURRENT_SESSION, WTSUserName,
    Buffer, BytesReturned) then
  try
    ShowMessage(Buffer);
  finally
    WTSFreeMemory(Buffer);
  end;
end;

[himitsu]

Zitat:

WTSGetActiveConsoleSessionId

Und was bekommt man bei einer RemoteSitzung, wenn garkeiner vorm PC sitzt?

PS: Wenn man eine Resource anfordert, dann hat man diese gefälligst auch wieder freizugeben!
LoadLibrary -> FreeLibrary
Aber da man davon ausgehen kann, dass diese DLL (kernel32) immer geladen ist, kann man auch einfach GetModuleHandle verwenden.

[Luckie]

Und wozu muss das ein Programm wissen?

[Zacherl]

Zitat von himitsu:

Und was bekommt man bei einer RemoteSitzung, wenn garkeiner vorm PC sitzt?

Man bekommt den Namen des Benutzerkontos mit dem man sich per RDP eingeloggt hat. Intern unterscheidet Windows gar nicht mehr großartig zwischen lokalem Login und einer Remote-Session. Session ist Session

Zitat von Luckie:

Und wozu muss das ein Programm wissen?

In meinem Falle benötigte ich das Token des angemeldeten Users, um bestimmte Aktionen in seinem Userkontext ausführen zu können.

[Luckie]

Zitat von Zacherl:

Zitat von himitsu:

Und was bekommt man bei einer RemoteSitzung, wenn garkeiner vorm PC sitzt?

Man bekommt den Namen des Benutzerkontos mit dem man sich per RDP eingeloggt hat. Intern unterscheidet Windows gar nicht mehr großartig zwischen lokalem Login und einer Remote-Session. Session ist Session

Und wenn gleichzeitig ein Benutzer lokal und der zweite per RemoteSession angemeldet ist?

[Zacherl]

Zitat von Luckie:

Zitat von Zacherl:

Zitat von himitsu:

Und was bekommt man bei einer RemoteSitzung, wenn garkeiner vorm PC sitzt?

Man bekommt den Namen des Benutzerkontos mit dem man sich per RDP eingeloggt hat. Intern unterscheidet Windows gar nicht mehr großartig zwischen lokalem Login und einer Remote-Session. Session ist Session

Und wenn gleichzeitig ein Benutzer lokal und der zweite per RemoteSession angemeldet ist?

Wie sich der Code (insbesondere das WTS_CURRENT_SESSION ) auf Server-Systemen mit mehreren aktiven Sessions verhält, weiß ich leider nicht. Hat jemand einen Windows Server am laufen, der das mal testen mag? Wenn man tatsächlich ausschließlich die lokale Session benötigt, dann gibt es aber auch per WTSQuerySessionInformation eine Möglichkeit das zu prüfen.

[Zacherl]

Hab schnell einen Windows Server 2016 aufgesetzt und selbst getestet: Es wird tatsächlich immer die Session zurückgegeben, mit der man aktuell angemeldet (also die Session mit der ich das Testprogramm auch tatsächlich starte) ist. Dabei ist es sogar egal, ob ich das Programm per "Ausführen als .." unter einem anderen Benutzerkontext starte.

[himitsu]

Nja, aber dein Service, von dem vorhin auch noch geredet wurde, der wurde von meinem Benutzer gestartet.

[Luckie]

Zitat von Zacherl:

(also die Session mit der ich das Testprogramm auch tatsächlich starte)

Er will aber den lokal angemeldeten Benutzer und nicht den Benutzer der das Programm ausführt.