Cancelar impressão Rave

Delphi

22/11/2016

Bom dia a todos do forum DevMedia.
Estou desenvolvendo um projeto o qual estou utilizando a impressão dos relatórios pelo Rava na unha mesmo, via código.
A situação que está pegando no momento é que quando executo o relatório, que me traz a janela do Setup, e ai por qualquer motivo
que seja desejo cancelar a impressão do relatório clicando em cancelar, o mesmo não cancela, continua o processo da impressão.

Segue o que estou fazendo (obs: Utilizo o Delphi 10)

Rst1.SystemPrinter.MarginBottom := 0;
Rst1.SystemPrinter.MarginLeft := 0;
Rst1.SystemPrinter.MarginTop := 0;
Rst1.SystemPrinter.MarginBottom := 0;
RPDev.PrinterSetupDialog;
Rst1.SystemPrinter.Units := unCM;
Rst1.SystemPrinter.UnitsFactor := 2.54;
Rst1.SystemPrinter.Copies := rpDev.Copies;
rpDev.Orientation := poPortrait;
Rst1.SystemPrinter.Orientation := rpDev.Orientation;
Rst1.SystemPreview.FormState := wsMaximized;
Rst1.SystemSetups := Rst1.SystemSetups - [ssAllowSetup];
Rst1.SystemPreview.RulerType := rtBothCm;
rpDev.Copies := 1;
Rst1.Execute;

Agradecemos de antecipado aos que nos ajudarem.
Marlon Prado

Marlon Prado

Curtidas 0
POSTAR