[novato_erick]

Hola Chicos Bendiciones a Todos:

necesito pre visualizar en FastReport un Gráfico mostrado desde Delphi TChart en buscado ayuda en fastreport y muestra esto:

Código Delphi [-]
procedure TForm1.frxReport1BeforePrint(Sender: TfrxReportComponent);
begin
if Sender.Name = 'Picture1' then
   TfrxPictureView(Sender).Picture.Assign(
     Chart1.TeeCreateMetafile(False, //Chart1 do esta declarado en mi dmReporte
       Rect(0, 0, Round(Sender.Width), Round(Sender.Height))));
end;

asi que se me ocurrio esto

Código Delphi [-]
//Cree un procedimiento simple
procedure TfrmReporteClienteFrecuente.GuardaGraficoComoImagen;
begin
  MetaGrafico := DBChartAfiliadosxdia.TeeCreateMetafile // MetaGrafico: TMetaFile; es la variable declarada privadamente en mi formulario de gráficos
  (True, DBChartAfiliadosxdia.ClientRect);
end;


if DBChartAfiliadosxdia.Visible = True then
   begin
       GuardaGraficoComoImagen;
//aqui no se como enviar esto a Fastreport
        dmFidelizaCliente.frxReportAfiliadoxDia.ShowReport(True);
       end;

Alguien tiene alguna idea? se les agradece

Saludos

novato_erick