![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Печать Chart [D6, Win95/98]
Анатолий © (2002-02-17 23:25:00)Мастера помогите. Как вывести на печать график (компонент Chart)? Если задать код
Printer.Canvas.Draw(50,50, Chart1);
То получаю ответ Incompatible types: ‘TGraphic’ and ‘TChart’. Как указать, что именно TСhart вывести на печать?
Mike_Cn (2002-02-19 20:53:00) [1]//Секреты 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;
MrBeer (2002-02-18 08:58:00) [2]TChart.Print