Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c