IStation.IsAllowed

Syntax

IsAllowed: Boolean;

Description

The IsAllowed method returns the value, defining the opportunity to perform any operation from the workstation.

Comments

If the method returns True, the operation is executed, otherwise it is not.

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;

Station: IStation;

s: Boolean;

Begin

MB := MetabaseClass.Active;

Sec := MB.Security;

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

St := m_User.Stations;

Station := St.Item(0);

s := Station.IsAllowed;

End Sub Button1OnClick;

On clicking the button the "s" variable stores the value, determining whether to perform any operation from the first workstation from the ADMIN user collection.