Перем пПоставщикДанных; Перем пТабличноеПоле; Перем пДанные; Перем пВидыСравнения; // ---------------------------------------------------------------------------------------------------- Процедура УстановитьПоставщикаДанныхСправочник() пПоставщикДанных = СоздатьОбъект("ПоставщикДанных"); пПоставщикДанных.ТипЗначений = "Справочник.Тест"; //пПоставщикДанных.КонтейнерКоманднойПанели = "кнКоманднаяПанель"; пПоставщикДанных.КонтейнерТабличногоПоля = "кнСписокТест"; пТабличноеПоле = пПоставщикДанных.ТабличноеПоле; пТабличноеПоле.СтильЗаголовков = 1; пТабличноеПоле.СтильРамки = 1; пТабличноеПоле.ЧередованиеЦветовСтрок = 0; пДанные = пПоставщикДанных.Данные; пДанные.НоваяКолонка("ПометкаУдаления"); пДанные.НоваяКолонка("Код"); пДанные.НоваяКолонка("ТестРеквизит"); пДанные.РеквизитСортировки = "ТестРеквизит"; пДанные.РежимОтладки = 1;// пДанные.ПросмотрПоВладельцу = 1; пДанные.СоздатьКнопкиПоУмолчанию(); пТабличноеПоле.ВосстановитьПозициюКолонок(); пПоставщикДанных.Обновить(); КонецПроцедуры // ------------------------------------------------------------------------------------------------ Процедура ПриОткрытии() мОбКомпонентаРаботыСФормойРасширениеФормы = СоздатьОбъект("РасширениеФормы"); мОбКомпонентаРаботыСФормойРасширениеФормы.УстановитьФорму(Форма); мАтрибутМногострочнаяЧасть = мОбКомпонентаРаботыСФормойРасширениеФормы.ПолучитьАтрибут("МногострочнаяЧасть"); мАтрибутМногострочнаяЧасть.Видимость = 0; КонецПроцедуры Процедура ПослеОткрытия() Форма.кнСписокТест.Видимость(0); Форма.кнСписокТест.Видимость(1); КонецПроцедуры // ------------------------------------------------------------------------------------------------ Процедура ПослеСозданияФормы() //пВидыСравнения = СоздатьОбъект("ПоставщикДанных.ВидыСравнения"); УстановитьПоставщикаДанныхСправочник(); //УстановитьПоставщикаДанныхСправочникП(); КонецПроцедуры