Функция КоличествоФиксированныхСтрок(ТЗ)
Перем Результат, СохрНомерСтроки, Счётчик;
КоличествоСтрок = ТЗ.КоличествоСтрок();
Если КоличествоСтрок = 0 Тогда
Возврат 0;
КонецЕсли;
СохрНомерСтроки = ТЗ.ТекущаяСтрока();
Для Счётчик = 1 По КоличествоСтрок Цикл
ТЗ.ТекущаяСтрока(Счётчик);
Если ТЗ.ТекущаяСтрока() = Счётчик Тогда
Если СохрНомерСтроки > 0 Тогда
ТЗ.ТекущаяСтрока(СохрНомерСтроки);
КонецЕсли;
Возврат (Счётчик - 1);
КонецЕсли;
КонецЦикла;
Возврат КоличествоСтрок;
КонецФункции
Цитата: Харлампий Дымба от 09 июля 2025, 17:15Ну тут не знаю - запустил пустую ТиС - 35 мегов, запустил обработку - стало 95. Вышел.
Таб.Показать(, ИмяФайла);
Таб.Показать(,, -1);
ТабличныйДокумент.ДополнительныеСвойства.Установить("ИмяФайла", "Счет №123123");
ТабличныйДокумент.ДополнительныеСвойства.Установить("Каталог", "C:\");
ИмяФайла = Документ.ДополнительныеСвойства.Получить("ИмяФайла");
ИмяКаталога = Документ.ДополнительныеСвойства.Получить("Каталог");
ТабДок = СоздатьОбъект("ТабличныйДокумент");
ТабДок.ЗагрузитьИзТаблицы(Таб);
Параметры = ТабДок.ПараметрыПечати;
Множ = 10;
Параметры.Автомасштаб = 1;
Параметры.Ориентация = 1;
Параметры.ПолеСверху = 5 * Множ;
Параметры.ПолеСлева = 5 * Множ;
Параметры.ПолеСнизу = 5 * Множ;
Параметры.ПолеСправа = 5 * Множ;
тИмяЛиста = "Счет "+НомерДок;
Фрейм = ТабДок.Показать(тИмяЛиста); //, глПользователь.ПутьСохраненияФайлов);
Фрейм.ТолькоПросмотр(1);