Hola, si entendí bien lo que querías era imprimir un TImage:
Código Delphi
[-]
uses
Printers;
...
with Printer do begin
BeginDoc;
Canvas.Draw(XPos, YPos, Image1.Picture.Graphic);
EndDoc;
end;
...
Deberías probarlo a ver si funciona puesto que llevo un tiempito peleado con las impresoras
