IDomain.Stations

Синтаксис

Stations: IDomainStations;

Описание

Свойство доступно только для чтения.

Свойство Stations определяет рабочие станции, принадлежащие домену.

Пример

Для выполнения предполагается наличие формы, с расположенной на ней кнопкой «Button1».

Sub Button1OnClick(Sender: Object; Args: IEventArgs);

Var

MB: IMetabase;

Sec: IMetabaseSecurity;

m_User: IMetabaseUser;

St: IStations;

Dm: IDomains;

Domain: IDomain;

s: Integer;

Begin

MB := MetabaseClass.Active;

Sec := MB.Security;

m_User := Sec.ResolveName("ADMIN") As IMetabaseUser;

St := m_User.Stations;

Dm := St.Domains;

Domain := Dm.Item(0);

s := Domain.Stations.Count;

End Sub Button1OnClick;

При нажатии на кнопку, в переменной «s» будет храниться количество станций, принадлежащих домену.

См. также:

IDomain