ICredentials.UserIP

Синтаксис

UserIP: String;

Описание

Свойство UserIP определяет IP адрес пользователя для занесения в протокол доступа.

Пример

Sub Main;

Var

MB: IMetabase;

LoS: ILogonSession;

Sc: ISecurityConnection;

Cr: ICredentials;

IP: String;

Begin

MB:=MetabaseClass.Active;

LoS:=MB.LogonSession;

Sc:=LoS.PrimaryConnection;

Cr:=Sc.Credentials;

IP:=Cr.UserIP;

End Sub Main;

После выполнения примера в переменной «IP» будет находиться значение IP адрес пользователя.

См. также:

ICredentials