Форум: "Основная";
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];

Вниз

Печать 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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.004 c