Ver Mensaje Individual
  #4  
Antiguo 10-03-2007
Avatar de ContraVeneno
ContraVeneno ContraVeneno is offline
Miembro
 
Registrado: may 2005
Ubicación: Torreón, México
Posts: 4.738
Reputación: 24
ContraVeneno Va por buen camino
En la versión profesional de QuickReport
tienes que pasar un TChart a un QRImage:
Código Delphi [-]
procedure TfrmTrades.qrbChartDetailBeforePrint(Sender:TQRCustomBand;var
PrintBand: Boolean);
var
    Meta: TMetaFile;
begin
  Meta := QRChart3.TeeCreateMetafile(True,
QRChart3.Chart.GetRectangle);
  try
    QRImage1.Picture.Metafile.Assign(Meta);
  finally
    Meta.Free;
  end;
end;

La versión normal de Quickreport creo que tiene un componente QRChart el cuál se maneja igual que un DBChart.

Y si, puedes tener tantos QRImage como te quepan en tu reporte.
Igual puedes utilizar .CopyToClipboardMetafile y pegarlo en excel o donde quieras
__________________


Última edición por ContraVeneno fecha: 10-03-2007 a las 02:58:15.
Responder Con Cita