CombineBitmapWarp example for Visual Basic

   Dim xPt(4) As Single
   Dim yPt(4) As Single
   Dim nRet As Integer
   
 ‘ Load master bitmap
   LEADMaster.Load "C:\master.jpg", 0, 1, 1
 ‘ Load slave bitmap
   LEADSlave.Load "C:\slave.jpg", 0, 1, 1
   
 ‘ Set the rectangle point
   xPt(0) = 50
   yPt(0) = 50
   xPt(1) = 150
   yPt(1) = 50
   xPt(2) = 150
   yPt(2) = 150
   xPt(3) = 50
   yPt(3) = 150

 ‘ Combine
   nRet = LEADMaster.CombineBitmapWarp(xPt, yPt, 4, LEADSlave.Bitmap, 0, 0, LEADSlave.BitmapWidth, LEADSlave.BitmapHeight, CBW_BILINEAR + CBW_RESERVED8)