EnvironmentAttributes: IABACAttributeInstances;
Свойство EnvironmentAttributes возвращает системные атрибуты окружения.
Свойство доступно только для чтения.
Для выполнения примера добавьте ссылки на системные сборки: ABAC, Metabase.
Sub UserProc;
Var
MB: IMetabase;
Env: IABACAttributeInstances;
Attr: IABACAttributeInstance;
i, Count: Integer;
Begin
MB := MetabaseClass.Active;
Env := MB.Security.EnvironmentAttributes;
Count := Env.Count;
For i := 0 To Count-1 Do
Attr := Env.Item(i);
Debug.WriteLine(Attr.Attribute.Name(MB.CurrentLocale));
End For;
End Sub UserProc;
В результате выполнения примера в консоль будут выведены наименования системных атрибутов среды окружения.
См. также: