Page 1 of 1
FastReport - Preview PDFEXPORT
Posted: Mon Nov 20, 2017 11:39 am
by MGA
Friends, exporting PDF by preview does not work well for me. I would really like to switch the action of the EXPORT PDF option to my function. Can someone help me?
In this topic Mr. Marco Turco helped to do something like email:
viewtopic.php?f=3&t=16511&p=85501&hilit=fastreport+email#p85501
Re: FastReport - Preview PDFEXPORT
Posted: Mon Nov 20, 2017 2:39 pm
by joseluisysturiz
Saludos, con esto me trabaja bien..casualmente estoy en ese trabajo en este momento..saludos...gracias...
Code: Select all | Expand
IF lEditor
oFr:DesignReport() // LLAMO AL DISEÑADOR
ELSE // SIN DISEÑADOR
// DIRECTO A PDF - ALBEIRO
oFr:SetProperty("PDFExport", "DefaultPath", cPathPdf) // DIRECTORIO DONDE GUARDAR ARCHIVO
oFr:SetProperty("PDFExport", "FileName", cFilePdf) // NOMBRE DEL ARCHIVO
oFr:SetProperty("PDFExport", "ShowDialog", .f.) // MOSTRAR DIALOGO PARA IMPRIMIR
oFr:SetProperty("PDFExport", "OpenAfterExport", .t.) // ABRIR DESPUES DE CREAR...
oFr:SetProperty("PDFExport", "EmbeddedFonts", .t.) // FUENTES ENCRUSTRADAS
oFr:SetProperty("PDFExport", "PrintOptimized", .t.)
oFr:SetProperty("PDFExport", "Outline", .t.)
oFr:SetProperty("PDFExport", "Compressed", .f.) // COMPRIMIR TEXTO - JLY
***
oFr:PrepareReport() // PREPARAR EL REPORTE
oFr:DoExport("PDFExport") // EJECUTA LA EXPORTACION
ENDIF
ENDIF
oFr:DestroyFR() // DESTRUYO EL DISEÑADOR
Re: FastReport - Preview PDFEXPORT
Posted: Tue Nov 21, 2017 7:18 pm
by MGA
José Gracias