powered by simpleCommunicator - 2.0.41     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Печать в PDF, настроить принтер Bullzip
24 сообщений из 24, страница 1 из 1
Печать в PDF, настроить принтер Bullzip
    #40053591
DmitryKn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день,

хочу использовать печать в pdf-файл без открытия диалогов, win10, предполагаемая ОС win server 2008 r2, код отсюда: 15915397
Судя по форуму у всех все отлично работает, и это вызывает и зависть и огорчение, поскольку у меня не работает.

В win по умолчанию установлен wi-fi принтер HP.
Если ставлю по умолчанию Bullzip - все хорошо работает. Если оставляю НР, то никак.

После команды:

SET PRINTER TO NAME "Bullzip PDF Printer"

SET('printer',2) возвращает HP, SET('printer',3) честно возвращает Bullzip, но печать идет тупо в НР.

Приложение мое работает в терминальном режиме, менять там принтер по умолчанию на Bullzip выглядит очень неправильно.

Посоветуйте, плиз, что-нибудь, но, по-возможности, не обидное.
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40053796
Leonid Kudryavtsev
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
PRINTER, 2
Заданное по умолчанию имя принтера Windows

PRINTER, 3
Заданное по умолчанию имя принтера Visual FoxPro (указанное в окне Печати Visual FoxPro или Окне Print Setup)

Подозреваю, тут важно как же именно Вы делаете "печать в pdf-файл без открытия диалогов". Но этого кода в исходном сообщении то и нету.
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40053804
DmitryKn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Leonid Kudryavtsev
PRINTER, 2
....
Подозреваю, тут важно как же именно Вы делаете "печать в pdf-файл без открытия диалогов". Но этого кода в исходном сообщении то и нету.


Код есть в приведенной ссылке, вот он:
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
	PRINTJOB 
		bzSettings = CreateObject("Bullzip.PDFPrinterSettings")
		WITH bzSettings
			.RemoveSettings(.t.)
			.SetValue("Output", lcDir+lcFileName )
			.SetValue("ShowPdf","no")
			.SetValue("ShowSettings","never")
			.SetValue("ShowProgress","no")
			.SetValue("ShowProgressFinished","no")
			.WriteSettings(.t.)
		ENDWITH  

		SET PRINTER TO NAME "Bullzip PDF Printer"
                * в этом месте проверял, произошло ли переключение принтера:
                * lcprn = SET('printer',3)
                *MESSAGEBOX(lcprn) 
                *возвращает "Bullzip PDF Printer"

		REPORT FORM myReport TO PRINTER && а печать идет на установленный в Win по умолчанию HP

		SET PRINTER TO DEFAULT   
		RELEASE bzSettings
	ENDPRINTJOB 



Если по умолчанию установлен Bullzip, то он (код) работает почти безупречно (мелькают некие сообщения, возможно, типа количества страниц или что-то в этом роде, но это мелочи, по большому счету), пдф-файл формируется. Но вот если установлен принтер, в моем случае HP MFP M28W (привожу название, вдруг там какой общеизвестно кривой драйвер, который все портит), то как выше указывал - в файл отправить не могу, хотя SET('printer',3) указывает, что переключение принтеров произошло.
Возможно какая-то где-то настройка хитрая, или что-то еще упустил. Все пути проверял, если что.
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40053866
Leonid Kudryavtsev
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DmitryKn,

Как минимум странно, что принтер устанавливается ПОСЛЕ PRINTJOB.

IMHO.
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40053884
DmitryKn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Leonid Kudryavtsev,

Выполнение кода в таком виде:
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
	PRINTJOB 
		bzSettings = CreateObject("Bullzip.PDFPrinterSettings")
		WITH bzSettings
			.RemoveSettings(.t.)
			.SetValue("Output", lcDir+lcFileName )
			.SetValue("ShowPdf","no")
			.SetValue("ShowSettings","never")
			.SetValue("ShowProgress","no")
			.SetValue("ShowProgressFinished","no")
			.WriteSettings(.t.)
		ENDWITH  
        ENDPRINTJOB 

		SET PRINTER TO NAME "Bullzip PDF Printer"
                * в этом месте проверял, произошло ли переключение принтера:
                * lcprn = SET('printer',3)
                *MESSAGEBOX(lcprn) 
                *возвращает "Bullzip PDF Printer"

		REPORT FORM myReport TO PRINTER && а печать идет на установленный в Win по умолчанию HP, а не в Bullzip

		SET PRINTER TO DEFAULT   
		RELEASE bzSettings



Не меняет ровным словом ничего. Проблема в том, что приложение видит Bullzip как установленный для приложения, но печать упрямо идет на принтер по умолчанию в win, НР в моем случае.
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40053912
PaulWist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DmitryKn,

Save Printer Enviroment - в отчете галка снята?
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40053941
DmitryKn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
PaulWist,

Конечно не снята, кто ж ее снимет-то :)

Спасибо большое, все теперь работает!
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40054046
DmitryKn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Еще одно открытие чудное.

Документ, отправляемый в пдф, содержит цветную картинку, однако конечный документ черно-белый.
Если в пдф отправлять командой:

