home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 November / CPNL0711.ISO / beeld / screen / hcf.exe / Basic / Basic_Image_006_DrawImageFade.bas < prev    next >
BASIC Source File  |  2004-02-26  |  169b  |  10 lines
  1.  
  2. v = CreateImage( 1,1 )    
  3. Image( v ).Open( File.CommonWindowsDirectory + "\\winnt.bmp" )
  4.  
  5. Image(0).DrawImageFade( 300,200, 128, v )
  6.  
  7. Image(v).Delete()
  8.  
  9. Redraw()
  10.