Mega Code Archive

 
Categories / Delphi / System
 

Check if we are running in a terminal client session

function IsRemoteSession: Boolean; const sm_RemoteSession = $1000; { from WinUser.h } begin Result := GetSystemMetrics(sm_RemoteSession) <> 0; end;