Обычный текст -> RTF

Clarion, Clarion 7

Модератор: Дед Пахом

Правила форума
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
gopstop2007
✯ Ветеран ✯
Сообщения: 1266
Зарегистрирован: 25 Март 2009, 21:55

Обычный текст -> RTF

Сообщение gopstop2007 » 22 Сентябрь 2018, 10:40

kreator писал(а):
21 Сентябрь 2018, 19:01
А есть этот драйвер "Microsoft Print to PDF" не для Win10? Например, для Win7. Давно смотрел - вроде не было. А было бы актуально. Корпоративщиков на десятку затащить труднее, чем частников.
валом, сам пользуюсь http://www.bullzip.com/ по функционалу шикарен
“Есть всего 2 типа языков: те, на которые все жалуются и те, которыми никто не пользуется.” — Бьерн Страуструп

kreator
✯ Ветеран ✯
Сообщения: 3402
Зарегистрирован: 28 Май 2009, 14:54
Откуда: Москва

Обычный текст -> RTF

Сообщение kreator » 22 Сентябрь 2018, 13:14

Игорь Столяров писал(а):
21 Сентябрь 2018, 19:14
kreator писал(а):
21 Сентябрь 2018, 19:01
А есть этот драйвер "Microsoft Print to PDF" не для Win10?
Есть. Но не шару, к сожалению. Называется Adobe PDF Printer. Продаётся отдельно и идёт в комплекте c Adobe Acrobat.
Возможности на 2 порядка круче, чем у Microsoft PDF Printer, но это актуально для дизайнеров, полиграфистов и т.д.

Также есть различные сторонние поделки вроде Do Print PDF и т.д. - но там всё грустно.
Можно поискать по строке "PDF Printer for Windows" ...
gopstop2007 писал(а):
22 Сентябрь 2018, 10:40
kreator писал(а):
21 Сентябрь 2018, 19:01
А есть этот драйвер "Microsoft Print to PDF" не для Win10? Например, для Win7. Давно смотрел - вроде не было. А было бы актуально. Корпоративщиков на десятку затащить труднее, чем частников.
валом, сам пользуюсь http://www.bullzip.com/ по функционалу шикарен
Хотелось бы жёстко зашить в программу использование драйвера PDF. А эту кучу вариантов как использовать? Для пользователя чем меньше вариантов, тем лучше.
We are hard at work… for you. :)

Аватара пользователя
Игорь Столяров
Ветеран движения
Сообщения: 4198
Зарегистрирован: 07 Июль 2005, 9:19
Откуда: г. Ростов-на-Дону

Обычный текст -> RTF

Сообщение Игорь Столяров » 22 Сентябрь 2018, 13:37

kreator писал(а):
22 Сентябрь 2018, 13:14
Для пользователя чем меньше вариантов, тем лучше.
Тут видится 2 варианта (для старых Windows) …

1. При создании PDF документа на основании отчёта проверяем наличие принтера "PDF Printer".
Если его нет - то выдаём пользователю сообщение с предложением установить любой PDF принтер
и переименовать его в "PDF Printer". Или в настройку программы добавляем выбор установленного PDF принтера.
Печатаем на этот принтер и создаём PDF документ.

2. Как я уже упоминал есть библиотеки, в т.ч. и для Clarion. На FTP, в папке Template, 2 варианта.
Но они только коммерческие. И как в случае, с самопальными PDF принтерами - нужно быть готовым
к компромиссам … ;)
«V» значит Вендетта !

kreator
✯ Ветеран ✯
Сообщения: 3402
Зарегистрирован: 28 Май 2009, 14:54
Откуда: Москва

Обычный текст -> RTF

Сообщение kreator » 22 Сентябрь 2018, 14:54

У нас в "корпорации" эти варианты малореализуемы. За установку принтеров отвечают админы. И заявка пользователя на установку какого-то PDF принтера (а тем более на его переименование) скорее всего окончится ничем. Жёстко. А входящие в комплект Винды вещи у админов отторжения не вызывают.
We are hard at work… for you. :)

Аватара пользователя
Игорь Столяров
Ветеран движения
Сообщения: 4198
Зарегистрирован: 07 Июль 2005, 9:19
Откуда: г. Ростов-на-Дону

Обычный текст -> RTF

Сообщение Игорь Столяров » 22 Сентябрь 2018, 15:09

kreator писал(а):
22 Сентябрь 2018, 14:54
А входящие в комплект Винды вещи у админов отторжения не вызывают.
Ну тады и неминуемый прогресс админам не чужд быть должен. GoTo Windows 10. Там всё своё есть. :)
«V» значит Вендетта !

kreator
✯ Ветеран ✯
Сообщения: 3402
Зарегистрирован: 28 Май 2009, 14:54
Откуда: Москва

Обычный текст -> RTF

Сообщение kreator » 23 Сентябрь 2018, 14:36

Игорь Столяров писал(а):
22 Сентябрь 2018, 15:09
Ну тады и неминуемый прогресс админам не чужд быть должен. GoTo Windows 10. Там всё своё есть.
Наверно, уже пора выяснить - когда будет прогресс, почему не ставим десятку. Знаю точно, что лицензия есть. ВВП на них нет.
We are hard at work… for you. :)

kreator
✯ Ветеран ✯
Сообщения: 3402
Зарегистрирован: 28 Май 2009, 14:54
Откуда: Москва

Обычный текст -> RTF

Сообщение kreator » 14 Август 2019, 11:32

