Como usar QRComposite com QRPreview?

22/12/2009

1

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á ...
Responder
×
+1 DevUP
Acesso diário, +1 DevUP
Parabéns, você está investindo na sua carreira