Последние сообщения

#91
7.7 / Re: ТЗ на форме - узнать колич...
Последний ответ от Харлампий Дымба - 11 июля 2025, 11:07
#1 А по-моему достаточно изящный хак - в рамках отсутствия других штатных возможностей получить результат.
#92
7.7 / Re: ТЗ на форме - узнать колич...
Последний ответ от item - 11 июля 2025, 10:44
Тебе не понравится.

Функция КоличествоФиксированныхСтрок(ТЗ)
    Перем Результат, СохрНомерСтроки, Счётчик;
    КоличествоСтрок = ТЗ.КоличествоСтрок();
    Если КоличествоСтрок = 0 Тогда
        Возврат 0;
    КонецЕсли;
    СохрНомерСтроки = ТЗ.ТекущаяСтрока();
    Для Счётчик = 1 По КоличествоСтрок Цикл
        ТЗ.ТекущаяСтрока(Счётчик);
        Если ТЗ.ТекущаяСтрока() = Счётчик Тогда
            Если СохрНомерСтроки > 0 Тогда    
                ТЗ.ТекущаяСтрока(СохрНомерСтроки);
            КонецЕсли;
            Возврат (Счётчик - 1);
        КонецЕсли;
    КонецЦикла;
    Возврат КоличествоСтрок;
КонецФункции
#93
7.7 / Re: Не прошло и 15 лет как поп...
Последний ответ от Злоп - 11 июля 2025, 01:01
Версия 1.5j (08.06.2025) Che Burashka, e.meil@mail.ru
  • (исправлено) Поправлены недоделки 1.5g: наименования групп списка и групп пользователей
   приводятся к верхнему регистру (независимо от того каким регистром набрал наименование
   группы пользователь)

Версия 1.5k (10.07.2025) Che Burashka, e.meil@mail.ru
  • (переделано) Просмотр краткого описания (независимо от его объема/размера),
   выполняется в отдельной независимой форме просмотра текста (опыт эксплуатации
   показал что даже небольшое "краткое описание" плохо просматривать в небольшом
   штатном 1С окне просмотра многострочного текста)
  • (исправлено) Выходило в ошибку по кнопке "Лупа" (просмотр значений по текущей строке)
   в случае когда группа отчетов/обработок пустая. Исправлено.
  • (добавлено) Работает только при наличии Formex.
   Навигация по группам (вход/выход) работает по клавиатурным комбинациям
   (аналогичному поведению в штатных формах списков справочников):
   CTRL+СтрелкаВниз - вход в группу, CTRL+СтрелкаВверх - выход из группы.
#94
7.7 / ТЗ на форме - узнать количеств...
Последний ответ от Злоп - 10 июля 2025, 23:40
Собственно сабж.
#95
FormEx / Re: Чем разобрать форму из тек...
Последний ответ от item - 10 июля 2025, 13:15
Цитата: Харлампий Дымба от 09 июля 2025, 17:15Ну тут не знаю - запустил пустую ТиС - 35 мегов, запустил обработку - стало 95. Вышел.

Похоже, что формекс как-то кэширует стримы при ПолучитьФормуОбъекта, повторные прогоны теста на получение всех форм быстрее на порядок, и память при этом уже не растёт.
Но первичная утечка не сопоставима с совокупным объемом всех стримов, пропорция ~ 6Мб/1Мб.

Может оно и к лучшему, кэш тоже хорошо, и нечего краш-тесты устраивать.
#96
7.7 / Re: Йоксель, табличный докумен...
Последний ответ от Злоп - 10 июля 2025, 09:40
Без изменений.
Не подставляется.

   Таб.Показать(,КаталогВременныхФайлов()+"СЧТ");
   Таб.Показать(,,-1);

   ТабДок = СоздатьОбъект("ТабличныйДокумент");
   ТабДок.ЗагрузитьИзТаблицы(Таб);
#97
7.7 / Re: Йоксель, табличный докумен...
Последний ответ от ADirks - 10 июля 2025, 06:38
Попробуй перед загрузкой в ёксель
    Таб.Показать(, ИмяФайла);
    Таб.Показать(,, -1);
#98
7.7 / Re: Йоксель, табличный докумен...
Последний ответ от Злоп - 10 июля 2025, 01:58
ну... буду знать, не использовал никогда.
но так неинтересно ;-)
Может у кого еще будут какие мысли...
#99
7.7 / Re: Йоксель, табличный докумен...
Последний ответ от item - 10 июля 2025, 01:22
Я решал проблему через дополнительные свойства и панель фрейма.

При формировании документа:
ТабличныйДокумент.ДополнительныеСвойства.Установить("ИмяФайла", "Счет №123123");
ТабличныйДокумент.ДополнительныеСвойства.Установить("Каталог", "C:\");
   
На панели фрейма команды Сохранить/СохранитьКак и далее запись вручную.
ИмяФайла = Документ.ДополнительныеСвойства.Получить("ИмяФайла");
ИмяКаталога = Документ.ДополнительныеСвойства.Получить("Каталог");
   
Иначе как-бы никак.
#100
7.7 / Йоксель, табличный документ, и...
Последний ответ от Злоп - 10 июля 2025, 01:01
Формируем печформу штатно. Ок. Жмем Сохранить/СохранитьКак - открывается диалог сохранения в поле "Имя файла" - строка из заголовка окна печформы. Ок.

Если же мы штатную печформу перекидываем в табличный документ Йокселя и отображаем во фрейме

ТабДок = СоздатьОбъект("ТабличныйДокумент");
	ТабДок.ЗагрузитьИзТаблицы(Таб);

	Параметры 				= ТабДок.ПараметрыПечати;
	Множ 					= 10;
	Параметры.Автомасштаб	= 1;
	Параметры.Ориентация 	= 1;
	Параметры.ПолеСверху 	= 5 * Множ;
	Параметры.ПолеСлева 	= 5 * Множ;
	Параметры.ПолеСнизу 	= 5 * Множ;
	Параметры.ПолеСправа 	= 5 * Множ;
                            
	тИмяЛиста = "Счет "+НомерДок;
	Фрейм = ТабДок.Показать(тИмяЛиста); //, глПользователь.ПутьСохраненияФайлов);
	Фрейм.ТолькоПросмотр(1);

То видим "печатную форму" йокселя (фрейм), с заголовком. Ок.
И делаем интерактивно Сохранить/СохранитьКак - получаем диалог сохранения (с выбором типа mxl/xls/bmp/png/jpg) где поле "Имя файла" - пусто.

Клиент клянется и божится (ну как обычно) что имя файла подставлялось автоматом раньше, а сейчас пусто. Я ж параноик, все может быть... Может раньше какая-нить другая версия SpreadSheet.dll стояла или что-то иное...

Собственно вопрос: как в описанном выше случае с Йокселем подсунуть в поле "Имя файла" нужное значение...?