home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / DEMOS / OLE_DEMO / OLE2.FRM (.txt) < prev   
Encoding:
Visual Basic Form  |  1993-07-30  |  6.3 KB  |  190 lines
  1. frm_main
  2. OLE Destination Example
  3. Form15
  4. ole_Destination
  5. OLE Demo)
  6. mnuFile
  7. &File
  8. mnuExit
  9. E&xit
  10. mnuedit
  11. &Edit
  12. mnuName
  13. mnuVerbs
  14. Verbs
  15. mpaste
  16. &Paste
  17. mplink
  18. Paste &Link
  19. mnuPasteSpecial
  20. Paste &Special
  21.     mnuInsert
  22. &Insert Object
  23. &Delete Object
  24. mnuSep2
  25.     mnuUpdate
  26. &Update
  27. mpaste_Click
  28. OLEClient1,
  29. Protocol>
  30. ServerType
  31. PasteOK5
  32. Action
  33. mplink_Click
  34. OleClient1_Click|
  35. OleClient1_DblClick
  36. mdel_Click
  37. minsObj_Click
  38. membed_Click
  39. mlinked_Click
  40. oleregr
  41. modal
  42. oleproto
  43. Class
  44. oleclassc
  45.     Form_Load
  46. Form_Unload
  47. Cancel
  48. LpOleObject
  49.     cmDialog1
  50. Filename
  51. CancelError
  52.     SourceDoc
  53. FileNum
  54. FileNumber
  55. oleErr
  56. oletsts
  57. oleErr2
  58. break
  59. SourceItem
  60. medit_Click@
  61. Mcontents_Click,
  62. oleHelp_
  63. aPath
  64. OleClient1_Updated~
  65. OleQueryBounds
  66.     oleobject
  67. OleRect
  68. Left6
  69. WidthL
  70. rightB
  71. Height
  72. bottom
  73. Form_Resize
  74.     olecient1"
  75. windowstate
  76. mnuInsert_Click
  77. RetVal
  78. OleClient1_MouseUpZ
  79. Button+
  80. Shift
  81.     ScaleMode
  82. OLEType
  83. continueL
  84. applicationU
  85. server
  86.     structure
  87. millimeters
  88. options/
  89. OLEDirty
  90. intgerU
  91. mnuedit_Click
  92. mnuEditH
  93. mnuPaste
  94. Enabled
  95. mpLink
  96.     mnuUpdateh
  97. mnuUpdate_Click
  98. mnuPasteSpecial_Click
  99. mnuPasteSpecial
  100. mPaste
  101.     insertErr
  102. mnuExit_Click:
  103. mnuName_Click
  104. mnuName
  105. Caption
  106. MDIfrmx
  107. ActiveForm
  108.     mnuObject
  109. VerbMax
  110. mnuVerbs
  111. Visible
  112. mnuVerbs_Click
  113. Index
  114. ObjectVerbsCount
  115. ObjectVerbs
  116. objectverb
  117.     mnuInsert
  118. ole_Destination
  119. ole_Destination_Updated 
  120. Form_Load
  121.  Declare variable.
  122.    Get startup Path of OLE2 Application
  123.    Setup file for OLEf
  124.    If present read and restore OLE control
  125.  Get a valid file number.e
  126. oleTst.OLE
  127.  Open file to be saved. 
  128.  Set the OLEClient filenumber.
  129.  read the file.t
  130.  Close the file.
  131.    OLETST.OLE file not found OK OLE Object set to NULL
  132.  Close the file. 
  133. No Object
  134. Form_Unload
  135.  Declare variable.
  136.    If object is in OLE control save it to file! 
  137.  Get a valid file number.i
  138. oleTst.OLE
  139.  Open file to be saved. 
  140.  Set the OLEClient filenumber.
  141.  Save the file.a
  142.  Close the file.
  143. oletst.ole
  144. Erase old OLE File
  145.    Stop execution of Application
  146. mdel_Click
  147.    Delete the OLE object in the OLE Controlt
  148. Delete Object 
  149.    Restore original size
  150. No Object
  151. mnuedit_Click
  152.    Check clipboard and greyout Edit commands
  153.    as needed
  154.    OLE Object Class name
  155.    and cascade menu of verbs
  156.    Set Form properties now that it contains an object.
  157. Object already loaded.
  158. mnuExit_Click
  159. mnuInsert_Click
  160.    Use Insert Object Dialog Box to build new OLE
  161.    Object.  User chooses OLE Application to
  162.    create this new object from OLE Registration
  163.    database (REG.DAT)j
  164. Insert Object Dialog Box
  165. OLE Activate
  166. OLE ERROR - Inserting Object
  167. mnuPasteSpecial_Click
  168.    Show Paste Special Dialog Box
  169.    Allows user to choose Embed or Link type
  170. Paste SpecialP
  171. mnuUpdate_Click
  172.    Update Object by calling OLE Applicationt
  173. Update Objectd
  174. mnuVerbs_Click
  175.    Execute a verb to OLE Application
  176. &EDIT
  177. In-Place-Edit-
  178. Activate
  179. mpaste_Click
  180.    Paste from Clipboard (Embedded Type))
  181.  Embedded 
  182. Pasteo
  183. mplink_Click
  184. '   Paste from clipboard (Link Type)
  185.  Linked0
  186. Pasteo
  187. ole_Destination_Updated
  188.    Gets control when object was changed by i
  189.  OLE Application
  190.