Procedure PutImage (X1,Y1 : Integer; Var Bitmap; How : word) ;
PutImage Places the bitmap in Bitmap on the screen at (X1,Y1). How determines how the bitmap will be placed on the screen. Possible values are :
None
ImageSize,GetImage