Fórum Erro na chamada do Preview Customizado. #277442

Fiz um preview customizado para usar num relatorio que tem uma tela de filtro de data. Mas esta dando erro de acesso na chamada que faço no OnPreview do relatorio. Os codigos sao estes:
//Chamada do relatorio no filtro
procedure TFSeleciona_Data_Proc.BitBtn1Click(Sender: TObject);
begin
´
´
ShowQRListagem_Inadimplentes(Self);
end
//Unit do Preview
unit UVisualizar;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, QRPrntr, StdCtrls, Buttons, Spin, ExtCtrls;

type
TFVisualizar = class(TForm)
Panel1: TPanel;
BtnImprimir: TSpeedButton;
Label1: TLabel;
LblPagina: TLabel;
Label2: TLabel;
LblZoom: TLabel;
BtnPagInteira: TSpeedButton;
BtnLargura: TSpeedButton;
SpnPagina: TSpinButton;
SpnZoom: TSpinButton;
BtnSair: TBitBtn;
QRPreview1: TQRPreview;
edit_page: TEdit;
procedure edit_pageEnter(Sender: TObject);
procedure BtnImprimirClick(Sender: TObject);
procedure SpnPaginaDownClick(Sender: TObject);
procedure SpnPaginaUpClick(Sender: TObject);
procedure edit_pageKeyPress(Sender: TObject; var Key: Char);
procedure SpnZoomDownClick(Sender: TObject);
procedure SpnZoomUpClick(Sender: TObject);
procedure BtnPagInteiraClick(Sender: TObject);
procedure BtnLarguraClick(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure FormResize(Sender: TObject);
private
{ Private declarations }
public
procedure MostraPagZoom;
end;

var
FVisualizar: TFVisualizar;

implementation
´
´
´
//Procedure de criação e OnPreview do Relatorio
procedure ShowQRListagem_Inadimplentes(Sender:TComponent);
begin
try
if not Assigned(QRListagem_Inadimplentes) then
QRListagem_Inadimplentes := TQRListagem_Inadimplentes.Create(Sender);
QRListagem_Inadimplentes.PrinterSetup ;
QRListagem_Inadimplentes.Preview;
Finally
FreeAndNil(QRListagem_Inadimplentes);
end;
end;
´
´
´
procedure TQRListagem_Inadimplentes.QuickRepPreview(Sender: TObject);
begin
FVisualizar.QRPreview1.QRPrinter := QRListagem_Inadimplentes.QRPrinter;
FVisualizar.Show;
end;

Alguem saberia dizer o que esta errado ou teria um exemplo de preview customizado que se encaixe nessa situação?