home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l408 / 2.img / EXAMPLES.EXE / EXAMPLES / CARET / CARET.FRM (.txt) next >
Encoding:
Visual Basic Form  |  1992-10-12  |  5.2 KB  |  147 lines
  1. Caret
  2. Demonstrate Changing Caret
  3. System
  4. ww{www
  5. ww{www
  6. Form1
  7. Label1
  8. This App demonstrates how to manipulate the caret size. In DOS, we call it the cursor, but in Windows, the cursor refers to the mouse.
  9. System
  10. Text1
  11. This is some text to edit
  12. System
  13. TallerButton
  14. Taller
  15. System
  16. ShorterButton
  17. Shorter
  18. System
  19. WiderButton
  20. Wider
  21. System
  22. NarrowerButton
  23. Narrower
  24. System
  25. FasterButton
  26. Faster
  27. System
  28. SlowerButton
  29. Slower
  30. System
  31.     EndButton
  32. System
  33. Text1
  34. Command16
  35. Command2
  36. Command3
  37. Command4
  38. Command5
  39. Label1F
  40. Form_Click
  41. @    Form_Load$
  42. TextMetric
  43. GetTextMetrics
  44. CaretHeightu
  45. TmAveCharWidth*
  46. TmAveCharHeight7
  47. TmHeight
  48. Text1_Change
  49. Text1_GotFocus
  50. Caret
  51. CreateCaret
  52. CaretWidth
  53.     ShowCaret
  54. Text1_LostFocus
  55.     HideCaret
  56. DestroyCaret
  57. Form_LostFocus[
  58. Command5_Click
  59.     EndButton
  60. TallerButtonc
  61. ShorterButtonL
  62. WiderButton
  63. NarrowerButton
  64. TallerButton_Click
  65. ShorterButton_Click
  66. WiderButton_Click
  67. NarrowerButton_Click
  68. Height
  69. Text1_KeyDown
  70. KeyCode]
  71. Shift
  72. Form_GotFocus
  73. Text1_DragOver
  74. State
  75. Text1_DragDrop
  76. EndButton_LostFocus
  77. EndButton_Click
  78. TallerButton_GotFocusF
  79. currentx
  80. currenty
  81. SelStart(
  82. GetCaretPos*
  83. CaretPoint
  84. SetCaretPos
  85. CaretX
  86. CaretY
  87. TallerButton_LostFocus
  88. SelLen
  89.     SelLength
  90. Caret1
  91.     ScaleMode
  92. FasterButton
  93. SlowerButton
  94. FasterButton_Click
  95.     BlinkTime
  96. GetCaretBlinkTime
  97. SetCaretBlinkTime
  98. SlowerButton_Click
  99. CtrlhWnd
  100. GetFocus
  101. SavePos
  102. SaveLength
  103.     SaveStart
  104. Picture1
  105. Picture
  106. Image
  107. FasterButton_GotFocus
  108.     SaveSpeed
  109. Form_Unload
  110. Cancel
  111.  These values are used to maintain the position and length
  112.  of select text in TEXT1 while we are changing the caret
  113.  sizee
  114.  For restoring
  115.  These values are used to preserve the caret sizee
  116.  throughout the program.
  117. Form_Load
  118.  Create a structure using TYPE
  119.  Call the windows servicei
  120.  Set up default caret size
  121. Text1_GotFocus
  122.  Get the handle to the control
  123.  Create the caretv
  124.  Show the caretS
  125.  Restore text selection"
  126. Text1_LostFocus
  127.  Save our values
  128.  Get rid of the caretn
  129. TallerButton_Click
  130. Make it taller
  131. ShorterButton_Click
  132.  Make it shorter, as long as it's taller than 1 
  133. WiderButton_Click
  134.  Make it wider
  135. NarrowerButton_Click
  136.  Make it narrower, as long as it's wider than 1 
  137. EndButton_Click
  138. FasterButton_Click
  139.  Get the current blink time1
  140.  Adjust it
  141. 1/20th of a second
  142. SlowerButton_Click
  143.  Make it slowerl
  144. 1/20th of a second
  145. Form_Unload
  146.  Restore originalp
  147.