Registriert seit: 14. Apr 2003
Ort: Stuttgart
1.701 Beiträge
Delphi 7 Professional
|
Re: Eigener Dienst -> Speicherauslastung wächst und wächs
22. Apr 2008, 15:42
CreateCompatibilityQueryUserToken sollte man wirklich nur im Ausnahmefall verwenden.
Token := TJwSecurityToken.CreateWTSQueryUserTokenEx(WTS_CURRENT_SERVER_HANDLE, WtsGetActiveConsoleSessionID);
ist die beste Variante.
Wenn du schon die Trunkversion hast, dann gibt es dazu die Methode : GetTokenUserName
|