Отсутствует цвет при печати на принтере

← →
SergeyG © (2005-12-27 10:24) [0]

Вывожу на принтер изображение, нарисованное(всякие линии, графики) на Image. Все цветные линии на принтере становятся серенькие. Наверное, нужно установить какой-то CopyMode, но какой и куда?
Печатаю так:
Printer.Orientation:=poLandscape; Dest:=Rect(0,0,Printer.PageWidth,Printer.PageHeight); Source:=Rect(0,0,Form1.Image1.Width,Form1.Image1.Height); with Printer do begin BeginDoc; Canvas.CopyRect(Dest,Form1.Image1.Canvas,Source); EndDoc; end;

Тоже получается, если печатаю форму:
Form1.PrintScale:=poPrintToFit; Form1.Print;

← →
Desdechado © (2005-12-27 11:03) [1]

может, принтер ч/б или цветной картридж закончился?

← →
SergeyG © (2005-12-27 11:07) [2]

Шутка, конечно, хорошая, Но решение, наверное, в потере каких-то атрибутов при переносе из одной канвы в другую.

Дополню: сохранение Image1.Picture.SaveToFile(...) происходит нормально с сохранением цветов.

Отсутствует цвет при печати на принтере Найти похожие ветки