Deprecated: mysql_escape_string(): This function is deprecated; use mysql_real_escape_string() instead. in /home/jopp289/domains/progmans.net/public_html/engine/classes/mysqli.class.php on line 162 Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/jopp289/domains/progmans.net/public_html/engine/modules/show.short.php on line 160 Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/jopp289/domains/progmans.net/public_html/engine/modules/show.short.php on line 160 Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/jopp289/domains/progmans.net/public_html/engine/modules/show.short.php on line 160 Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/jopp289/domains/progmans.net/public_html/engine/modules/show.short.php on line 160 Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/jopp289/domains/progmans.net/public_html/engine/modules/show.short.php on line 160 Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /home/jopp289/domains/progmans.net/public_html/engine/modules/show.short.php on line 160
Заголовок



Тз = Новый ТаблицаЗначений;
Тз.Колонки.Добавить("Юзер");
СтрокаТз = Тз.Добавить();
СтрокаТз.Юзер = "Юзер1";
СтрокаТз = Тз.Добавить();
СтрокаТз.Юзер = "Юзер2";

Переменная = ТЗ[0].Юзер;



//Оформление полей (колонок) табличного поля
//"ТабПоле" - имя табличного поля
//"ШрифтШапки" - объект класса "Шрифт"
ФормаВыбора.ЭлементыФормы.ТабПоле.Колонки["НазваниеКолонки"].ТекстШапки = "Шапка";
ФормаВыбора.ЭлементыФормы.ТабПоле.Колонки["НазваниеКолонки"].ГоризонтальноеПоложениеВШапке = ГоризонтальноеПоложение.Центр;
ШрифтШапки = Новый Шрифт("Comic Sans MS", 12, Ложь);
ФормаВыбора.ЭлементыФормы.ТабПоле.Колонки["НазваниеКолонки"].ШрифтШапки = ШрифтШапки;
ФормаВыбора.ЭлементыФормы.ТабПоле.Колонки["НазваниеКолонки"].Ширина = 8;
ФормаВыбора.ЭлементыФормы.ТабПоле.Колонки["НазваниеКолонки"].ЦветФонаПоля = WEBЦвета.БледноБирюзовый;



//Оформление строк табличного поля
Процедура  ПриВыводеСтроки(Элемент, ОформлениеСтроки, ДанныеСтроки)
    //Рассчитать содержимое ячейки строки табличного поля
    ДанныеСтроки["Колонка1"] = ДанныеСтроки["Колонка2"] - ДанныеСтроки["Колонка3"];

    //Цвет ячейки строки табличного поля
    ОформлениеСтроки.Ячейки.Колонка1.ЦветФона = WEBЦвета.Золотой;
КонецПроцедуры



//ТекущаяКолонка, Текущая колонка, ТекущаяСтрока, Текущая строка
Процедура ПередНачаломИзменения(Элемент, Отказ)
    Сообщить(Элемент.ТекущаяСтрока[Элемент.ТекущаяКолонка.Имя]);
    Отказ = Истина;
КонецПроцедуры



//"Пользователи1С", "Принтеры" - имена справочников
//В справочнике "Пользователи1С" есть поле "Принтер" с типом "Принтеры". Оно будет заполняться с помощью формы выбора
//"ИмяПользователя()" - возвращает имя текущего пользователя
СпрПользователи = Справочники.Пользователи1С;
Пользователь = СпрПользователи.НайтиПоНаименованию(ИмяПользователя());
ФормаПринтера = Справочники.Принтеры.ПолучитьФормуВыбора();


//Создание нового элемента справочника
//Установить значение поля (реквизита) справочника с помощью формы выбора другого справочника
Если Пользователь = СпрПользователи.ПустаяСсылка() Тогда
    НовыйЮзер = СпрПользователи.СоздатьЭлемент();
    НовыйЮзер.Наименование = ИмяПользователя();
    НовыйЮзер.Принтер = ФормаПринтера.ОткрытьМодально();
    НовыйЮзер.Записать();
КонецЕсли;
    
    
//Изменение записи (элемента) справочника
//Выборка элементов справочник с помощью структуры
//Обход выборки элементов справочника
Пользователь = СпрПользователи.НайтиПоНаименованию(ИмяПользователя());
ОтборПользователь = Новый Структура("Наименование");
ОтборПользователь.Наименование = ИмяПользователя();
ВыборкаПользователь = СпрПользователи.Выбрать(,,ОтборПользователь,);
Пока ВыборкаПользователь.Следующий() Цикл
    ОбъектПользователь = ВыборкаПользователь.ПолучитьОбъект();
    ОбъектПользователь.Принтер = ФормаПринтера.ОткрытьМодально();
    Если Не ОбъектПользователь.Принтер = Справочники.Принтеры.ПустаяСсылка() Тогда
        ОбъектПользователь.Записать();
    КонецЕсли;
КонецЦикла;



//ТабПолеВыбора - табличное поле
//ТЗ - таблица значений (источник данных для табличного поля)
//"КолонкаТаблицыЗначений" - колонка таблицы значений, по которой производится поиск значения "ИскомоеЗначение"
//"ИскомоеЗначение" - значение, которое необходимо найти в колонке "КолонкаТаблицыЗначений" в таблице значений

ФормаВыбора.ЭлементыФормы.ТабПолеВыбора.Значение = ТЗ;
ФормаВыбора.ЭлементыФормы.ТабПолеВыбора.СоздатьКолонки();
ФормаВыбора.ЭлементыФормы.ТабПолеВыбора.ТекущаяСтрока = Тз.Найти("ИскомоеЗначение", "КолонкаТаблицыЗначений");
ФормаВыбора.ОткрытьМодально();



//ТабПолеВыбора - наименование табличного поля
//Результат = Запрос.Выполнить()
//Тз = Запрос.Выполнить().Выгрузить();

ФормаВыбора = ЭтотОбъект.ПолучитьФорму("ФормаВыбора");
ФормаВыбора.ЭлементыФормы.ТабПолеВыбора.Значение = Запрос.Выполнить().Выгрузить();
//ФормаВыбора.ЭлементыФормы.ТабПолеВыбора.Значение = Результат.Выгрузить();
//ФормаВыбора.ЭлементыФормы.ТабПолеВыбора.Значение = Тз;
ФормаВыбора.ЭлементыФормы.ТабПолеВыбора.СоздатьКолонки();
ФормаВыбора.ВладелецФормы = ЭтаФорма;
ФормаВыбора.ОткрытьМодально();
назад 1 ... 5 6 7 8 9 10 11 12 13 14далее