TPrintChartEvent

Contents All Classes Index A-Z All Units

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 bigger, 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;