Posted By

icebob on 08/02/10


Tagged


Versions (?)

Is running in terminal server


 / Published in: Delphi
 

  1. function IsRemoteSession: boolean;
  2. const
  3. sm_RemoteSession = $1000;
  4. begin
  5. result := GetSystemMetrics(sm_RemoteSession) <> 0;
  6. end;

Report this snippet  

You need to login to post a comment.