home *** CD-ROM | disk | FTP | other *** search
/ PC Professionell 2005 July / PCpro_2005_07.ISO / files / freeware / hardcopy / hcf.exe / basic / Basic_Image_007_DrawText.bas < prev    next >
Encoding:
BASIC Source File  |  2003-11-26  |  275 b   |  12 lines
  1. Image( 0 ).Resample( 200,200 )
  2. Image( 0 ).Color = _ColorWhite
  3.  
  4. s = "Draw Text Draw Text Draw Text Draw Text Draw Text Draw Text"
  5.  
  6. Image( 0 ).DrawText(  10, 10, 0,0, s )    
  7.  
  8. Image( 0 ).Rectangle( 10, 50, 100,55 )    
  9. Image( 0 ).DrawText(  10, 50, 100,55, s )    
  10.  
  11. Redraw()
  12.