Вниз
Скачать: CL | DM;

печать на принтер, которые не "по-умолчанию"   Найти похожие ветки 

 
BOB16   (2006-12-12 15:57) [0]

Столкнулся с проблемой: в программе осуществляется вывод на печать через компонент QPRINTERS.Printer (:TPrinter) - CLX-библиотека.
Если принтер этот объявлен как принтер "по-умолчанию", всё - хорошо.
Но, как только нужно вывести на другой принтер (тоже установленный в системе, один USB, другой LPT).
По хелпу выяснил, что нужно указать имя принтера куда печатать:
uses QPrinters,...
....
string PrinterNameS:= "имя принтера";
...
QPrinter_setPrinterName(QPrinterH(Printer.PrintAdapter.Handle),@PrinterNameS);


потом ещё проверяю - действительно ли сейчас выбрал тот  принтер:

QPrinter_PrinterName(QPrinterH(Printer.PrintAdapter.Handle),@PrinterNameS) ;

PrinterNameS - показывает, что да, принтер правильный,
но как только Printer.BeginDoc; .. EndDoc;

Начинает печатать принтер, который с "галкой" - "по-умолчанию"!

Кто-нибудь сталкивался с такими заморочками?


 
BOB16   (2006-12-12 15:59) [1]

Дополню: со стандартным TPrinter из VCL-библиотеки, проблем нет вообще:
Printer.PrinterIndex:= номер_выбранного принтера_для_печати;


 
Джо ©   (2006-12-12 17:17) [2]

> PrinterNameS - показывает, что да, принтер правильный,
> но как только Printer.BeginDoc; .. EndDoc;
>
> Начинает печатать принтер, который с "галкой" - "по-умолчанию"!

Может, название принтера указывается неверное?


 
BOB16   (2006-12-12 21:17) [3]

имя принтера было получено ранее функцией
QPrinter_PrinterName(QPrinterH(Printer.PrintAdapter.Handle),@PrinterNameS) ;
и после выполнения
QPrinter_setPrinterName(QPrinterH(Printer.PrintAdapter.Handle),@PrinterNam eS);
при повторной проверке возвращается именно тот же принтер, который и хотелось бы "осчастливить" документом..
Но.....не тут то было - листы документа выползают совсем с другого....
В окне состояния очередь нужного принтера пуста!



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.031 c
15-1168848855
ocean
2007-01-15 11:14
2007.02.04
С прошедшим Старым НГ!


15-1168639940
kaZaNoVa
2007-01-13 01:12
2007.02.04
Универсальный вызов функции


15-1168878501
den_c
2007-01-15 19:28
2007.02.04
Компонент для работы с zip-архивом


2-1169050030
Garacio
2007-01-17 19:07
2007.02.04
Выбор каталога с возможностью создания нового


9-1143470364
Shweps
2006-03-27 18:39
2007.02.04
Документация по созданию игры на Delphi




   Наверх