procedure PutImage(X, Y: Integer; var BitMap; BitBlt: Word);
Diese Prozedur ist vollständig zu Graph.PutImage kompatibel, führt
aber korrektes Clipping an den Rändern von Gr.ClipRect aus.
Sie sollten statt dieser Prozedur eher PasteImage verwenden,
da jene große Images unterstützt.