Se me olvidaba decirte que el procedimiento
Prepare_Documento, lo que hace es generar los gráficos, en mis caso tomo un documento con sus líneas y mediante
FastReport, genero el gráfico del documento.... y está separado del anterior, porque también lo utilizo para el envío de mails.
Código Delphi
[-]
if IsFax then
frReportPed_Presupuesto.ExportTo(DataModulePedProv.frBMPExport1, Result + 'Presupuesto')
Else
frReportPed_Presupuesto.ExportTo(DataModulePedProv.frJPEGExport1, Result + 'Presupuesto')
Saludos.