Imprimir una imagen con Canvas

[emtas]

Hola compañeros...

¿Cómo puedo imprimir una imagen (bmp, jpg...) usando el canvas de la impresora (printer.canvas)?

Muchas gracias de antemano.

[jachguate]

Para pintar un bmp directamente en el canvas de la impresora podes valerte del método Draw.


Var
bmp : TBitmap;

Begin
...
bmp := TBitmap.Create;
bmp.LoadFromFile('c:\imagen.bmp');
try
printer.canvas.draw(0, 0, bmp);
finally
bmp.free;
end;
end;


No he comprobado el código, asi que es probable que algo se me escape o que se colara algún error de sintaxis.

hasta luego.

;)

[emtas]

Voy a probarlo.


Muchas gracias. :)