REPORT FORM myReport TO PRINTER PROMPT

т.е. диалоговое окно все же вызывать, и там в настройках принтера указать "цветная печать", то пдф получается с цветной картинкой.

Установил через "Устройства и принтеры" в панели управления винды, в настройках печати принтера Bullzip "цветная печать". При печати из приложения на Bullzip все равно установка не изменяется, и если руками не изменять, то по умолчанию - черно-белая.

Посоветуйте, как победить?
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40054054
bguo_reminder
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
DmitryKn,

здесь тоже покопайтесь...
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40054062
Leonid Kudryavtsev
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40054104
DmitryKn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
bguo_reminder,

немного покопался, не победил (
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40054105
DmitryKn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Leonid Kudryavtsev,

С этим принтером та же история, при вызове из приложения устанавливается опция черно-белая печать.
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40054118
Leonid Kudryavtsev
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DmitryKn,

Что значит с "этим"? Вы документацию на используемые Вами продукты вообще не читаете?
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40054120
Leonid Kudryavtsev
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ставить и эксперементировать желания нет
В документации все про настройку вроде как расписано.
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40054172
DmitryKn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Leonid Kudryavtsev
DmitryKn,

Что значит с "этим"? Вы документацию на используемые Вами продукты вообще не читаете?


Я увидел отличие в названии и принял это за отдельный продукт, все хочется побыстрее. Но сходу не нашел такой настройки, посмотрю
еще внимательнее.
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40054308
DmitryKn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
В ходе поиска выявил следующее:
1. Как только снимаем галку Save Printer Enviroment в Page Layout, в принтере Bullzip устанавливается опция черно-белой печати и никакими настройками из проги победить не удалось. Пытался на таких настройках:

Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
	PRINTJOB 
		bzSettings = CreateObject("Bullzip.PDFPrinterSettings")
		WITH bzSettings
			...
			.SetValue("ColorModel","CMYK") && RGB тоже
			.SetValue("ImageCompression","no")  
			...
		ENDWITH  

	ENDPRINTJOB 



Попытка менять настройки в ини-файлах тоже не принесли успеха. Изменить через интерфейс Bullzip нельзя, хочет сразу денег.

2. Как только возвращаем галку Save Printer Enviroment в Page Layout, то опция печати в цвет тут же становится на место, но неизбежен вызов диалогового окна.

так что задача пока что не решена
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40075813
AK-Shah
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Зачем зависеть от установленных (неустановленных) PDF-принтеров? Есть немало библиотек на чистом Фоксе, позволяющие вывести почти во все популярные форматы. Да, большинство этих библиотек платные (frx2any, xfrx и др.). Но есть же тот же FoxyPreviewer


http://www.foxypreviewer.com/p/downloads.html


Пример использования:

SET PROCEDURE TO LOCFILE("FoxyPreviewer.App") ADDITIVE
LOCAL loReport AS "PreviewHelper" OF "FoxyPreviewer.App"
loReport = CREATEOBJECT("PreviewHelper")
WITH loReport AS ReportHelper
.AddReport(_Samples + "\Solution\Reports\percent.frx", "NODIALOG")
.cDestFile = "c:\Teste1.pdf" && Use to create an output without previewing
.RunReport()
ENDWITH
loReport = NULL
RUN /N Explorer.Exe c:\Teste1.pdf

И будет вас щастье! :)
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40076563
DmitryKn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
AK-Shah,

спасибо, попробую это, отпишусь
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40078906
AK-Shah
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DmitryKn,

Да, конечно. Ребятам с Фоксклуб это пригодилось. Что-то не получится - пиши(-те) , попробуем решить. Удачи.
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40080283
DmitryKn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
AK-Shah,

Добрый день, дошли руки попробовать, результат негативный.

с налету не удалось привинтить FoxyPreviewer, ругается на мой репорт, вполне рабочий, ошибка 4133.
Почему-то не видит подготовленные для отчета данные.
Кроме того, locfile открывает диалоговое окно, что недопустимо.

Сам FoxyPreviewer поместил в папку с приложением, из соображений, что бы в случае чего не забыть про него, не знаю, насколько это правильно.

Версия последняя.
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40080589
AK-Shah
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DmitryKn,

Я брал с сайта, потом немного допиливал под себя (шрифт выводился не в той кодовой старнице/локали). Ну и LOCFILE() поубирал. Отчет могу завтра на работе посмотреть - что там с ним не так.
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40080805
AK-Shah
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DmitryKn,

Вот моя сборка FoxyPreviewer: https://dropmefiles.com/3Vqe4
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40081146
DmitryKn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
AK-Shah,

Спасибо, посмотрю, отпишусь.
...
Рейтинг: 0 / 0
Печать в PDF, настроить принтер Bullzip
    #40083165
AK-Shah
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DmitryKn,


Не получилось? Да, там прям со всеми отчетами не взлетит (если допилить только!). У меня производственные сложились в строку (наезд одной на другую). Но это было некритично.

Кидайте свой отчет и ТЕСТОВЫЕ данные - посмотрим, что не взлетело.
...
Рейтинг: 0 / 0
24 сообщений из 24, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Печать в PDF, настроить принтер Bullzip
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]