|
v7: Как получить заголовок печатной формы? | ☑ | ||
|---|---|---|---|---|
|
0
Подводный Таракан
18.10.12
✎
10:48
|
Задача следующая - есть сформированная печатная форма с заголовком к примеру "123456_Иванов.ИИ_ТД"
Далее по кнопке в интерфейсе делаю открытие обработки: Процедура ПриОткрытии() перем сервис; перем Таб1; Перем Ширина,Высота; статусвозврата(0); загрузитьвнешнююкомпоненту(каталогиб() + "FormEx.dll"); ЗагрузитьВнешнююКомпоненту(КаталогИБ()+"SpreadSheet.dll"); сервис = создатьобъект("Сервис"); если сервис.АктивныйКонтекст(Таб1) = 0 тогда возврат; конецесли; если не(типзначениястр(Таб1) = "Таблица") тогда возврат; конецесли; Таб = СоздатьОбъект ("ТабличныйДокумент"); Таб.ЗагрузитьИзТаблицы(Таб1); обл=Таб.Область(1,1,Таб.ВысотаТаблицы(),Таб.ШиринаТаблицы()); обл.РассчитатьРазмеры(Ширина,Высота); Конвертер = СоздатьОбъект ("Йоксель.ГрафическийКонвертер.PDF"); Конвертер.ВысотаСтраницы = Высота + 210;// * 20 +210 ; Конвертер.ШиринаСтраницы = Ширина + 210;// * 105 +210 ; Конвертер.КоличествоБитНаПиксел = 24; Конвертер.Документ = Таб; Конвертер.ПолеСлева = 100; Конвертер.ПолеСверху = 100; Конвертер.ПолеСправа = 100; Конвертер.ПолеСнизу = 100; Конвертер.ЗаписатьВФайл ("C:\123\"+ИмяТаб+".pdf"); КонецПроцедуры как в этой процедуре получить ИмяТаб="123456_Иванов.ИИ_ТД" ? |
|||
|
1
Подводный Таракан
18.10.12
✎
16:06
|
ап
|
|||
|
2
Wobland
18.10.12
✎
16:07
|
имхо никак
|
|||
|
3
aka MIK
18.10.12
✎
16:11
|
(0)
списоктаблиц = Сервис.списоктаблиц(); Ном = списоктаблиц.найтизначение(Таб); если Ном <> 0 тогда списоктаблиц.получитьзначение(Ном,ИмяФайла); |
|||
|
4
aka MIK
18.10.12
✎
16:12
|
(0) А что, нормально конвертит? Дашь итоговую обработку
|
|||
|
5
Подводный Таракан
18.10.12
✎
16:16
|
(4) да вроде нормально, а итоговая обработка вся в коде и содержится в принципе
|
|||
|
6
Подводный Таракан
18.10.12
✎
16:30
|
(3) спасибо, все работает
|
|||
|
7
Злопчинский
18.10.12
✎
21:20
|
| Форум | Правила | Описание | Секции | Поиск |