home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / CODIGO_1 / BROWSE_2 / BRWDGEN.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1995-03-15  |  8.3 KB  |  198 lines
  1. BrwdGen
  2. Generic Database Browse Example
  3. Form1%
  4.     CommStart
  5. Start &Browse
  6. DbfName
  7. DbfLbl
  8. |Enter the database name, including the full path and drive if required. The .DBF extension will be assummed if none is given
  9. mnuExit
  10. E&xit!
  11. mnuIndex
  12. &Index
  13. mnuSeek
  14. See&k
  15. mnuScope
  16. &Scope
  17. MnuScp1
  18. &Show all beginning with...
  19. MnuScp2
  20. &Ranged Scope...
  21. mnuPseudoFilter
  22. Pseudo-&Filter
  23. mnuPrint
  24. &Print
  25.     lBrowsingT
  26. Brw1_GetLine
  27. cLine
  28. GetField
  29. Brw1_HitBottom
  30. Brw1_HitTop
  31. CommStart_Click@
  32. cFile'
  33. cHdrp
  34. DbfName
  35. TextW
  36. vxFile
  37. vxUseDbfRO
  38. MB_ICONEXCLAMATION
  39. vxFieldCountf
  40. vxFieldNameu
  41. vxFieldType
  42. vxFieldSize
  43. Cols1
  44. ColWidth;
  45. Headerh
  46. DbfLblR
  47. Visible
  48.     CommStart5
  49. mnuIndex
  50. Enabled
  51. mnuPrint
  52. Width
  53. BrwdGenz
  54. ScaleWidthn
  55. Height
  56. ScaleHeight
  57.     Form_Load
  58. Form_ResizeG
  59. vxFieldH
  60. vxDateString
  61. VX_AMERICANV
  62. vxTrue
  63. vxMemoRead
  64. mnuExit_Click
  65. mnuIndex_Click
  66. cIndext
  67. mnuScopez
  68. mnuPseudoFilter
  69. vxSelectDbf
  70. vxUseNtx
  71. mnuPrint_Click>
  72. nPage^
  73. nRowHg
  74. lHitBottom
  75.     vxDbfName
  76.     EmptyFile
  77. MB_OKCANCEL
  78. MBDEFBUTTON2
  79. IDCANCEL
  80. Action    
  81. BRW_ACT_GOTOPn
  82. Printer%
  83. BRW_ACT_DOWN
  84. vxEofD
  85.     HitBottom
  86. CurrentY)
  87. mnuPseudoFilter_Clickb
  88. cFilter
  89.     FilterExp
  90. mnuScope_Click
  91. cScope
  92.     vxNtxExpr5
  93. vxNtxCurrent
  94. IndexExp
  95. vxRecno
  96. PageR
  97. mnuSeek
  98. Fasle|
  99. mnuSeek_Click
  100.     SearchKey
  101. GenPrnt
  102. lPreview
  103.     lPrintAll
  104. PrntPrev
  105. control
  106. PictP7
  107. vxSkip
  108. nRec?
  109. PrntAll-
  110. PrntPage
  111. lSomePrinted
  112. lPrintPageO
  113. lPrint
  114. MODAL
  115. ComNextPage
  116. BRW_ACT_REFRESHALL
  117. EndI!
  118. GenPrint
  119. ComPrintPage
  120. ComPrntPage
  121. CurrentX
  122. Brw1_ClickL
  123. Brw1_DblClickU
  124. PrntWait
  125. lblPrntWait
  126. Caption`
  127. MnuScp1_Clickq
  128. MnuScp2_Click
  129. cFrom
  130.     IndexExp2
  131. Brw1_EditValid
  132. cField
  133. Brw1_EditWhen
  134. lCancel0
  135. ColAlign
  136. ColEdit
  137. ColField
  138. Brw1_EditReplFail
  139. vxUseDbf
  140. BRW_ACT_REFRESHLINE
  141. SColor
  142. SpcColor
  143. cPath_
  144. CatCnt
  145. PrdCnt
  146.  declare as module global the no of fields and some:
  147.  dynamic arrays: field names, types and lengthss
  148. Brw1_GetLine
  149. Brw1_HitBottom
  150. Brw1_HitTop
  151. CommStart_Click
  152. Something wrong with the file 
  153. This is not a Clipper/Fox/dBase3 compatible database file: 
  154. Browsing 
  155. Form_Load
  156. Form_Resize
  157. GetField
  158.  char or num field
  159.  date field
  160.  logical field
  161. mnuExit_Click
  162. mnuIndex_Click
  163. Enter the index file (NTX extension assumed) full path and name 
  164. Index open
  165.  closing the current index
  166. Something wrong with the file 
  167. This is not a Clipper compatible index file: 
  168.  the GoTop is implicit
  169. mnuPrint_Click
  170.  file is empty!
  171. All the records you selected from 
  172.  are ready to be sent to print
  173. Print
  174. Printing now the selected records from 
  175. = print one page 
  176.  print page header
  177. mmmm dd, yyyy
  178.  Page
  179. Printing now selected records from 
  180.  print column headersw
  181.  print items on this page
  182. user interrupted printing
  183. mnuPseudoFilter_Click
  184. Enter a correct xBase expression:
  185. Pseudo-Filter Expression
  186. MnuScp1_Click
  187. Current index key is 
  188. Enter the Scope expression
  189. MnuScp2_Click
  190. Current index key is 
  191. Enter the FROM Scope:
  192. Enter the TO Scope:
  193. mnuSeek_Click
  194. The current index key is 
  195. Enter a string to search for:
  196. Found!
  197. Not Found!
  198.