Перем _ПТД; Процедура ПриОткрытии() _ПТД = СоздатьОбъект("ПолеТабличногоДокумента"); _Форма = СоздатьОбъект("Форма"); _Форма.УстановитьФорму(Форма); КонецПроцедуры Процедура ФормаПриСоздании(_Форма) _Форма.СоздатьЭлементУправления(_ПТД,Форма._Реквизит); КонецПроцедуры Процедура ПослеОткрытия() _ПТД.Менеджер.ВидимостьПолосПрокрутки(0); //_ПТД.ПлоскийСтиль = 1; _ПТД.Таблица.Опции(0,0); _ПТД.Таблица.ИсходнаяТаблица("Таблица"); Для н = 1 По 40 Цикл стрСтрока = "строка " + СокрЛП(н); _ПТД.Таблица.ВывестиСекцию("Строка"); КонецЦикла; //_ПТД.Менеджер.ПрокрутитьНа(10); _ПТД.Менеджер.ПрокрутитьНа(-10); _ПТД.Менеджер.Обновить(); КонецПроцедуры
Перем _ПТД; Процедура _РеквизитПриНачальномОбновлении(Менеджер) //Менеджер.ПрокрутитьНа(10); Менеджер.ПрокрутитьНа(-10); КонецПроцедуры Процедура ПриОткрытии() _ПТД = СоздатьОбъект("ПолеТабличногоДокумента"); _Форма = СоздатьОбъект("Форма"); _Форма.УстановитьФорму(Форма); КонецПроцедуры Процедура ФормаПриСоздании(_Форма) _Форма.СоздатьЭлементУправления(_ПТД,Форма._Реквизит); _ПТД.Менеджер.ВидимостьПолосПрокрутки(0); //_ПТД.ПлоскийСтиль = 1; _ПТД.Таблица.Опции(0,0); _ПТД.Таблица.ИсходнаяТаблица("Таблица"); Для н = 1 По 40 Цикл стрСтрока = "строка " + СокрЛП(н); _ПТД.Таблица.ВывестиСекцию("Строка"); КонецЦикла; КонецПроцедуры
Окна = СоздатьОбъект("Окна"); Окна.НаПереднийПлан();