Проверить, работает ли программа в Terminal Client Session

Благодарю за поддержку!

		Новости сайта
		Новости форума

Архив исходников

Automatic translation

Главная страница сайта "Delphi Sources"

Раздел "Исходники"

Форум

Проверить, работает ли программа в Terminal Client Session

Оформил: DeeCo
Автор: http://www.swissdelphicenter.ch

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