List Info

Thread: automated saving of reports using QuickReports in .pdf format




automated saving of reports using QuickReports in .pdf format
user name
2006-04-04 15:46:01
Hello!

Actually, I never knew you could use the export function in the QR
previewer.  I always handled it as a standalone function.  Here is what
I do for a Textfile filter:

procedure TForm1.PrintHandoutToFile1Click(Sender: TObject);
Var
TxtFilter : TQRAsciiExportFilter;  //Export filter variable
FUpdateRpt :TFupdateRpt;           //Report variable
begin
FUpdateRpt :=TFupdateRpt.Create(Self); ; //Create Report variable
Showmessage('Exporting Report to ' + GetCurrentDir + '\Handout.Txt');
TxtFilter := TQRAsciiExportFilter.Create(GetCurrentDir +
'\Handout.Txt');  //Create Filter
  Try
 ; Try
 ;  FUpdateRpt.Quickrep1.ExportToFilter(TxtFilter);  //Translate output
from report to filter file
   Showmessage('Report is complete');
  Except
  ShowMessage('Error Printing to File');
  end;
  Finally
  TxtFilter.Free;
  end;

*-----------------  End of Code ---------------------*

Hope this is what you are looking for....

Tom Nesler



-----Original Message-----
From: delphi-en@yahoogroups.com [mailto:delphi-en@yahoogroups.com] On
Behalf Of markbjsy
Sent: Monday, April 03, 2006 6:08 PM
To: delphi-en@yahoogroups.com
Subject: [delphi-en] automated saving of reports using QuickReports in
.pdf format


Hi, I wonder if you can help..

I am using Delphi2005 , QuickReports and SQL2000 db.

My application generates multiple invoices/statements created using
QuickReports.

I want to save each invoice/statement as a separate .pdf file under
program control (supplying a path and meaningful name for each file, as
held on the database).

There is a PDF filter available with QuickReports but the only way to
use it is to PrintPreview each file, select Save, select the .pdf file
format and select/enter a path/filename .. a long-winded manual process.

I want to fully automate under program control.

Do you have any suggestions? Are there any tools that can help?

many thanks





[1]

about | contact  Other archives ( Real Estate discussion Medical topics )