home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 November / CPNL0711.ISO / beeld / screen / hcf.exe / Basic / Basic_Font_005_Variables.bas < prev    next >
BASIC Source File  |  2003-11-26  |  762b  |  18 lines
  1. Image(0).Resample( 400,400 )
  2. Image(0).Color = _ColorWhite  
  3.  
  4. Image(0).DrawText(10, 20,  0,0,  "Text " )
  5. Image(0).DrawText(10, 40,  0,0,  "Text " + "and" + " Text " )
  6.  
  7. Image(0).DrawText(10, 80,  0,0,  "Text + Integer: "  + 123 )
  8. Image(0).DrawText(10,100,  0,0,  "Text + Float: "    + 123.45 )
  9. Image(0).DrawText(10,120,  0,0,  "Text + Variable: " + pi )
  10. Image(0).DrawText(10,140,  0,0,  "Text + ReturnValue: " + InStr( "Hardcopy", "d" )  )    
  11.  
  12. Image(0).DrawText(10,180,  0,0,  "Hardcopy-Time:  :Time: " )
  13. Image(0).DrawText(10,200,  0,0,  "Hardcopy-Number: :#: " )
  14. Image(0).DrawText(10,220,  0,0,  "Hardcopy-Number: :#: " )    
  15. Image(0).DrawText(10,240,  0,0,  "Hardcopy-Title: :T: " )
  16. Image(0).DrawText(10,260,300,300,"Hardcopy-Text: \n:Z:" )
  17. Redraw()
  18.