вывести ТЗ в табличное поле на форме УФ

Форум Программирование Общие вопросы программирования (Dev)

1. Nadushka74 5 13.12.17 11:56 Сейчас в теме

Неужели все сильно изменилось и усложнилось?
как вывести ТЗ на форму? если на форме есть табличное поле?

По теме из базы знаний

Ответы

Подписаться на ответы Инфостарт бот

Свернуть все

7. independ 1552 13.12.17 13:42 Сейчас в теме

(1)https://infostart.ru/public/574802/

2. rinik88 36 13.12.17 12:00 Сейчас в теме

// Заполняем таблицу значений(например из запроса)
Результат = Запрос.Выполнить().Выгрузить();
// значению табличного поля присваивается значение ТЗ
ЭлементыФормы.ТЗ.Значение = Результат;
ЭлементыФормы.ТЗ.СоздатьКолонки();

3. Nadushka74 5 13.12.17 13:05 Сейчас в теме

(2)

ЭлементыФормы.ТЗ.Значение = Результат;
ЭлементыФормы.ТЗ.СоздатьКолонки();

уточняю на управляемых формах!!!

4. user633533_encantado 11 13.12.17 13:18 Сейчас в теме

(3) "Неужели все сильно изменилось и усложнилось" - кто-то вылез из анабиоза.

Взять и перетащить Таблицу мышкой на форму пробовали? При чем тут "табличное поле" на форме?

5. Chernov_Dmitriy 89 13.12.17 13:32 Сейчас в теме

Копай процедуру "ЗначениеВРеквизитФормы(<Значение>, <ИмяРеквизита>) "
Значение будет твоей таблицей, а реквизит формы - то куда ты его хочешь поместить.

6. Chernov_Dmitriy 89 13.12.17 13:33 Сейчас в теме

все это с директивой компиляции "НАСервере". Без контекста не прокатит - потому что там форма не доступна.

8. dandykry 11 13.12.17 14:20 Сейчас в теме


&НаСервере
Процедура  СоздатьТаблицуНаФорме (Таблица, Имя)
		
	МассивТипаВыбора = Новый Массив;
	МассивТипаВыбора.Добавить(Тип("ТаблицаЗначений"));
	ОписаниеТипаВыбора = Новый ОписаниеТипов(МассивТипаВыбора);
	МассивРеквизитов = Новый Массив;
	МассивРеквизитов.Добавить(Новый РеквизитФормы("Консоль_"+Имя, ОписаниеТипаВыбора, "", Имя));
	
	Для Каждого Колонка Из Таблица.Колонки Цикл
		
		МассивРеквизитов.Добавить(Новый РеквизитФормы(Колонка.Имя,Колонка.ТипЗначения,"Консоль_"+Имя)); 
		
	КонецЦикла;
		
	ИзменитьРеквизиты(МассивРеквизитов);  
	
	ГруппанаФорме = Элементы.Добавить("Консоль_Группа_"+Имя, Тип("ГруппаФормы"),Элементы.ГруппаСозданныеОбъекты);
	ГруппанаФорме.Заголовок = Имя;
	ГруппанаФорме.Вид = ВидГруппыФормы.ОбычнаяГруппа;
	
	ТаблицаПолейВыбора = Элементы.Добавить("Консоль_"+Имя, Тип("ТаблицаФормы"), Элементы["Консоль_Группа_"+Имя]);
	ТаблицаПолейВыбора.ПутьКДанным = "Консоль_"+Имя;
	ТаблицаПолейВыбора.Отображение = ОтображениеТаблицы.Список;
	
	 
	Для Каждого Колонка Из Таблица.Колонки Цикл
		     
			НовыйЭлемент = Элементы.Добавить("Консоль_"+Имя+Колонка.Имя, Тип("ПолеФормы"), ТаблицаПолейВыбора);       
			НовыйЭлемент.Вид = ВидПоляФормы.ПолеВвода;
			НовыйЭлемент.ПутьКДанным = "Консоль_"+Имя+"." + Колонка.Имя;
			
	КонецЦикла;
	
	
	ЗначениеВРеквизитФормы(Таблица,"Консоль_"+Имя);

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

Показать

Элементы.ГруппаСозданныеОбъекты - группа на форме, чтобы разместить в нужном месте. В процедуру передается таблица и ее будущее имя

9. DrWeb3 74 15.12.20 13:28 Сейчас в теме

Спасибо. Все было лень самому разобраться. Только что пересел на УФ...

Оставьте свое сообщение

E-mail: