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

printed from
www.swissdelphicenter.ch
developers knowledge base