Domain: IDomain;
The Domain property returns domain of the workstation.
The property is read-only.
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;
Station: IStation;
s: String;
Begin
MB := MetabaseClass.Active;
Sec := MB.Security;
m_User := Sec.ResolveName("ADMIN") As IMetabaseUser;
St := m_User.Stations;
Station := St.Item(0);
s := Station.Domain.Name;
End Sub Button1OnClick;
On clicking the button the "s" variable stores a name of the domain, to which the first workstation from the ADMIN user collection belongs.
See also: