1с убрать кнопку закрытия формы

Пройтись в цикле по элементам формы и кого родитель = Элементы.ФормаКоманднаяПанель, т.е. относятся элемент к данной командной панели. Сделать рекурсию, и получить вложенности. И уже выбирать, что нужно спрятать, что нет – прятать видимость.

.
МассивПодчин = новый Массив; // можно дерево сделать
ПолучитьВсеПодчин(Элементы.ФормаКоманднаяПанель, МассивПодчин)
.

Процедура ПолучитьВсеПодчин(Родитель, МассивЭлементов)
Для Каждого Элем из Элементы Цикл
Если Элем.Родитель = Родитель тогда
МассивЭлементов.Добавить(Элем);
ПолучитьВсеПодчин(Элем, МассивЭлементов);
КонецЕсли;
КонецЦикла;
КонецПроцедуры;

(17) разные вариант могут быть. к примеру, вы знаете кнопки которые надо оставить точный перечень, точно знаете их наименование. создать их список, и если получаемые кнопки не в списке, то скрываете видимость. т.е. не создаете массив, а пряма в процедуре, если полученный элемент не в списке, то прячете его видимость.

СписокНужных= новый Список; // добавляете элементы, группы если подменю к пример целое надо оставить(т.е. не надо все элементы подменю перечислять)
.
ПолучитьВсеПодчин(Элементы.ФормаКоманднаяПанель, СписокНужных)
.

Процедура ПолучитьВсеПодчин(Родитель, СписокНужных)

Для Каждого Элем из Элементы Цикл
Если Элем.Родитель = Родитель тогда
Если СписокНужных.НайтиПоЗначению(Элем) = Неопределено тогда
Элем.видимость = Ложь;
Иначе
ПолучитьВсеПодчин(Элем, МассивЭлементов);
КонецЕсли;
КонецЕсли;
КонецЦикла;

(19) не знаю я без отладки писала выше, на обработке вот попробовала все ок.. как вариант может не все виды элементов можно спрятать, можно виды эти пропустить прописать, а можно прще, через попытку сделать)

СписокНужных = новый СписокЗначений;
ПолучитьВсеПодчин(ЭтаФорма, СписокНужных);

&НаСервере
Процедура ПолучитьВсеПодчин(Родитель, СписокНужных)

Для Каждого Элем из Элементы Цикл
Если Элем.Родитель = Родитель тогда
Если СписокНужных.НайтиПоЗначению(Элем) = Неопределено тогда
Попытка
Элем.видимость = Ложь;
Исключение
КонецПопытки;
Иначе
ПолучитьВсеПодчин(Элем, СписокНужных);
КонецЕсли;
КонецЕсли;
КонецЦикла;

Источник

Понравилась статья? Поделить с друзьями:

А вот еще кое-что интересное для вас:

  • Для чего нужен дубликаты госномера авто. 10 причин сделать себе его
  • Разновидности похоронных бюро и сферы их деятельности
  • Как быстро изучить английский язык? Плюсы и минусы онлайн школы по изучения языков
  • Эффективное создание текста вакансии: ключевые шаги и рекомендации
  • Размещение серверов в дата-центрах: преимущества и недостатки

  • 0 0 голоса
    Article Rating
    Подписаться
    Уведомить о
    0 Комментарий
    Старые
    Новые Популярные
    Межтекстовые Отзывы
    Посмотреть все комментарии