Select Printer Urgent 2

rbuser

Dear Nico,

I use the version 6.22
Any property not work (after printer, before printer etc.)

I try

try

ppLabelZebra.Print;

ppLabelZebra.SavePrinterSetup := True;

finally

saveprintername(ppLabelZebra.PrinterSetup.PrinterDescription) or

saveprintername(ppLabelZebra.PrinterSetup.PrinterName)

end;

ever show default printer.
why ?
Best Regards,
Franco.

nicocizik

Hi Franco,

After the user selects a printer, you will need to access the printer object
to find which printer they selected. Try using the OnPrintDialogClose event
to access this value. Something like the following...

procedure TForm1.Button1Click(Sender: TObject);
begin
ppReport1.Print;

ppReport2.ShowPrintDialog := False;
ppReport2.PrinterSetup.PrinterName := FPrinterName;
ppReport2.Print;
end;

procedure TForm1.ppReport1PrintDialogClose(Sender: TObject);
begin
FPrinterName := ppReport1.Printer.PrinterName;
end;

--
Regards,

Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com

rbuser

Dear Nico,
Not work the event (any)
Franco.

nicocizik

Have you tried something similar to the code I gave in my previous post? In
my testing, this worked correctly.

--
Regards,

Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com

rbuser

With version 622 ?

nicocizik

Hi Franco,

When you trace your code, which line is failing? I'm going to need more
information on what is happening with your code to understand the problem.

I'm sorry, we do not have older versions of ReportBuilder available to test
with. I would recommend downloading and installing the latest trial version
available for the version of Delphi you are using and testing with that.

--
Regards,

Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com