Access: StationAccessType;
Свойство Access определяет тип доступа для станций из коллекции.
Sub UserProc;
Var
MB: IMetabase;
Sec: IMetabaseSecurity;
User: IMetabaseUser;
Stations: IStations;
Begin
MB := MetabaseClass.Active;
Sec := MB.Security;
User := Sec.ResolveName("ADMIN") As IMetabaseUser;
Stations := User.Stations;
Debug.WriteLine(Stations.Access);
End Sub UserProc;
При выполнении примера в консоль среды разработки будет выведено значение, определяющее тип доступа для станций из коллекции пользователя ADMIN.
См. также: