no me funciona en el servicio estas funciones.
compañero de casualidad no tienes algún proyecto de prueba, te lo agradecería mucho
Código Delphi
[-]function WTSEnumerateSessionsA(hServer: THandle; Reserved, Version: DWORD; ppSI: PPWTS_SESSION_INFO; pCount: PDWORD): boolean; stdcall external 'Wtsapi32.dll';
function WTSQueryUserToken(SessionId: DWORD; phToken: PHANDLE): boolean; stdcall external 'Wtsapi32.dll';
function WTSFreeMemory(pSi: Pointer): boolean; stdcall external 'Wtsapi32.dll';