Invalid Window Handle en QuickReport

[jlcasih]

Hola, estoy haciendo una impresion con QuickReport y hay un error aleatorio cuando muestro la impresion como PreviewModal, al hacer la previsualizacion no me muestra los datos y al cerrar me da el error: "Invalid Window Handle", he probado con Application.ProcessMessages y nada, cuando la muestro Preview esta todo bien, pero quisiera que la vista previa quede modal, estoy usando delphi 7, agradezco mucho su ayuda, saludos y gracias.

[[Bicho]]

Empezado por jlcasih

estoy haciendo una impresion con QuickReport y hay un error aleatorio

Hombre, tanto como aleatorio, no se yo... pero bueno, sería interesante, a la vez de necesario para que te ayudemos, que pusieras una parte del código que te está dando el problema para una localización del error más fácil.

Saludos

[jlcasih]

En primero instancia tengo un objeto que se encarga de setear propiedades generales y llamar al form en donde se encuentra el reporte diseñado,el llamado en este caso, el mas simple es un listado, codigo:

try
  F                                                  := TFReporte1.Create(nil);
  TFReporte1(F).QuickRep1.DataSet      := ADataSet;
  TFReporte1(F).LblTitulo.Caption         := 'Titulo';
  TFReporte1(F).MemSubTit.Lines.Text  := 'Subtitulo';
  //Guardo puntero
  Book                                             := ADataSet.Bookmark;
  DataSet.DisableControls;
  TQuickRep(F.FindComponent('QuickRep1')).ReportTitle := 'Vista Previa';
  TQuickRep(F.FindComponent('QuickRep1')).PreviewModal;
finally
  if Book <> '' then ADataSet.Bookmark   := Book;
  ADataSet.EnableControls;
  TQuickRep(F.FindComponent('QuickRep1')).Free;
  F.Free;
end;

Muchas gracias por tu rapida respuesta. Saludos