PDA

Ver la Versión Completa : Invalid Window Handle en QuickReport


jlcasih
27-10-2006, 23:05:21
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
27-10-2006, 23:24:36
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
28-10-2006, 01:23:20
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