печать

← →
alshtam © (2007-09-05 09:16) [0]

здравствуйте, подскажите по вопросу печати
я печатаю картинки размером порядка килобайта на термопринтере
у меня есть код:
Printer.BeginDoc; // **
try
ScaleX := GetDeviceCaps(Printer.Handle, logPixelsX) div Screen.PixelsPerInch;
ScaleY := GetDeviceCaps(Printer.Handle, logPixelsY) div Screen.PixelsPerInch;
R := Rect(0, 0, HeadBanner.Width* ScaleX,HeadBanner.Height * ScaleY);
Printer.Canvas.StretchDraw(R,HeadBanner); // **
finally
Printer.EndDoc; // **
в принципе работает(печать идет) но ожидать пичати приходится слишком долго по 30 сек примерно, возможно ли ускорить процес ожидания печати

← →
Вася Правильный (2007-09-05 10:45) [1]

не растягивай на всю бумагу свой рисунок - буде быстрее
а вообще - это особенности термипринтера, он долго елозит

← →
alshtam © (2007-09-05 10:48) [2]

текст воще быстро вылетает

← →
Anatoly Podgoretsky © (2007-09-05 11:17) [3]

А ты примени к тексту StretchDraw

← →
alshtam © (2007-09-05 11:21) [4]

> Anatoly Podgoretsky © (05.09.07 11:17) [3]
> А ты примени к тексту StretchDraw

зачем к тексту, текст через Printer.Canvas.textOut очень быстро печатает, с картинкой проблема

← →
Anatoly Podgoretsky © (2007-09-05 11:23) [5]

> alshtam (05.09.2007 11:21:04) [4]

Ты не читаешь, что тебе пишут по поводу StretchDraw и приводишь как аргумент textOut

← →
alshtam © (2007-09-05 11:33) [6]

я просто не понял, вы намекаете что StretchDraw медленная?

← →
Инс © (2007-09-05 11:37) [7]

Понимаешь в чем дело, картинка - она сплошная, а текст - он с многочисленными промежутками, где печатать не надо. Сделай картинку с промежутками - она тоже быстро печататься будет.

> Инс (05.09.2007 11:37:07) [7]

Не забывай также про встроеный шрифты. Про отсутствия необходимости делать Strech, хрен знает на какой размер, а процедура эта очень накладная.

ясно значит Tbitmap печатать быстро не возможно, жаль

Большое спасибо за помощ!

печать Найти похожие ветки