Дык я ничего особенного не делал. Поменял Img_Bmp абсолютно аналогично, как и в предыдущем эксперименте (добавил процедуру Context, скопировав Handle, убрал запрос dc у окна и присвоил напрямую из потока). Закомментировал свой же SetMapMode в hiPrinter.pas. Схема тоже аналогичная, с использованием компонента Resize.


Дык и у меня также.


Я полагал, что _prop_DrawSource будет делать только две функции:
1. выдать контекст
2. освободить его

_prop_DrawSource: procedure(var _Data:TData; var dc:HDC; nFunc:word) of object;

А мясо надо оставить в самом компоненте.

------------ Дoбавленo:

После того, как ты растянул картинку в памяти при помощи StretchBlt можно было выводить на принтер при помощи BitBlt.
Твоя ошибка, наверное, была в том, что ты использовал SetMapMode(pdc, MM_HIMETRIC), а то, что координата Y растёт в другом направлении - не учёл. Фактически, в этом случае, либо координату Y надо задавать отрицательную, либо использовать SetViewportOrgEx(pdc, 0, -PageHeight, nil)