Remove(Index: Integer): Boolean;
Index - индекс станции в коллекции.
Метод Remove удаляет станцию из коллекции по индексу. Возвращает True, если удаление адреса с индексом Index прошло удачно.
Для выполнения предполагается наличие формы, с расположенной на ней кнопкой «Button1».
Sub Button1OnClick(Sender: Object; Args: IEventArgs);
Var
MB: IMetabase;
Sec: IMetabaseSecurity;
m_User: IMetabaseUser;
DS: IDomainStations;
Begin
MB := MetabaseClass.Active;
Sec := MB.Security;
m_User := Sec.ResolveName("ADMIN") As IMetabaseUser;
DS := m_User.StationIPs;
DS.Remove(0);
Sec.Apply;
End Sub Button1OnClick;
При нажатии на кнопку, для пользователя «ADMIN» будет удален первый адрес из коллекции IP-адресов, с которых ему разрешен доступ.
См. также: