Текущий архив: 2003.12.23;
Скачать: CL | DM;
Вниз
Печать файла. Найти похожие ветки
← →
Mishenka (2003-12-04 22:38) [0]Печатается содержимое Image.
На моём принтере всё нормально, а на другом компе печатается какая-то фигня в текстовом режиме, а если там печатать ту же картинку из Word"a, то всё нормально.
В чём может быть проблема.
Вот текст печати:
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-12-06 17:16) [1]Ну может хоть кто-нибудь знает?
← →
Wilsh © (2003-12-06 17:39) [2]Попробуй сделать так:
Printer.BeginDoc;
StretchBlt(Printer.Canvas.Handle,
hOtstup,vOtstup,PrinterWidth,PrinterHeight,
Image1.Picture.Bitmap.Canvas.Handle,
0,0,Image1.Picture.Bitmap.Width,Image1.Picture.Bitmap.Height,
SRCCOPY);
Printer.EndDoc;
где hOtstup - отступ слева, а vOtstup - сверху.
Может поможет - у меня так работает с различными принтерами (и матричными в том числе :)).
← →
Mishenka (2003-12-11 16:00) [3]А нифига. Всё равно картинка печатается в текстовом режиме :(((
← →
Amoeba © (2003-12-11 16:20) [4]А этот принтер хотя бы поддерживает печать в графическом режиме? И вообще, какой принтер используется?
← →
Mishenka (2003-12-11 17:16) [5]Принтер HP/ Точно щас не вспомню. Но из ворда там всё печатается OK, так что поддерживает.
Страницы: 1 вся ветка
Текущий архив: 2003.12.23;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.016 c
