Problemas com impressão de imagem

Eu preciso que meu programa imprima imagens, e para isso tentei os sequintes comandos:

com Tprinter:

with Printer do
begin
BeginDoc;
Canvas.Draw((PageWidth - Imagem.Width) div 2,(PageHeight - Imagem.Height) div 2,Imagem);
EndDoc;
end;

E com rave:

rave.BaseReport.PrintBitmap(0,0,1,1,bmp);


Mas nos dois casos a imagem sai extremamente reduzida no papel, e mesmo que eu teste com uma imagem maior o tamanho da impressao é sempre o mesmo.

Eu estou precisando muito dessa ajuda.

Meus agradecimentos.
Dhiogo