home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l408 / 2.img / EXAMPLES.EXE / EXAMPLES / MHSPREAD / MHSPREAD.FRM (.txt) next >
Encoding:
Visual Basic Form  |  1992-10-29  |  19.4 KB  |  520 lines
  1. Spread
  2. MhSpread Test Form
  3. Form1,
  4. Mh3d1
  5. MhThreed%
  6. Label1
  7. Text1
  8. Label1
  9. Text2
  10. Label1
  11. Fixed Rows
  12. Text4
  13. Label1
  14. Fixed Cols
  15. Text5
  16. Label1
  17. Range
  18. RangeLabel
  19. Range
  20. HideRow
  21. HideCol
  22. GotoButton
  23. DataEditLabel
  24. MhThreed%
  25.  Data Editing:#
  26. Text3
  27. MhInput
  28. Text3
  29. .    MhSpread1
  30. MhSpread
  31. MhSpread ExampleV
  32. MenuFile
  33. &File
  34. MenuPicture
  35. &Picture in Cell
  36. MenuS
  37. MenuExit
  38. E&xit
  39. MenuMode
  40. &Grid
  41. MenuGrid
  42. &Both
  43. MenuGrid
  44. &Horizontal Only
  45. MenuGrid
  46. &Vertical Only
  47. MenuGrid
  48. &None
  49. MenuOptions
  50. &Sizing
  51. MenuSize
  52. &Fixed Rows/Columns Only
  53. MenuSize
  54. &Any Row/Column
  55. MenuSize
  56. &None
  57. MenuText
  58. &Data Entry
  59. MenuTextMode
  60. Via &Cells (Emulated)
  61. MenuTextMode
  62. Via &Separate Text Control
  63. MenuAlignment
  64. &Alignment
  65.     MenuAlign
  66. &Left
  67.     MenuAlign
  68. &Right
  69.     MenuAlign
  70. &Center
  71. MenuColors
  72. &Colors
  73. MenuDefaults
  74.     &Defaults
  75. MenuCSep
  76. MenuC
  77. &BorderColor
  78. MenuC
  79.     &CellBack
  80. MenuC
  81.     C&ellFore
  82. MenuC
  83. &Fill
  84. MenuC
  85. &Grid
  86. MenuC
  87. &Light
  88. MenuC
  89. &Shadow
  90. MenuO
  91. &Options
  92. MenuFill
  93. &Colors/Align Change Range
  94. MenuScroll
  95. &Scroll Grid on GOTO
  96. MenuDiv
  97. ClearBox
  98. Clear &Text
  99. ClearBox
  100. Clear &Pictures
  101. ClearBox
  102. All Cell&BackColor to FillColor
  103. ClearBox
  104. All Cell&ForeColor to Black
  105. ClearBox
  106. All Cell&Alignment to Left
  107. ClearBox
  108. &All of the Above
  109. MhSpread1_Click
  110. Check1_Click
  111.     MhSpread1
  112. GridMode
  113. Option1_Click
  114. IndexQ
  115. Command1_Click
  116. ColBackColorG
  117. Text1_Change3
  118. Text1L
  119. Text2_Change@
  120. Text3_Change}
  121. Text3n
  122. Text2
  123. CellBackColor
  124. Command2_Click
  125. Picture
  126. CellPicture
  127. Form_Click
  128. Form_LinkClose
  129. Form_LinkError
  130. LinkErr
  131. Form_LinkExecute
  132. CmdStr]
  133. Cancel
  134. Form_LinkOpen
  135.     Form_Loadu
  136. ComboAlignment,
  137. Label1_ClickX
  138. ComboAlignment_Changer
  139. Frame1_DragDropX
  140. SourceW
  141. MhSpread1_DblClick    
  142. MhSpread1_DragDrop;
  143. MhSpread1_DragOver
  144. State
  145. MhSpread1_GotFocus
  146. MhSpread1_KeyDown
  147. KeyCode
  148. Shift
  149. MhSpread1_KeyPress
  150. KeyAscii
  151. MhSpread1_KeyUp
  152. MhSpread1_LostFocus~
  153. MhSpread1_SelChange
  154.     ListIndexe
  155.     Alignment
  156. CellAlignmentA
  157. ColAlignment
  158. MhSpread
  159. ComboAlignment_Click{
  160. ComboAlignment_DblClick?
  161. ComboAlignment_DragDrop
  162. Option11_Click~
  163.     RowSizing
  164.     ColSizing
  165. Option12_Click/
  166. Option13_ClickU
  167. Text4_Changee
  168.     FixedRows
  169. Text4
  170. Text5_ChangeQ
  171.     FixedCols
  172. Text5/
  173. Command3_Click4
  174.     ColHidden
  175.     RowHidden
  176. Command3
  177. Caption'
  178. CellScaleTop
  179. CellScaleLeft
  180. CellScaleRight
  181. CellScaleWidthU
  182. CellScaleHeighto
  183. Text3_KeyDown
  184.     MhSpread3F
  185. Text3_GotFocusb
  186. SelColStartq
  187.     SelColEnd
  188. SelRowStartJ
  189.     SelRowEnd
  190. SelStartCol
  191.     SelEndCol
  192. SelStartRow
  193.     SelEndRow
  194. Enabled
  195. SelStartI
  196.     SelLength
  197. MhText3
  198. Text3_LostFocusw
  199. Visible
  200. MhSpread1_CellGotFocus
  201. Picture1
  202. Command4_ClickY    
  203. Form1
  204. cellheight
  205.     RowHeight
  206. Height
  207. focus
  208. CellGotFocusM
  209.     CellFocus
  210. Text3_KeyPressj
  211. yMhSpread1
  212. MenuExit_Click"
  213. MenuFixed_Click
  214. MenuNoSizing_Click$
  215. MenuAny_Click
  216. Option2_Click6
  217. MenuBoth_ClickG
  218. MenuVer_ClickX
  219. MenuHor_Click
  220. MenuNone_Click(
  221. SetGridModeChecks
  222. MenuGrid_Click4    
  223. MenuGrid
  224. Checked
  225. True[
  226. False
  227. MenuSize_Click
  228. MenuSize
  229. MenuTextMode_Click
  230. MenuTextMode
  231. MenuAlign_Click
  232. MenuAlignment_Click9
  233.     MenuAlign
  234. MenuColAlign3
  235. NewRown
  236. Text1_LostFocus
  237. Text2_LostFocus
  238. NewCol
  239. Text4_LostFocus
  240. NewFixedRow
  241. Text5_LostFocus-
  242. NewFixedCol
  243. VK_LBUTTON
  244. VK_RBUTTON@    
  245.     VK_CANCEL'    
  246. VK_MBUTTON
  247. VK_BACK
  248. VK_TAB
  249. VK_CLEAR
  250.     VK_RETURN
  251. VK_SHIFTe    
  252. VK_CONTROL]
  253. VK_MENUs    
  254. VK_PAUSE
  255. VK_CAPITAL
  256.     VK_ESCAPE
  257. VK_SPACE
  258. VK_PRIOR
  259. VK_NEXT>
  260. VK_ENDw
  261. VK_HOME
  262. VK_LEFTN
  263. VK_UP
  264. VK_Right"
  265. FK_UP
  266. VK_DOWNn
  267. ProcessExtendedKeys
  268. SaveDatah
  269. VK_ENTER
  270. SaveRow
  271. SaveCol
  272. SetZeroZero
  273. StateColor
  274.     BackColori
  275. SetupEmulatedEntry
  276. scaletop
  277. ScaleHeighte
  278.     SetParent7
  279.     hWndChild
  280. hWndNewParent]
  281. GetFocus
  282.     Text3Hwnd
  283. GetHwnd
  284. DataEditLabel
  285. DataEditLabel_Click
  286. GetControlHwnd
  287. DataEditLabelhWnd"
  288. Form_Resize
  289. Form_Unload
  290. EmulatedEntry
  291. Widthf
  292. ScaleWidth
  293. Mh3d1
  294. MhSpread1Hwnd
  295. Initializing
  296. MenuFile_Click
  297. MenuMode_Click
  298. MenuOptions_Clicky
  299. MenuText_Click
  300. Mh3d1_Click
  301. Initialzing
  302. RangeLabel
  303. RangeStart
  304. RangeEndX
  305. HideCol_Click
  306. HideRow_Click/
  307. RowBackColorC
  308. MenuC_Click
  309. GetFileType
  310. MhGetFileTypeM
  311. FileFilterType
  312. MhFileFilterType
  313. CustomColors
  314. ResultLong
  315. MhChooseColorw
  316. SelectedColor
  317. Flags
  318. MhEcode
  319.     PropArrayT
  320. SelectedProperty
  321. pValueU
  322. SetOneProperty
  323. OriginalValue
  324. CC_CANCELLED
  325. SetDefColors 
  326. MenuDefColors_Click
  327. CellForeColor
  328.     FillColor
  329.     ForeColorN
  330.     GridColorV
  331. LightColorN
  332. ShadowColor*
  333. BorderColor
  334. CC_RGBINIT*
  335. Result
  336. MenuPicture_Click
  337. Descriptionu
  338. Mask}
  339. FilterIndex
  340. InitFileNameZ
  341. FormCaption
  342. InitDir8
  343. DefaultExtensionC
  344. HowManyFilters
  345. OFN_NOCHANGEDIRl
  346. MhGetOpenFileName
  347. OFN_FILEMUSTEXIST
  348. OFN_HIDEREADONLY
  349. GreenR
  350. Text3_KeyUp`
  351. WorkString
  352. WorkRow
  353. WorkCol
  354. BorderStyle
  355. GotoButton_Click
  356. CurrentCell
  357. Column
  358. SetCurrentCell+
  359.     MoveToTop
  360. BadCell
  361. BCError
  362. TopRow
  363. LeftCol
  364. MenuScroll_Click
  365. MenuScroll
  366. MenuFill_Clickk
  367. MenuFill
  368.     FillStyle$
  369. MhSpread1_RowColChange
  370. MhCtrlHwnd
  371. textlen
  372. ClearBox_Click
  373. ClearBox
  374. MenuDefaults_Click
  375. UseDefaults
  376. MyTab
  377. CellPointer
  378. TextArr
  379.     SaveStyle
  380. TopIndex
  381. CellText7
  382. MhSpread1_Closed
  383. MhSpread1_Resize
  384. WindowState
  385. Spreadn
  386. MhTrue
  387. MhFalse
  388.  Todo Remove when Sam fixes Clickn
  389.  In case press Esc while editing
  390.  For assigning parentb
  391.  Ditto
  392. mhen200.vbx
  393. Form_Load
  394.  We'll enter something in the *last* cell to cause only one
  395.  memory allocation.i
  396. MhSpread1.Row = MhSpread1.Rows - 1
  397. MhSpread1.Col = MhSpread1.Cols - 1
  398. MhSpread1.Text = "x"
  399.  Release version should contain auto CellAlignment
  400.  Centerl
  401.  Get rid of selectiona
  402.  Now fill  data area.a
  403.  Skip 0,0r
  404.  So can overlay text boxes
  405.  Regular data
  406.  A1, A2, etc.
  407.  Center
  408.  Show row number
  409.  Row is zero
  410.  Skip cell 0,0
  411.  Center 
  412.  Set up emulated cell entrye
  413.  Make the top/left cell the default for entryd
  414.  Clear pending messages 
  415.  Update range selection 
  416.  For MhChooseColor routine
  417. Text3_KeyPress
  418.  Enter key
  419.  Next cell
  420.  Get system caught up 
  421.  Escape2
  422.  Abandon the edit 
  423. MenuExit_Click
  424. MenuGrid_Click
  425.  If this one is index, set the .GridMode propertyt
  426.  Turn off check markss
  427. MenuSize_Click
  428.  If this one is index, set the propertyy
  429.  Turn off check markst
  430. MenuTextMode_Click
  431.  Emulated in-cell entryt
  432.  Parent=Grid
  433.  Separate text box entry
  434.  Parent=3d label
  435.  Figure left pos
  436. MenuAlign_Click
  437.  If this one is index, set the propertyy
  438. Text1_LostFocus
  439. Text2_LostFocus
  440. Text4_LostFocus
  441. Text5_LostFocus
  442. ProcessExtendedKeys
  443.  Past rightmost column?e
  444.  Past lowest row?o
  445.  No change
  446. MhSpread1_KeyPress
  447.  movec
  448.  Do nothing 
  449. MhSpread1_KeyDown
  450. MhSpread1_GotFocus
  451. Ready"
  452.  Green
  453. SetZeroZero
  454.  Avoid repaint
  455. SetupEmulatedEntry
  456.  Handle emulated cell entry if form visible
  457.  Save in case press Esc later 
  458.  Match alignment of cell
  459.  Avoid error
  460. Form_Resize
  461. Text3_GotFocus
  462. Ready"
  463.  Green
  464. MhSpread1_SelChange
  465. <none>
  466. HideCol_Click
  467. HideRow_Click
  468. MenuC_Click
  469.  Do nothing
  470. Please notify MicroHelp that error "
  471.  occurred choosing a color
  472. Error"
  473. MenuPicture_Click
  474. Standard (*.bmp;*.wmf;*.ico)
  475. *.bmp;*.wmf;*.ico"
  476. Bitmaps (*.bmp)"
  477. *.bmp"
  478. Meta files (*.wmf)
  479. *.wmf"
  480. Icons (*.ico)"
  481. *.ico"
  482. Select Graphics File
  483.  Do nothing
  484. Please notify MicroHelp that error "
  485.  occurred choosing a file"
  486. Error"
  487. Text3_LostFocus
  488.  If using emulated cell entry, make invisible
  489. Ready"
  490. Text3_KeyUp
  491.  Keep spreadsheet up to date
  492. GotoButton_Click
  493. Please enter a cell to go to
  494. You entered an invalid Cell!
  495. CurrentCell
  496.  Pass an MhSpread control to this function and itn
  497.  will return a cell location using letters and numbers.b
  498.  For example, Row=1, Col=1 returns A1 when
  499.  FixedRows and FixedCols are both 1.
  500.  See Sub SetCurrentCell, which sets the .Col, .Row,.
  501.  .TopRow and .LeftColumn properties.
  502.  Relative to 0
  503.  Ditto
  504. SetCurrentCell
  505.  This proc sets the Row and Col properties
  506.  derived from Cell$. If MoveToTop% is not zero,z
  507.  then the .TopRow and .LeftCol properties ares
  508.  also set.
  509.  If Cell$ is invalid then the function returns MhTrue0
  510.         X.TopIndex = Row
  511.  Illegal value! 
  512. MenuScroll_Click
  513. MenuFill_Click
  514. MhSpread1_RowColChange
  515.  Direct text entry
  516. ClearBox_Click
  517. MenuDefaults_Click
  518. MhSpread1_Close
  519. Ooooo, Mr. Bill. Why did you close me?
  520.