Портал компании
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Автоматизация Бизнеса
Сервисный центр 1С

Автоматизация сервисного центра

Программа для сервисных центров и ЦТО
Подробнее

Программист 1С

Доработки для 1С

Любые доработки систем 1С всего за 1700 р.час. Возможно уже есть готовые. Полный каталог разработок

Разработки для 1С
Учет по серийным номерам 1С

Учет товаров по серийным номерам

Модуль позволяющий вести учет по серийным номерам и выводить на печать гарантийные талоны. Подробнее

Автосервис 1С

Дополнение для автосервиса

Автоматизация СТО, шиномонтажной мастерской или мойки. Ознакомиться

Рассылка SMS 1С

Рассылка СМС

Уведомление клиентов или сотрудников с помощью СМС сообщений из 1С. Перейти

Модули для 1С

Модули, дополнения и отчеты для 1С

Больший список готовых решений для Вашей компании. Поддержка и сопровождение. Полный каталог разработок

 

Быстрый переход





Яндекс.Метрика
Меню раздела:

Быстрый поиск

 

Информация



 

[CODE] Программный вывод таблицы на форму



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


Количество показов: 184
Дата изменения: 14.09.2023 07:03:55

Возврат к списку

(Нет голосов)

Ваше имя:
Защита от автоматических сообщений:
Защита от автоматических сообщений Символы на картинке:


Модули   Статьи   Отзывы   Кабинет   Поддержка  
@ !pride, 1module. Все права защищены. 2003 - 2023