TPrintChartEvent
type TPrintChartEvent = procedure(Sender:
TQRChart; Var PaperRect, ChartRect: TRect) of object;
Unit
QrTee
Description
Used by TQRChart.OnPrint event.
The "PaperRect" parameter has the coordinates of the Chart in QuickReport units.
The "ChartRect" parameter has the coordinates of the Chart in TeeChart units.
Both parameters can be changed using this new event.
For example, if the "ChartRect" parameter is doubled in size, the Chart will be twice as big, but printed in the same position and space:
procedure TForm1.QRChart1Print( Sender: TQRChart;
var PaperRect, ChartRect: TRect);
begin
With ChartRect do
Begin
Right := 2*Right - Left;
Bottom := 2*Bottom - Top;
End;
End;