home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / ARQS_ZIP / HUGEGR.ZIP / HUGEGRID.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1991-08-02  |  10.9 KB  |  180 lines
  1. Form1
  2. Form1
  3. Form1*
  4. B_Sort
  5. &Sort
  6. B_Find
  7. &Find
  8. B_Insert
  9. &Insert
  10. B_Del
  11. &Delete
  12. Picture1
  13. B_Quit
  14. &Quit
  15. T_Input
  16. 4321.99
  17. Label1
  18. 4Enter a number to search column 1 for or to insert. 
  19. Grid1
  20. VScroll1
  21. Command2_Click
  22. Form_Click
  23. Grid1
  24. Colwidthb
  25.     Form_Load
  26. Command3_Click
  27. Entry
  28. Element
  29.     HugeRedim
  30. hArray
  31. HugeDim
  32.     HugeErase
  33.     SetHugeEl
  34. FillGrid
  35. StartPt
  36. StopPt$
  37. Pointers
  38. pointer5
  39.     GetHugeEl
  40. Text)
  41. Vscroll1_ChangeE
  42. Vscroll1
  43. ValueB
  44.     GridStart:
  45. Grid2
  46. LastElement
  47. StartRowL
  48.     BlankGrid
  49. StopRow
  50. Blank
  51. Start*
  52. StartColf
  53. StopCol
  54. Vscrolln
  55. LargeChange
  56. SmallChange
  57. ElesIf
  58. ArraySorted
  59. B_Find_ClickU
  60. SortedArray
  61. B_Insert_Click
  62. B_PgDn_Click
  63. PgAmt=
  64. Vscroll1_Click
  65. B_PgUp_ClickE
  66. B_Quit_Click
  67. MousePointer
  68. Form1
  69. text1
  70. T_Input
  71. Rowsw
  72. B_Sort_Click
  73. Bottom2
  74.     LastArray
  75. array
  76. ElementStr8
  77. GetEl
  78. L_SortStart
  79. L_SortStop
  80. captionJ
  81. L_SortStop_Click^
  82. CurElement
  83. CurEl^
  84. T_Input1
  85. NewElm
  86. Grid3
  87. T_Input_Change
  88. T_Input_GotFocus
  89. SelStart
  90.     SelLength
  91.     ArraySize
  92. Picture1_Click$
  93. ScrollUp
  94. ScrollDown
  95.     LastValue
  96. B_Del_Click
  97. ColSelected
  98. DelRow
  99. CellSelected
  100. Deleted
  101. NumDeleted
  102. DecrLastEl
  103. IgnoreChangeQ
  104. SelStartRow
  105.     SelEndRowu
  106. SelStartCol
  107.     SelEndCol
  108. Gird1
  109. IncrEl
  110. IncrLastEl
  111. MatchPt
  112. MatchPoint
  113. MatchRow
  114. lastz
  115. Rather than move elements around in an array (or on disk, if you use these
  116. routines with a random access file instead), we use pointers to the recordss
  117. instead.
  118. Again, rather than move data around when when an element is deleted,
  119. we keep track of deleted elements and reuse them when adding new elements.
  120. Of course, when saving to disk, you would ignore the deleted elements.
  121. pointer number of the first element on the grids
  122. pointer number of the last element found on a search
  123. number of elements in the Array - 5000, in this examplel
  124. flag to show if the Huge Array is sorted.n
  125. number of lines to page up and down by
  126. variables used in the sort routine.m
  127. last value selected on scroll barr
  128. flag to allow changing Vscroll1.value without executingt
  129. Vscroll1.Change 
  130. Grid row number where matching item is after a Finda
  131. Copyright 1991 Nelson Ford, Public (software) Libraryy    
  132. Form_Load
  133. amount of data we are going to stuff into the array
  134. Set width of each grid column:
  135. Set up Scroll bar values:9
  136. Set up HugeArray (requires Hugearr.dll in PATH) 
  137. Error dimensioning array: 
  138. fill array with dummy data
  139. 333333
  140. display last 10 entries in the Grid:
  141. FillGrid
  142. Vscroll1_Change
  143. See "Change Property" in the VB Manual. 
  144. up arrow clicked: scroll down
  145. down arrow clicked: scroll up
  146. clicked above handle: page down 
  147. clicked below handle: page upc
  148. moved handle
  149. B_Find_Click
  150. Nothing entered.
  151. Debug.Print l; u, T_Input.Text, Entry.a1
  152. B_Insert_Click
  153. Out of room.
  154. Enter something in the Text Box.
  155. If a match was not found, the contents of Grid.Row=MatchRow, .Col=0
  156.   will be the closest match value.
  157. Test to see if the new value is < or => the contents of that cell:
  158. Error in inserting data.
  159. B_Quit_Click
  160. B_Sort_Click
  161. GetEl
  162. T_Input_GotFocus
  163. Picture1_Click
  164. Public (software) Library is the most extensive collection of pd/shareware available. 
  165. We have a large collection of routines for all languages, including VB. 
  166. For a catalog, call 800-242-4PsL or write PsL, P.O.Box 35705, Houston, TX 77235-5705."
  167. ScrollUp
  168. ScrollDown
  169. B_Del_Click
  170. Cell not selected.
  171. array element number
  172. Delete entire row?
  173. just delete cell, not the entire entry
  174. Error deleting data.
  175. Copyright 1991 Nelson Ford, Public (software) Libraryy
  176. DecrLastEl
  177. takes care of all the ramifications of decreasing LastElemente
  178. IncrLastEl
  179. takes care of all the ramifications of increasing LastElementc
  180.