Printer setup for QuickReports 2.0 saved file problems
I want to write a Viewer for the report files saved by QuickReports 2.0.
(I already wrote the viewer for QuickReports 1.0 saved files).
Now I write...
---
...
type
TfrmPreview = class(TForm)
...
prvQR: TQRPreview;
...
procedure FormCreate(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure bbtPrintClick(Sender: TObject);
...
public
curFile: String;
end;
...
procedure TfrmPreview.FormCreate(Sender: TObject);
begin
...
curFile := ParamStr(1);
prvQR.QRPrinter := TQRPrinter.Create;
...
end;
...
procedure TfrmPreview.FormShow(Sender: TObject);
begin
...
prvQR.QRPrinter.Load(curFile);
...
end;
...
procedure TfrmPreview.bbtPrintClick(Sender: TObject);
begin
...
prvQR.QRPrinter.Print;
...
end;
...
---
So the name of the saved report file is passed as a parameter to my
viewer. I can load this file only by QRPrinter.Load method so I must
create this property of the TQRPreview component. But when I try to print
this report I have two problems.
1.
TQRPreview component shows me a good report but prvQR.QRPrinter.Print method
gives me bad small one and extra form feed.
2.
I don't understand how can I call printer setup. TQRPreview has no TQuickRep
component so no PrinterSetup method. TQRPrinter has PrintSetup method but
when I call it nothing happens.
Help me, please!
Thanks for the answers!
--
Igor Mikhalev, SSC "Octant" Ltd, Odessa, Ukraine
------------------------------------------------
(380482) 25-23-28 m...@octant.tenet.odessa.ua