Текущий архив: 2002.03.07;
Скачать: CL | DM;
Вниз
Печать 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;
Страницы: 1 вся ветка
Текущий архив: 2002.03.07;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.009 c
