Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.12.13;
Скачать: CL | DM;

Вниз

TChart : BackImage не выводится на принтер.   Найти похожие ветки 

 
Михаил   (2008-11-30 15:56) [0]

С помощью
Chart1.BackImage.Assign(Image1.Picture);
Chart1.SaveToBitmapFile(SavePictureDialog1.FileName);
Chart1.CopyToClipboardBitmap;
Chart1.Print;

изображение Image1.Picture появляется на Chart1.BackWall , сохраняется в bmp-файл, копируется вместе с графиком в буфер обмена, но почему-то не выводится на принтер.
Мастера, подскажите, пожалуйста, в чём ошибка ?


 
KilkennyCat ©   (2008-12-01 02:02) [1]

потому что нужно просто посмотреть, в чем разница между Image1.Picture и Printer.Canvas


 
Григорьев Антон ©   (2008-12-01 09:03) [2]

Попробуйте сначала поставить Image1.Picture.Bitmap.PixelFormat:=pf24Bit. Не знаю, как с печатью TChart, но с обычной печатью это помогает.


 
Михаил   (2008-12-01 09:30) [3]


> Попробуйте сначала поставить Image1.Picture.Bitmap.PixelFormat:
> =pf24Bit. Не знаю, как с печатью TChart, но с обычной печатью
> это помогает.

Увы, не помогло.
Собственно, дело не в Image. Я пробовал рисовать прямоугольник прямо на canvas"е :
Chart1.BackImage.Bitmap.Canvas.MoveTo(x0,y0);
Chart1.BackImage.Bitmap.Canvas.LineTo(x1,y0);
Chart1.BackImage.Bitmap.Canvas.LineTo(x1,y1);
Chart1.BackImage.Bitmap.Canvas.LineTo(x0,y1);
Chart1.BackImage.Bitmap.Canvas.LineTo(x0,y0);

Всё равно на принтер фон не выводится. Причём, в файловые принтеры выводится по-разному - Adobe PDF Printer фон не печатает, а MS Office Document Image Writer выводит всё, что надо. Я полагал, что надо порыться в свойствах TChart (у меня pro 8), но ничего похожего не нашёл.


 
KilkennyCat ©   (2008-12-01 11:12) [4]

http://delphimaster.net/view/1-1225292591/


 
Михаил   (2008-12-01 12:13) [5]

Пока вышел из тупика. Вместо
Chart1.Walls.Back.Picture.Assign(Image1.Picture);
написал
Chart1.Walls.Visible:=True;
Image1.Picture.SaveToFile(PrintFileName);
Chart1.Walls.Back.Picture.LoadFromFile(PrintFileName);
Chart1.Print;
Chart1.Walls.Visible:=False;
DeleteFile(PrintFileName);

За ссылку спасибо, попробую.


 
Дмитрий Белькевич ©   (2008-12-06 12:01) [6]


> Image1.Picture.SaveToFile(PrintFileName);Chart1.Walls.Back.
> Picture.LoadFromFile(PrintFileName);


Если уж делать извращение, то через поток. Файлы - лишнее.



Страницы: 1 вся ветка

Текущий архив: 2009.12.13;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.019 c
2-1256117947
xyz
2009-10-21 13:39
2009.12.13
перебор выделенных строк в DBGridEh


2-1256122585
FEV
2009-10-21 14:56
2009.12.13
Число в строке...


15-1255348813
Virgo_Style
2009-10-12 16:00
2009.12.13
ZoneAlarm Pro завтра (13-го) будут бесплатно раздавать


1-1228487894
madmech
2008-12-05 17:38
2009.12.13
Помогите ускорить алгоритм


15-1255593046
картман
2009-10-15 11:50
2009.12.13
Букварь по теорверу