home *** CD-ROM | disk | FTP | other *** search
/ PC Professionell 2005 July / PCpro_2005_07.ISO / files / freeware / hardcopy / hcf.exe / basic / Basic_Image_006_DrawImageWarp.bas < prev    next >
Encoding:
BASIC Source File  |  2004-03-29  |  218 b   |  13 lines
  1. Image( 0 ).Open( "c:\\temp\\warp_u1.jpg" )
  2.  
  3. v = CreateImage( 1,1 )    
  4. Image( v ).Open( "c:\\temp\\warp_v1.jpg" )
  5.  
  6.  
  7. Image(0).DrawImageWarp( 105,82, 240,81 , 179,171, 147,201, v )
  8.  
  9. Image(v).Delete()
  10.  
  11. Redraw()
  12.  
  13.