| View previous topic :: View next topic |
| Author |
Message |
dBoussebha Guest
|
Posted: Mon Feb 27, 2006 6:03 pm Post subject: Pdf generation with Quickreport |
|
|
Hi;
I use the version 3.62 of the QuickReport and I would like to generate
direclty of the pdf files from of the Qrp files stored in a database in
using the "TQRPDFDocumentFilter" module.
But do not works (it does not pass anything the whole)
My code is :
procedure TForm1.Button1Click(Sender: TObject);
var
FichierPDF : TQRPDFDocumentFilter;
qrp : TQRPrinter;
ApplicationPath : string;
begin
ApplicationPath := ExtractFilePath(Application.ExeName);
FichierPDF := TQRPDFDocumentFilter.Create(ApplicationPath
+'Report.pdf');
qrp := TQRPrinter.Create(nil);
qrp.Load('D:\Temp\etat.qrp');
qrp.ExportToFilter(FichierPDF);
FichierPDF .free;
end;
Regards; |
|
| Back to top |
|
 |
Thomas Pfister Guest
|
Posted: Mon Feb 27, 2006 9:03 pm Post subject: Re: Pdf generation with Quickreport |
|
|
wrong group,
you should better ask in delphi.reporting-charting OR change to Rave and
then you're right here <g>
:-) thomas
"dBoussebha" <dboussebha (AT) antispam (DOT) cimaya.fr> schrieb im Newsbeitrag
news:440332aa$1 (AT) newsgroups (DOT) borland.com...
| Quote: | Hi;
I use the version 3.62 of the QuickReport and I would like to generate
direclty of the pdf files from of the Qrp files stored in a database in
using the "TQRPDFDocumentFilter" module.
But do not works (it does not pass anything the whole)
My code is :
procedure TForm1.Button1Click(Sender: TObject);
var
FichierPDF : TQRPDFDocumentFilter;
qrp : TQRPrinter;
ApplicationPath : string;
begin
ApplicationPath := ExtractFilePath(Application.ExeName);
FichierPDF := TQRPDFDocumentFilter.Create(ApplicationPath
+'Report.pdf');
qrp := TQRPrinter.Create(nil);
qrp.Load('D:\Temp\etat.qrp');
qrp.ExportToFilter(FichierPDF);
FichierPDF .free;
end;
Regards;
|
|
|
| Back to top |
|
 |
|