IStation.IsAllowed

Syntax

IsAllowed: Boolean;

Description

The IsAllowed method returns whether the user has access from the workstation.

Comments

The method returns True if the current user has access from the workstation, and False if the user does not have access.

Example

Sub UserProc;
Var
    MB: IMetabase;
    Sec: IMetabaseSecurity;
    User: IMetabaseUser;
    Stations: IStations;
    Station: IStation;
Begin
    MB := MetabaseClass.Active;
    Sec := MB.Security;
    User := Sec.ResolveName("ADMIN") As IMetabaseUser;
    Stations := User.Stations;
    Station := Stations.Item(0);
    Debug.WriteLine(Station.IsAllowed);
End Sub UserProc;

After executing the example, the development environment console displays whether the ADMIN user from the collection has access from the first workstation.