Generar PDF y mandar mail

[jafera]

Buenas a todos.

Necesito una orientación de como realizar un pequeño proceso, el cual me guatria implementar, pero no se si es factible automatizar tanto.

En una aplicación desarrollada para gestionar las designaciones de los comisarios de ciclismo de mi región, tengo un form en el que se introducen los datos de las carreras, nombre, lugar, hora, clase de la prueba, etc., en el mismo form tengo un dbgrid en el que coloco los comisarios que gestionaran dicha prueba.
Un boton imprimir me saca el informe en papel en formato de quickreport/QRDesign, el cual puedo imprimir en papel o guardar como pdf.
Otro botón Envia mail, recorre el dataset de los arbitros y genera un mail con los correos de los colegiados de la prueba.
Todo esto correcto, pero me gustaria que en el momento de darle a envia mail, se generara el pdf automáticamente y se colocara como adjunto en el correo.
Esto es posible?
Para enviar el mail utilizo el ejemplo de las Jv, el JvMail/MailExemple.

Saludos y gracias a todos

Josep

[Neftali [Germán.Estévez]]

Empezado por jafera

Un boton imprimir me saca el informe en papel en formato de quickreport/QRDesign, el cual puedo imprimir en papel o guardar como pdf.


...pero me gustaria que en el momento de darle a envia mail, se generara el pdf automáticamente y se colocara como adjunto en el correo.

Creo que ya tienes lo más difícil.
Si ya consigues imprimir a PDF, enviar como adjunto no debería ser difícil.

No he usado los componentes que comentas, pero poseen la siguiente propiedad que te será útil:

Código Delphi [-]
property Attachment: TStrings read GetAttachment write SetAttachment;

Tal vez no he entendido bien lo que necesitas.

[[newtron]]

Hola.

Como dice el amigo Neftali ya tienes hecho lo más complicado. Lo único que tendrías que hacer sería generar un pdf con un nombre determinado, adjuntarlo al correo y enviarlo de forma automática.

No sé cual es tu duda.

Saludos

[jafera]

Pues la duda es esta:

Como genero el pdf directamente sin actuación del usuario, es decir que en cuanto tenga el preview del report, no tenga que decirle que lo imprima a pdf y lo guarde sino que esto sea un proceso automático.

Gracias por vuestras respuestas

Josep

[orodriguezca]

Creo que este enlace te puede ayudar:


http://www.clubdelphi.com/foros/showthread.php?t=78813

[jafera]

Gracias, interesante esta impresora virtual.

La he instalado y funciona muy bien, aunque sigo peleandome en como genero y guardo automaticamente el reporte previsualizado.

Saludos

[MartinS]

Empezado por jafera

..., aunque sigo peleandome en como genero y guardo automaticamente el reporte previsualizado.

Saludos

Código Delphi [-]
       Unit QRPDFFilt;
        ...
      
        Procedure TPGenInfoInstit.EmitirInforme
        Begin  
          TuQReport.ExportToFilter(TQRPDFDocumentFilter.Create('C:\TuCarpeta\ElArchivo.PDF') ); 
        end;

Saludos