home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l408 / 2.img / EXAMPLES.EXE / EXAMPLES / GETTEXTE / GETTEXTE.FRM (.txt) next >
Encoding:
Visual Basic Form  |  1992-03-11  |  2.1 KB  |  63 lines
  1. Form1
  2. !TextWidth/Height vs GetTextExtent
  3. Form1
  4. Label3
  5. To test these two functions, click on the Run button. To change the number of test cycles, simply enter a new value in the textbox.
  6. Label1
  7. Number of Test Cycles:
  8. Cycles
  9. Label2
  10. Time -- TextWidth/Height:
  11. TWTime
  12. Label4
  13. Time -- GetTextExtent:
  14. GTETime
  15.     RunButton
  16.     EndButton
  17. Form_Click
  18. @    Form_Load
  19. Result
  20. MhFileDateCompare
  21. Form1'
  22. asmlib
  23. vbtoolsi
  24. GetCurrentTime
  25. Label1
  26. Picture1
  27. Text1H
  28. Cycles
  29. Label2
  30. Text2A
  31. Label3
  32. TWTime
  33. GTETime
  34. Command1O
  35.     RunButton
  36.     EndButton
  37. Form_LinkClose
  38. GetTextExtent
  39. Caption
  40. EndButton_Click
  41. RunButton_Click
  42.     StartTime
  43. EndTime
  44. First
  45. CycleCount
  46. Length
  47. AString
  48. Label4
  49. GETTime
  50. Screen
  51. MousePointer
  52. Form_Load
  53.  Make a call to GetTextExtent to ensure that the DLL is loaded.a
  54.  Otherwise the timing test would not be fair. 
  55. EndButton_Click
  56. RunButton_Click
  57.  First test TextWidth and TextHeight
  58. ####0.##
  59.  Then test GetTextExtent
  60.  Text Height
  61.  Text WidthH
  62. ####0.##
  63.