Foros Club Delphi - Ver Mensaje Individual - no funciona ShellExecute en un servicio delphi

ingabraham · #4 10-12-2015

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';