home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / Basic / Samples / CURSOR / CURSOR.ZIP / CURSOR.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1993-05-10  |  3.8 KB  |  97 lines
  1. Form1
  2. Cursor demo by Pierre Fillion
  3. Form1
  4. Picture2
  5. Picture1
  6. Command4
  7. Text1
  8. +Test your hotspot here by selecting text...
  9. Command2
  10. Restore Cursor
  11. Command1
  12. Set Cursor
  13.     Form_Load}
  14. GlobalLock
  15. GlobalUnLock
  16. CreateCursor
  17.     hInstance
  18.     nXhotspot5
  19.     nYhotspot
  20. Height
  21. lpANDbitPlanea
  22. lpXORbitPlaneg
  23. nWidth4
  24. nHeightD
  25. DeclanreP
  26. GetWindowWord
  27. nIndexK
  28. SetClassWord
  29. nNewWord
  30. GetClassWord
  31. GCW_HCURSOR
  32. Command1_ClickL
  33. Handlet
  34.     SetCursor=
  35. Form1
  36. Picture1
  37. fHandle    
  38. Command2_Click
  39. RestoreCursor
  40. fOldCurHnd
  41.     Form1hwnd
  42. FormHwndf
  43. Command3_Click/
  44. GetCursorHotSpot
  45. GetHotSpot
  46. label1
  47. caption
  48. Image1
  49. Command4_Click
  50. Command2
  51. Enabled
  52. Command1
  53. Command3
  54. Command4
  55. Text1
  56. lpbits\
  57.     CursorPic
  58. Control
  59. Form_LoadSub
  60. bitmap3
  61. bmType
  62. bmWidthN
  63. bmHeight)
  64. bmWidthBytesD
  65. bmPlanes|
  66. bmBitsPixel
  67. bmBits
  68. previously
  69. created
  70.     OldCursor
  71. correct
  72. color
  73. problem
  74. middle
  75. arrow-
  76. supposed
  77. white
  78. Montreal
  79. Quebec
  80. Picture"
  81. icon1
  82. P1_Clickt
  83. P2_Click
  84. Picture1_Click
  85. Text1_Change
  86.     P2i_Click
  87. Picture2
  88. CtrlHandle8
  89. Old cursor handle
  90. Command1_Click
  91. Retreive the handle of the control where the cursor will change
  92. Set the cursor and return the old cursor handle for restore cursor
  93. Only modify button state for democ
  94. Command2_Click
  95. Only modify button state for demo
  96. Command4_Click
  97.