PDA

Ver la Versión Completa : pasar qreport a PDF por codigo


m8estrella83
04-08-2007, 01:56:47
Hola !!!


Trabajo con delphi 5

Espero me puedan ayudar, me pidieron enviar un archivo de texto y un archivo pdf a un servidor FTP en el archivo de texto no hay problema lo creo y lo envio. pero el archivo PDF tengo que ver la vista previa de mi reporte en el Qreport y luego grabarla a PDF y despues enviarla al servidor FTP y yo quisiera crear el PDF por codigo sin necesidad de que el usuario tenga que crearlo.


Espero haberme explicado bien gracias!!!

ContraVeneno
04-08-2007, 17:36:48
Con la versión profesional del quickreports, solo es cuestión de agregar un PDFFilter y el reporte se podrá guardar como PDF, si lo haces por código, solo hace falta una línea de código para generar el archivo.

GustavoCruz
05-08-2007, 01:00:31
Con la versión profesional, debes colocar un TQRPDFFilter, pone un TSaveDialog y a continuación el siguiente código en el botón que quieras (Debe funcionar)

procedure form1.tuprocedimiento(sender:TObject);
var
Archivo:String;
begin
if SaveDialog2.Execute then
begin
Archivo:=SaveDialog2.FileName;
freportex.qrCertificados.ExportToFilter(TQRRTFExportFilter.Create(Archivo));
ShellExecute(fPrincipal.Handle,nil,pchar(Archivo),'','',SW_SHOWNORMAL)
end;
end;