Thursday, March 14, 2013

Изменение стандартных кнопок на командной панели 1С 8.х обычное приложение

Столкнулся с проблемой, необходимо была к привязной к таблице командной панели, оставить только часть необходимых кнопок, + добавить часть своих. На просторах нета нашел решение данной проблемы, правда только для одной кнопки, в данном случае предлагаю код для нескольких. Если необходимо добавить другие кнопки, в конфигураторе на необходимой панели включаем АвтоЗаполнение, сщелкаем на кнопках которые появились на панели и вписываем их номер ("Действие1") в массив.

Мас=Новый Массив;
Мас.Добавить(ЭлементыФормы.КоманднаяПанель2.Кнопки.Действие5.Действие);
Мас.Добавить(ЭлементыФормы.КоманднаяПанель2.Кнопки.Действие6.Действие);
Мас.Добавить(ЭлементыФормы.КоманднаяПанель2.Кнопки.Действие7.Действие);
Мас.Добавить(ЭлементыФормы.КоманднаяПанель2.Кнопки.Действие8.Действие);
ЭлементыФормы.КоманднаяПанель2.АвтоЗаполнение = Ложь;
Для каждого знчМас из Мас Цикл
ЭлементыФормы.КоманднаяПанель2.Кнопки.Добавить(СтрЗаменить(Строка(знчМас)," ",""),ТипКнопкиКоманднойПанели.Действие,СтрЗаменить(Строка(знчМас)," ",""),знчМас);
КонецЦикла;

1 comment:

  1. Очень полезно, спасибо.
    А как на счет добавления между кнопками действий Подменю и Разделителей?

    ReplyDelete