Йоксель, табличный документ, имя файла при интерактивном сохранении - как..?

Автор Злоп, Вчера в 01:01

« назад - далее »

Злоп

Формируем печформу штатно. Ок. Жмем Сохранить/СохранитьКак - открывается диалог сохранения в поле "Имя файла" - строка из заголовка окна печформы. Ок.

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

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

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

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

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

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

item

Я решал проблему через дополнительные свойства и панель фрейма.

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

Злоп

ну... буду знать, не использовал никогда.
но так неинтересно ;-)
Может у кого еще будут какие мысли...

ADirks

Попробуй перед загрузкой в ёксель
    Таб.Показать(, ИмяФайла);
    Таб.Показать(,, -1);

Злоп

Без изменений.
Не подставляется.

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

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