IDomains.Count

Syntax

Count: Ineger;

Description

The property is read-only.

The Count property returns the number of domains in the collection.

Example

Executing the example requires a form, a button named Button1 on this form.

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

Var

MB: IMetabase;

Sec: IMetabaseSecurity;

m_User: IMetabaseUser;

St: IStations;

Dm: IDomains;

s: Integer;

Begin

MB := MetabaseClass.Active;

Sec := MB.Security;

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

St := m_User.Stations;

Dm := St.Domains;

s := Dm.Count;

End Sub Button1OnClick;

If the user presses the button, the "s" variable contains the number that determines the amount of domains to which the workstations in the collection of the ADMIN user are related.