tsdima, тут проблема возникла (об ней и в инэте пишут) -- API-функция BitBlt (StretchBlt) не поддерживает контекст принтера, а вот SetPixel, работает, но метод очень медленный.
------------ Дoбавленo:

Только что проверил, действительно функция GetDeviceCaps(Printer.Handle, RC_BITBLT) возвращает 0
И чего теперь