Проверить не запущена ли terminal client session? |
Previous Top Next |
Code: |
function IsRemoteSession: Boolean; const sm_RemoteSession = $1000; { from WinUser.h } begin Result := GetSystemMetrics(sm_RemoteSession) <> 0; end; |
©Drkb::02238
Взято с сайта http://www.swissdelphicenter.ch/en/tipsindex.php