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

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

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

Оффлайн alex0402

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

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

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

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

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

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

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

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

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

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

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

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

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


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

как объединить все кнопки в одну группу "Печать"?
Помощь в л/с $10


Теги:
 

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

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

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

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

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

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

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

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

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

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

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

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

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

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


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

* Реклама

* Поиск

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

* Реклама

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

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

oleg-x
93 Сообщений
alex0402
93 Сообщений
Геннадий ОбьГЭС Геннадий ОбьГЭС
64 Сообщений
Golickoff Golickoff
49 Сообщений
ilyay ilyay
44 Сообщений
AIFrame
40 Сообщений
wise wise
31 Сообщений
Амал
30 Сообщений
ab30ru
24 Сообщений
lansy
22 Сообщений

* Кто онлайн

  • Точка Гостей: 141
  • Точка Скрытых: 0
  • Точка Пользователей: 6
  • Точка Сейчас на форуме:

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

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

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

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

Поиск

 
SimplePortal 2.3.5 © 2008-2012, SimplePortal