Перетаскивание между элементами управления

[For]

Как реализовать возможность заполнения таблицы документа номенклатурными позициями, используя механизм перетаскивания т.е. использовать drag and drop

[Buh777]

Как реализовать возможность заполнения таблицы документа номенклатурными позициями, используя механизм перетаскивания т.е. использовать drag and drop

Сначала определим реквизит формы СправочникСписок (тип СправочникСписок.Номенклатура). Далее вставим элемент управления ТабличноеПоле и через свойство Данные свяжем его с созданным реквизитом. Далее через обработчик события

Код: [Выделить]

Процедура НоменклатураНачалоПеретаскивания(Элемент, ПараметрыПеретаскивания, СтандартнаяОбработка)

	// Получить значение, переданное системой.
	Значение = ПараметрыПеретаскивания.Значение;

	// В любом случае значением будет массив.
	МассивЗначений = Новый Массив;

	// Если перетаскивается группа, то в массив записываем входящие в нее элементы.
	Если Значение.ЭтоГруппа Тогда
		Выборка = Справочники.Номенклатура.Выбрать(Значение);

			Пока Выборка.Следующий() Цикл

				Если Не Выборка.ЭтоГруппа Тогда
					МассивЗначений.Добавить(Выборка.Ссылка);

				КонецЕсли;

			КонецЦикла;	

	Иначе	
		МассивЗначений.Добавить(Значение);

	КонецЕсли;	

	// Заполненный массив записываем в параметры.
	ПараметрыПеретаскивания.Значение = МассивЗначений;

КонецПроцедуры