Печать Chart

← →
Анатолий (2002-02-17 23:25) [0]

Мастера помогите. Как вывести на печать график (компонент Chart)? Если задать код
Printer.Canvas.Draw(50,50, Chart1);
То получаю ответ Incompatible types: ‘TGraphic’ and ‘TChart’. Как указать, что именно TСhart вывести на печать?

← →
MrBeer © (2002-02-18 08:58) [1]

TChart.Print

← →
Mike_Cn (2002-02-19 20:53) [2]

//Секреты Delphi на примерах (С. Орлик)
Procedure PrintChart(Chart : TChartFX);
Var R : TRect;
Begin
R := ScaleToPrinter(BoundRect);
If Chart.BorderStyle > 0 Then
Printer.Canvas.rectangle(R.Left,R.Top,R.Right,R.Bottom);
chartFX.Chart_paint(Chart.Handle, PDC,
R.Left,R.Top,R.Right,R.Bottom, 1, 0);
End;

Печать Chart Найти похожие ветки