Метод экземпляра класса TBanGroup.

1procedure TBanGroup.CreateAllBans(BannedClass: TClass; BanClass: Boolean; 
2  BanRoutines: Boolean; BanProperties: Boolean; AllowRead: Boolean);

Параметры:

Имя	Тип	Обязательно	Значение
BannedClass	TClass	Да	Запрещаемый класс
BanClass	Boolean	Да	Запретить доступ к объектам класса
BanRoutines	Boolean	Да	Запретить подпрограммы
BanProperties	Boolean	Да	Запретить свойства
AllowRead	Boolean	Да	Чтение свойств разрешено