Printersetup in Quickreport

[dleeming]

Hi,

Ich bin neu hier und auch einen Englander.

Ich brauch etwa hilfe..

Und zwar mit die Printersetup Funktion von Quickrep.

Ich ruf es auf so wie hier unten und wenn die Printerdialog angezeigt wird und ich auch Abbrechen klicke, es Drückt trotzdem.

Was mach ich Falsch.

Delphi-Quellcode:

procedure Tfrm_selrep_cust_mgt_fee_top.JvBitBtn1Click(Sender: TObject);
begin
     // Print Management Fee

     frm_rep_cust_mgt_fee.qrep_cust_mgt_fee.Printersetup;
     frm_rep_cust_mgt_fee.qry_rep_mgt_fee.Active := True;
     frm_rep_cust_mgt_fee.qry_company_banking_information.Active := True;

     frm_rep_cust_mgt_fee.qrep_cust_mgt_fee.Print;
end;

Mfg

Darren

[marabu]

Hi Darren, welcome to the club.

AFAIR canceling PrinterSetup() only drops the settings you made in that dialog. Since there is no result returned - in fact you are dealing with a procedure not a function - you must change your concept. What about Preview() instead of PrinterSetup() followed by Print(). Your user should be capable to decide on when to change settings and can do so from within the preview - and he also can close the preview without printing.

Kind regards

marabu