Como usar QRComposite com QRPreview?
22/12/2009
0
Bom dia pessoal!
Preciso visualizar meus relatórios (feitos com QRComposite) em um QRPreview que desenvolvi.
A Rotina que cria o Form do QRPReview é a seguinte:
procedure visualizarQuickReport(AOwner : TComponent; AQRPrinter :TQRPrinter);
var controle :TWinControl;
begin
controle := TVisualizacaoQuick.CreatePreview(AOwner, AQRPrinter);
TVisualizacaoQuick(controle).Show; end; Minha rotina que coloco no OnPreview dos QuickReports é a seguinte: procedure Tf37_12.QuickRep1Preview(Sender: TObject);
begin
inherited;
VisualizarQuickReport(Application, QuickRep1.QRPrinter);
end; Quando chamo o QRComposite.Preview e os QuickReports são adicionados, acontece um erro de Access Violation. Debugando vi que o Preview do QRComposite cria um novo Relatório internamente e por isso acontece o erro. Alguém tem alguma idéia ou dica para resolver isso??? Obrigado desde já ...
var controle :TWinControl;
begin
controle := TVisualizacaoQuick.CreatePreview(AOwner, AQRPrinter);
TVisualizacaoQuick(controle).Show; end; Minha rotina que coloco no OnPreview dos QuickReports é a seguinte: procedure Tf37_12.QuickRep1Preview(Sender: TObject);
begin
inherited;
VisualizarQuickReport(Application, QuickRep1.QRPrinter);
end; Quando chamo o QRComposite.Preview e os QuickReports são adicionados, acontece um erro de Access Violation. Debugando vi que o Preview do QRComposite cria um novo Relatório internamente e por isso acontece o erro. Alguém tem alguma idéia ou dica para resolver isso??? Obrigado desde já ...
Carlos Bueno
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)