Реклама на этом месте
Форум 1С
Форум 1С
Программистам. Бухгалтерам. Администраторам. Пользователям
Задай вопрос - получи решение проблемы. Без троллинга и флуда.
23 Май 2018, 14:23
МультиВход
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?
 
collapse

Автор Тема: Объединение команд  (Прочитано 428 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Онлайн alex0402

  • *****
  • Сообщений: 1454
  • РЕПУТАЦИЯ: 236
  • КПД: 16%
  • Регистрация: 2010-09-10
  • Сайт: 
  • Профессия: Программист 1С
Код:
	// СтандартныеПодсистемы.Печать
УправлениеПечатью.ПриСозданииНаСервере(ЭтаФорма);

ИмяКоманды = "а1111";
НоваяКоманда = ЭтаФорма.Команды.Добавить(ИмяКоманды);
НоваяКоманда.Заголовок = ИмяКоманды;
НоваяКоманда.Действие = ИмяКоманды;

МестоРазмещенияКоманд = ЭтаФорма.Элементы.Найти("ФормаКоманднаяПанель");

ПодменюПечать = ЭтаФорма.Элементы.Добавить(МестоРазмещенияКоманд.Имя + "ПодменюПечать", Тип("ГруппаФормы"), МестоРазмещенияКоманд);
ПодменюПечать.Вид = ВидГруппыФормы.Подменю;
ПодменюПечать.Заголовок = НСтр("ru = 'Печать'; uk = 'Друк'");
ПодменюПечать.Картинка = БиблиотекаКартинок.Печать;

МестоРазмещенияКоманд = ПодменюПечать;

НовыйЭлемент = ЭтаФорма.Элементы.Добавить(МестоРазмещенияКоманд.Имя + ИмяКоманды + "1", Тип("КнопкаФормы"), МестоРазмещенияКоманд);
НовыйЭлемент.Вид = ВидКнопкиФормы.КнопкаКоманднойПанели;
НовыйЭлемент.ИмяКоманды = ИмяКоманды;
НовыйЭлемент.Заголовок = "Один";

НовыйЭлемент = ЭтаФорма.Элементы.Добавить(МестоРазмещенияКоманд.Имя + ИмяКоманды + "2", Тип("КнопкаФормы"), МестоРазмещенияКоманд);
НовыйЭлемент.Вид = ВидКнопкиФормы.КнопкаКоманднойПанели;
НовыйЭлемент.ИмяКоманды = ИмяКоманды;
НовыйЭлемент.Заголовок = "Два";
результат:
вложение 1

код:
ИмяКоманды = "а1111";
НоваяКоманда = ЭтаФорма.Команды.Добавить(ИмяКоманды);
НоваяКоманда.Заголовок = ИмяКоманды;
НоваяКоманда.Действие = ИмяКоманды;

МестоРазмещенияКоманд = ЭтаФорма.Элементы.Найти("ФормаПечать");

ПодменюПечать = ЭтаФорма.Элементы.Добавить(МестоРазмещенияКоманд.Имя + "ПодменюПечать", Тип("ГруппаФормы"), МестоРазмещенияКоманд);
ПодменюПечать.Вид = ВидГруппыФормы.Подменю;
ПодменюПечать.Заголовок = НСтр("ru = 'Печать'; uk = 'Друк'");
ПодменюПечать.Картинка = БиблиотекаКартинок.Печать;

МестоРазмещенияКоманд = ПодменюПечать;

НовыйЭлемент = ЭтаФорма.Элементы.Добавить(МестоРазмещенияКоманд.Имя + ИмяКоманды + "1", Тип("КнопкаФормы"), МестоРазмещенияКоманд);
НовыйЭлемент.Вид = ВидКнопкиФормы.КнопкаКоманднойПанели;
НовыйЭлемент.ИмяКоманды = ИмяКоманды;
НовыйЭлемент.Заголовок = "Один";

НовыйЭлемент = ЭтаФорма.Элементы.Добавить(МестоРазмещенияКоманд.Имя + ИмяКоманды + "2", Тип("КнопкаФормы"), МестоРазмещенияКоманд);
НовыйЭлемент.Вид = ВидКнопкиФормы.КнопкаКоманднойПанели;
НовыйЭлемент.ИмяКоманды = ИмяКоманды;
НовыйЭлемент.Заголовок = "Два";
результат:
вложение 2


код отличается только строкой:
МестоРазмещенияКоманд = ЭтаФорма.Элементы.Найти("ФормаПечать");

как объединить все кнопки в одну группу "Печать"?
Спасибо за Сказать спасибо


Теги:
 

Объединение конфигураций "Документооборот гос. учреждения" и "Гос. и муницип. закупки"

Автор Рената МарсельевнаРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 1
Просмотров: 1790
Последний ответ 19 Янв 2015, 20:02
от дфтын
Объединение организации-кредитора и организации-должника

Автор newsРаздел Новости

Ответов: 0
Просмотров: 958
Последний ответ 11 Авг 2015, 12:26
от news
1C ЗУП 2.5 Помогите с отчетом "Списки сотрудников организации" Объединение значений ячеек

Автор ksander-farsРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 2
Просмотров: 1394
Последний ответ 10 Фев 2017, 10:49
от ksander-fars
Вывод набора данных "объединение" скд в дерево значений

Автор Gae4kaРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 0
Просмотров: 1805
Последний ответ 02 Июн 2015, 12:19
от Gae4ka
Как отключить объединение одинаковых позиций в обработке табличной части? (1С 8.2, УТ 10.3.35.2)

Автор Алексей ПомазковРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 2
Просмотров: 1206
Последний ответ 10 Фев 2017, 09:40
от Алексей Помазков

* Живое общение

Не устроил ответ?

Зарегистрируйся и задай свой вопрос. Живое общение приносит результат намного быстрее.


Зарегистрироваться

* Реклама

* Поиск

* Последние задачи на разработку (фриланс)

* Реклама

* Последние вакансии

* Топ 10 авторов за месяц

Геннадий ОбьГЭС Геннадий ОбьГЭС
159 Сообщений
alex0402
73 Сообщений
oleg-x
68 Сообщений
AIFrame AIFrame
59 Сообщений
buketov.av buketov.av
43 Сообщений
wise wise
39 Сообщений
KOI8-R
34 Сообщений
ilyay ilyay
29 Сообщений
Alter
28 Сообщений
trialex3
26 Сообщений

* Кто онлайн

* Облако тэгов

* Форум 1С с мобильного

* Инструменты

* Дополнительно

Поиск

 
SimplePortal 2.3.5 © 2008-2012, SimplePortal