ShowDialog only once?

starhu · August 2011

Hello,

Many times I need to print out a whole dataset. For example a customer table and every customer would be a separate job.

It is very annoying that in case of 100 customers the Showdialog will show up 100 times.

This is the code I use. Can I show the print dialog at once, and then all the frxReport.prints will use it?

frxReport.PrintOptions.ShowDialog := True;

while not InputDataSet.Eof do
Begin

// some processing here

frxReport.PrepareReport;

frxReport.print;

InputDataSet.Next;
End; // while not InputDataSet.Eof do

gpi · August 2011

Try

frxReport.PrintOptions.ShowDialog := True;

while not InputDataSet.Eof do
Begin

// some processing here


frxReport.PrepareReport;

frxReport.print;

if frxReport.PrintOptions.ShowDialog then frxReport.PrintOptions.ShowDialog := False;
InputDataSet.Next;
End; // while not InputDataSet.Eof do

starhu · August 2011

gpi wrote: »

Try

frxReport.PrintOptions.ShowDialog := True;

while not InputDataSet.Eof do
Begin

// some processing here


frxReport.PrepareReport;

frxReport.print;

if frxReport.PrintOptions.ShowDialog then frxReport.PrintOptions.ShowDialog := False;
InputDataSet.Next;
End; // while not InputDataSet.Eof do

Thank you, I will try it.

ShowDialog only once?

Comments

Leave a Comment