Неправильно печатается файл :(((

← →
Mishenka (2003-11-15 22:48) [0]

Прога печатает картинку содержащуюся в Image:

with Printer do
begin
BeginDoc;
K:=Image1.Picture.Width/Image1.Picture.Height;
K1:=PageWidth/Image1.Picture.Width;
K2:=PageHeight/Image1.Picture.Height;
if K1>K2 then RR:=Rect(0,0,Round(PageHeight*K),PageHeight)
else RR:=Rect(0,0,PageWidth,Round(PageWidth/K));
Canvas.StretchDraw(RR,Image1.Picture.Graphic);
EndDoc;
end;

На моём принтере всё нормально. А на другом печатается какая-то фигня в текстовом режиме, причём если печатать ту же картинку из ворда, то там тоже всё нормально. В чём может быть проблема???

← →
Mishenka (2003-11-16 15:45) [1]

VМожет сё-таки кто-нибудь знает?

Неправильно печатается файл :((( Найти похожие ветки