Игорь Столяров, а драйверу "Microsoft Print to PDF" можно подсунуть имя файла, в который нужно сохранить отчёт? Чтобы для пользователя уже не выскакивало окно выбора. Я что-то не нашёл такую настройку.
We are hard at work… for you. :)

Аватара пользователя
Игорь Столяров
Ветеран движения
Сообщения: 4198
Зарегистрирован: 07 Июль 2005, 9:19
Откуда: г. Ростов-на-Дону

Обычный текст -> RTF

Сообщение Игорь Столяров » 14 Август 2019, 16:54

kreator писал(а):
14 Август 2019, 11:32
можно подсунуть имя файла
Я понял, в чём проблема. Здесь нужно использовать старую индейскую хитрость, которую придумал Admin (кажется).
Называется сие "Печать отчёта с подменой драйвера принтера". Т.е. мы в ABReport.clw объявляем пустой Report:

Код: Выделить всё

_PrintPDFQueue       Queue(PreviewQueue)
                     end

_PDFReport           Report('')
                     end
Сохраняем все текущие параметры печати, т.к. они системные и выставляем новые:

Код: Выделить всё

  Printer{PropPrint:Device} = 'Microsoft Print to PDF'
  Printer{PropPrint:PrintToFile} = True
  Printer{PropPrint:PrintToName} = имя PDF файла для отчёта
Выставляем параметры отчёта (после его открытия есстестно):

Код: Выделить всё

           Open(_PDFReport)
           _PDFReport{Prop:Text}      = имя отчёта
           _PDFReport{Prop:PreView}   = _PrintPDFQueue
           _PDFReport{Prop:Landscape} = Self.TypeReport
           EndPage(_PDFReport)  ! НЕ ПРОПУСКАТЬ ЭТО !!!
Копируем в этот отчёт листы из сформированной очереди печати PrintPreviewQueue и отправляем на "печать":

Код: Выделить всё

   _PDFReport{Prop:FlushPreview} = True
   Close(_PDFReport)
   Free(_PrintPDFQueue)   
Восстанавливаем системные параметры печати, и собственно всё - забираем готовый отчёт в виде PDF файла ... :)
«V» значит Вендетта !

Аватара пользователя
Admin
Администратор
Сообщения: 3456
Зарегистрирован: 05 Июль 2005, 14:59
Откуда: Хабаровск
Контактная информация:

Обычный текст -> RTF

Сообщение Admin » 15 Август 2019, 0:03

Вряд ли я
Рай совершает ошибки ничуть не реже чем ад. Просто у него хорошая пресса

Аватара пользователя
Игорь Столяров
Ветеран движения
Сообщения: 4198
Зарегистрирован: 07 Июль 2005, 9:19
Откуда: г. Ростов-на-Дону

Обычный текст -> RTF

Сообщение Игорь Столяров » 15 Август 2019, 5:55

Admin писал(а):
15 Август 2019, 0:03
Вряд ли я
И точно - не я. :)
«V» значит Вендетта !

kreator
✯ Ветеран ✯
Сообщения: 3402
Зарегистрирован: 28 Май 2009, 14:54
Откуда: Москва

Обычный текст -> RTF

Сообщение kreator » 15 Август 2019, 10:48

Игорь Столяров писал(а):
14 Август 2019, 16:54
Сохраняем все текущие параметры печати, т.к. они системные и выставляем новые:

Код: Выделить всё

Printer{PropPrint:Device} = 'Microsoft Print to PDF'
Printer{PropPrint:PrintToFile} = True
Printer{PropPrint:PrintToName} = имя PDF файла для отчёта
Вот за это спасибо! Если это заработает, даже не знаю сколько головной боли у нас уйдёт. Сейчас попробуем.
We are hard at work… for you. :)

Аватара пользователя
Игорь Столяров
Ветеран движения
Сообщения: 4198
Зарегистрирован: 07 Июль 2005, 9:19
Откуда: г. Ростов-на-Дону

Обычный текст -> RTF

Сообщение Игорь Столяров » 15 Август 2019, 11:47

kreator писал(а):
15 Август 2019, 10:48
Если это заработает
Давно это было, но кажется тупо перенаправить произвольный готовый отчёт в PDF файл - не получится.
Нужно именно создать новый Report, выставить параметры и потом перелить в него отчёт.
Или же тогда изначально создавать отчёт с драйвером PDF ...
«V» значит Вендетта !

Аватара пользователя
vic7tar
Старожил
Сообщения: 237
Зарегистрирован: 09 Февраль 2017, 20:12

Обычный текст -> RTF

Сообщение vic7tar » 15 Август 2019, 14:31

Всё равно спросит куда записывать.
C10, Win10x64

Аватара пользователя
Игорь Столяров
Ветеран движения
Сообщения: 4198
Зарегистрирован: 07 Июль 2005, 9:19
Откуда: г. Ростов-на-Дону

Обычный текст -> RTF

Сообщение Игорь Столяров » 15 Август 2019, 15:04

vic7tar писал(а):
15 Август 2019, 14:31
Всё равно спросит куда записывать.
Неа. Однозначно не спрашивает. :)
Изначально делали пакетную выгрузку отчётов в PDF с отправкой по e-mail (счёт + ТОРГ12 + УПД и т.д.), а далее уже прикрутили везде ...
«V» значит Вендетта !

Аватара пользователя
vic7tar
Старожил
Сообщения: 237
Зарегистрирован: 09 Февраль 2017, 20:12

Обычный текст -> RTF

Сообщение vic7tar » 15 Август 2019, 15:23

Вспомните, а это давно было с Adobe PDF Converter-ом или с Microsoft Print To PDF-ом?
C10, Win10x64

Ответить