Hola amigos del foro, le mando los mejores deseos para este año 2012, que se cumplan todas sus metas y todos sus deseos
Les platico que tengo una situación que me ha causado algunos dolores de cabeza.
Estoy creando una clase que debe recibir un archivo QRP, creado previamente desde una aplicación Delphi con QuickReport
El problema es el siguiente: En la clase recibo el archivo QRP, y al intentar cargarlo se queda colgado y no hace nada, no envia ningun error, pero tampoco carga el archivo QRP a la memoria, he buscado alguna solucion pero creo que esto no es algo muy comun.
lo he intentado de estas dos formas y en las dos hace lo mismo, se cuelga y no envia ningun mensaje
Código:
function TIntegraArchivoDig.ProcesaQRP(ArchQRP: String): boolean;
var
QRFiltro : TQuickRep;
QRPDFFilter : TQRPDFDocumentFilter;
QRPrinter : TQRPrinter;
begin
//Instanciamos el objeto QuickReport para poder cargar el archivo
QRFiltro.Prepare;
QRFiltro.Printer.Load(ArchQRP);
QRFiltro.Preview;
end;
Código:
function TIntegraArchivoDig.ProcesaQRP(ArchQRP: String): boolean;
var
QRFiltro : TQuickRep;
QRPDFFilter : TQRPDFDocumentFilter;
QRPrinter : TQRPrinter;
begin
with TQRPHandler.create do
begin
QRPDFFilter := TQRPDFDocumentFilter.Create('C:\Proyectos\IntegraDig\Pruebas\Prueba.pdf');
QRFiltro := TQuickRep.Create(nil);
QRFiltro.Prepare;
QRFiltro.QRPrinter := TQRPrinter.Create(QRFiltro);
QRFiltro.QRPrinter.Load(ArchQRP);
QRFiltro.Preview;
QRFiltro.ExportToFilter(QRPDFFilter);
end;
espero puedan ayudarme.
De Antemano agradezo la atención.