Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 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;




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




Наверх





Память: 0.71 MB
Время: 0.024 c
3-19057           Quaker                2002-02-07 13:58  2002.03.07  
MIDAS


1-19232           Анатолий              2002-02-17 23:25  2002.03.07  
Печать Chart


3-19059           Evgeny_Parakhnevich   2002-02-07 10:51  2002.03.07  
Доступ к базе данных из процесса Windows 2000


7-19355           bios_i_ego            2001-12-01 13:06  2002.03.07  
В Паскале было Port


14-19304          ZEE                   2002-01-21 02:49  2002.03.07  
Resource WorkShop