API - como descobrir se estamos rodando num terminal service

Top  Previous  Next

function IsRemoteSession: Boolean; 

const 

  sm_RemoteSession = $1000{ from WinUser.h } 

begin 

  Result := GetSystemMetrics(sm_RemoteSession) <> 0

end