Delphi - Imprimir Imágen con TPrinter

Hola a todos/as:

Tengo la siguiente duda he intentado imprimir una imagen con el objeto TPrinter sin conseguirlo aún, lo curioso es que antes ya lo había hecho, pero olvide como, no quiero hacerlo con Report porque me interesa diseñar la Impresión a mi modo.

Si alguno puede ayudarme lo agradeceré . saludos

Javier

Aqui...esta..

procedure TForm1.Button1Click(Sender: TObject);
Var
BitMap:TBitMap;
begin
BitMap:=TBitMap.Create;
BitMap.LoadFromFile('C:\Windows\Tejas.bmp');
Printer.BeginDoc;
Printer.Canvas.Draw(50,50,BitMap);
Printer.EndDoc;
BitMap.Free;
end;

Suerte...