Imprimir imagen

[MAXIUM]

Hola, como puedo imprimir una imagen usando la API de Windows.
He probado con el siguiente código pero no sale con las dimensiones del dibujo, es decir muy en miniatura

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
Var Bitmap: TBitMap;
begin
     Bitmap:= TBitmap.Create;
     Bitmap.LoadFromFile('logo.bmp');
     
     Printer.BeginDoc;
     Printer.Canvas.Draw(100, 100, Bitmap);
     Printer.EndDoc;
     
     Bitmap.Free;
end;