pasar qreport a PDF por codigo

[m8estrella83]

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]

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]

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)

Código Delphi [-]
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;