Проблема с установками принтера

Previous  Top  Next

    
 

 

 

Обнаружил, что компонент QReport никак не реагирует на установки принтера PrinterSetup диалога, вызываемого нажатием кнопочкисобственного Preview!

 

В QuickReport есть собственный объект TQRPrinter, установки которого он использует при печати, а стандартные установки принтеров на него не влияют. В диалоге PrinterSetup, вызываемом из Preview можно лишь выбрать принтер на который нужно печатать (если, конечно, установлено несколько принтеров).

 

Советую поставить обновление QReport на 2.0J с www.qusoft.com.

 

Перед печатью (не только из QReport) программно установите требуемый драйвер принтера текущим для Windows

Code:

function SetDefPrn(const stDriver : string) : boolean;

begin

SetPrinter(nil).Free;

Result := WriteProfileString('windows', device, PChar( stDriver));

end;

 

 

 

 

 

После печати восстановите установки.

 

©Drkb::03271

Источник: http://dmitry9.nm.ru/info/