helpf.pro
Регистрация
 0 
Распечатать

Форма ~ Добавление элементов на форму [Команда, Кнопка, ТаблицаЗначений]

Код 1C v 8.2 УП
 &НаСервере
Процедура ДобавитьНаСервере()
 
ДобавляемыеРеквизиты = Новый Массив;    
    Реквизит1 = Новый РеквизитФормы("Таб", Новый ОписаниеТипов("ТаблицаЗначений"), , "Таблица", Истина);
    ДобавляемыеРеквизиты.Добавить(Реквизит1); 
    ИзменитьРеквизиты(ДобавляемыеРеквизиты);
    
    ДобавляемыеРеквизиты = Новый Массив;    
    Реквизит2 = Новый РеквизитФормы("Кол", Новый ОписаниеТипов("Строка"),"Таб" , "Колонка", Истина);
    ДобавляемыеРеквизиты.Добавить(Реквизит2); 
    ИзменитьРеквизиты(ДобавляемыеРеквизиты);
    ТаблицаФормы = ЭтаФорма.Элементы.Добавить("Таблица", Тип("ТаблицаФормы"), ЭтаФорма);    
    ТаблицаФормы.ПутьКДанным = "Таб";       
    
    Колонка = ЭтаФорма.Элементы.Добавить("Колонка", Тип("ПолеФормы"), ТаблицаФормы);    
    Колонка.ПутьКДанным = "Таб.Кол";       
    
КонецПроцедуры   


еще
Код 1C v 8.2 УП
 	 //Добавим кнопки и команды
	//Команды
	Кмд = ЭтаФорма.Команды.Добавить("Выгрузить");
	Кмд.Действие = "Выгрузить";
	Кмд.Заголовок = "Выгрузить в файл";
	
	КмдЗ = ЭтаФорма.Команды.Добавить("Загрузить");
	КмдЗ.Действие = "Загрузить";
	КмдЗ.Заголовок = "Загрузить из файла";
	
	КмдЗ = ЭтаФорма.Команды.Добавить("ЗаписатьВДокумент");
	КмдЗ.Действие = "ЗаписатьВДокумент";
	КмдЗ.Заголовок = "Записать в документ";

 	//Добавляем новую кнопку
    Горизонт = ЭтаФорма.Элементы.Добавить("Горизонт", Тип("ГруппаФормы"), ЭтаФорма);
    Горизонт.Вид = ВидГруппыФормы.ОбычнаяГруппа;
 
   // Элемент2.ИмяКоманды = "Выгрузить";

    
    //Добавляем новую кнопку
    Элемент2 = ЭтаФорма.Элементы.Добавить("Выгрузить", Тип("КнопкаФормы"), Горизонт);
    Элемент2.Вид = ВидКнопкиФормы.ОбычнаяКнопка; 
    Элемент2.ИмяКоманды = "Выгрузить";
    
    //Добавляем новую кнопку
    Элемент = ЭтаФорма.Элементы.Добавить("Загрузить", Тип("КнопкаФормы"), ЭтаФорма);
    Элемент.Вид = ВидКнопкиФормы.ОбычнаяКнопка; 
    Элемент.ИмяКоманды = "Загрузить";
    
    //Добавляем новую кнопку
    Элемент = ЭтаФорма.Элементы.Добавить("ЗаписатьВДокумент", Тип("КнопкаФормы"), ЭтаФорма);
    Элемент.Вид = ВидКнопкиФормы.ОбычнаяКнопка; 
    Элемент.ИмяКоманды = "ЗаписатьВДокумент";

	       	
	ТаблицаФормы 				= Элементы.Добавить("ф__ТЗ", Тип("ТаблицаФормы"));
	ТаблицаФормы.ПутьКДанным 	= "ТЗ";
   
Разместил:   Версии: | 8.2 УП |  Дата:   Прочитано: 15493
 0 
Распечатать
Возможно, вас также заинтересует
Как заполнить табличную часть формы программно? 8
Нужно по кнопке Заполнить - сформировать данные для заполнения табличных частей и заполнить их. Форма имеет вид: Рядом с кнопкой Записать и закрыть добавлена кнопка Заполнить документ , код ее команды: // Код заполнения ТЧ НаСервере П
1C и Google Maps 21
была поставлена задача отображения на географической карте медицинских учреждений. После обзора предлагаемых решений был выбран сервис google. Но так же подобного рода подход будет работать и с картами сервиса yandex. Во время решения задачи было реш
1С 7.x : Как получить курсы валют с сайта НБУ http://www.bank.gov.ua/ за любую дату ? 6
Функция ПолучитьТаблицуКурсовНБУ(ДатаКурса, Ежедневно = 1) // если в качестве второго параметра указать число отличное от 1 - получем валюты, которые котируются на ежемесячной основе Перем Reader, Url, Точки, HtmlTab, Строк, Р, НомСтроки, НомЯче
COM-подключение к базе 7.7 из 8.2 1С 7
Если код выполняется на стороне клиента, то необходимо наличие базы 7.7 на локальной машине. Пример (На форме объекта присутствует реквизит Таблица(ТаблицаЗначений)): НаКлиенте Процедура Загрузки() ПутьКБазе=" D:ВашаБаза1с77" ; Пользователь=
Google maps : вывод точек на карту и режим панорамы 9
В отличие от яндекс карт в GMaps можно использовать панорамы - за что им большой плюс! Надеюсь в яндексе прочитают этот пост и тоже когда-нибудь это сделают! Для клиента нужно было сделать вывод объектов на карту С возможностью просмотра панора
Посмотреть все результаты поиска похожих
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.
Загрузка... Дождитесь завершения!