home *** CD-ROM | disk | FTP | other *** search
/ Computer Buyer 1996 March / buyer-0396.iso / abc.z / EVENTS.FRM (.txt) < prev    next >
Visual Basic Form  |  1995-09-15  |  4KB  |  72 lines
  1. Form1
  2. !Double-Click & Delete Events DEMO
  3. Form15
  4.     ABCEvents
  5. Picture1
  6. Label3
  7. /(c) Micrografx Inc., 1995. All Rights Reserved.
  8. Label6
  9. When this VB program is running, ABC's double-click and delete functionality is altered. When you double click on a shape, it turns red and the text inside changes. When you delete Objects, they don't disappear - they just turn gray.
  10. Label2
  11. Y<---- Double-click on this custom VBX in VB 3.0 edit mode to see the event handling code.
  12. ABC1_DoubleClick
  13. ABC1_ObjectMove9
  14. ABCFlowVBX1
  15.     ABCObject
  16. Valid
  17. Shape
  18.     FillColor5
  19. ABCApplication
  20. GREENA
  21. Object
  22. ABCChart
  23. ABCObjectsf
  24. ItemFromSelection
  25. YELLOW
  26. NormalAction
  27. Objects
  28. Chart
  29. ABCObjB
  30. BorderWidthn
  31. FitShapeToText
  32. linking
  33. behavior~
  34. Override
  35. Picture2_Click
  36. Toolkit
  37. below
  38. ABC1_Delete
  39. FillpatternW
  40. ABC1_DoubleClickSUBCLASS
  41.     Form_Load
  42. ABCApp
  43. Visible
  44. ABC1_DeleteSUBCLASS
  45. SelectedObjs
  46. Whilw
  47. ItemFromSelectionABCObj
  48. RegisterEvent
  49. ABC2_DoubleClickSUBCLASS
  50. Form1
  51. Caption
  52. ABC1_AppQuitNOTIFY
  53. Picture1_Click
  54. Color
  55. ABC1_AppQuitNOTIFY
  56. ABC1_DeleteSUBCLASS
  57.  If you do not want the override the
  58.  regular ABC ProcessAnalyser delete behavior,r
  59.  set the line below to False
  60. ABC1_DoubleClickSUBCLASS
  61. You double-clicked on me!
  62.  If you do not want the override the
  63.  regular ABC ProcessAnalyser linking behavior,
  64.  set the line below to False
  65. Form_Load
  66. ABCFlow.application
  67. DoubleClickSUBCLASS
  68. DeleteSUBCLASS
  69.  Get the ABC Quit event so the Menu
  70.  sample can unload when ABC Quitsn
  71. AppQuitNOTIFY
  72.