home *** CD-ROM | disk | FTP | other *** search
/ Revista do CD-ROM 61 / CDRom61.iso / turmavea / PIANO.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1995-08-11  |  78.3 KB  |  285 lines
  1.     FRM_PIANO
  2. PIANO
  3. Form15G
  4. PanelWhite
  5. SSPanel#
  6. PanelWhite
  7. SSPanel#
  8. PanelWhite
  9. SSPanel#
  10. PanelWhite
  11. SSPanel#
  12. PanelWhite
  13. SSPanel#
  14. PanelWhite
  15. SSPanel#
  16. PanelWhite
  17. SSPanel#
  18. PanelWhite
  19. SSPanel#
  20. PanelWhite
  21. SSPanel#
  22. PanelWhite
  23. SSPanel#
  24. PanelWhite
  25. SSPanel#
  26. PanelWhite
  27. SSPanel#
  28. PanelWhite
  29. SSPanel#
  30. PanelWhite
  31. SSPanel#
  32. PanelWhite
  33. SSPanel#
  34. PanelWhite
  35. SSPanel#
  36. PanelWhite
  37. SSPanel#
  38. PanelWhite
  39. SSPanel#
  40. PanelWhite
  41. SSPanel#
  42. PanelWhite
  43. SSPanel#
  44. PanelWhite
  45. SSPanel#
  46. PanelWhite
  47. SSPanel#
  48. PanelWhite
  49. SSPanel#
  50. PanelWhite
  51. SSPanel#
  52. PanelWhite
  53. SSPanel#
  54. PanelWhite
  55. SSPanel#
  56. PanelWhite
  57. SSPanel#
  58. Panel3D3
  59. SSPanel#
  60. PanelWhite
  61. SSPanel#
  62. PanelWhite
  63. SSPanel#
  64. PanelWhite
  65. SSPanel#
  66. PanelWhite
  67. SSPanel#
  68. PanelWhite
  69. SSPanel#
  70. PanelWhite
  71. SSPanel#
  72. PanelWhite
  73. SSPanel#
  74. PanelWhite
  75. SSPanel#
  76. PanelWhite
  77. SSPanel#
  78. PanelWhite
  79. SSPanel#
  80. PanelWhite
  81. SSPanel#
  82. PanelWhite
  83. SSPanel#
  84. PanelWhite
  85. SSPanel#
  86. PanelWhite
  87. SSPanel#
  88. PanelWhite
  89. SSPanel#
  90. PanelWhite
  91. SSPanel#
  92. PanelWhite
  93. SSPanel#
  94. PanelWhite
  95. SSPanel#
  96. PanelWhite
  97. SSPanel#
  98. PanelWhite
  99. SSPanel#
  100. PanelWhite
  101. SSPanel#
  102. PanelWhite
  103. SSPanel#
  104. PanelWhite
  105. SSPanel#
  106. PanelWhite
  107. SSPanel#
  108. PanelWhite
  109. SSPanel#
  110. PanelWhite
  111. SSPanel#
  112. PanelWhite
  113. SSPanel#
  114. PanelWhite
  115. SSPanel#
  116. PanelWhite
  117. SSPanel#
  118. PanelWhite
  119. SSPanel#
  120. PanelWhite
  121. SSPanel#
  122. PanelWhite
  123. SSPanel#
  124. PanelWhite
  125. SSPanel#
  126. PanelWhite
  127. SSPanel#
  128. PanelWhite
  129. SSPanel#
  130. PanelWhite
  131. SSPanel#
  132. PanelWhite
  133. SSPanel#
  134. PanelWhite
  135. SSPanel#
  136. PanelWhite
  137. SSPanel#
  138. PanelWhite
  139. SSPanel#
  140. PanelWhite
  141. SSPanel#
  142. PanelWhite
  143. SSPanel#
  144. PanelWhite
  145. SSPanel#
  146. PanelWhite
  147. SSPanel#
  148. PanelWhite
  149. SSPanel#
  150. PanelWhite
  151. SSPanel#
  152. PanelWhite
  153. SSPanel#
  154. PanelWhite
  155. SSPanel#
  156. PanelWhite
  157. SSPanel#
  158. PanelWhite
  159. SSPanel#
  160. PanelWhite
  161. SSPanel#
  162. PanelWhite
  163. SSPanel#
  164. PanelWhite
  165. SSPanel#
  166. PanelWhite
  167. SSPanel#
  168. PanelWhite
  169. SSPanel#
  170. PanelWhite
  171. SSPanel#
  172. PanelWhite
  173. SSPanel#
  174. PanelWhite
  175. SSPanel#
  176. PanelWhite
  177. SSPanel#
  178. PanelWhite
  179. SSPanel#
  180. PanelWhite
  181. SSPanel#
  182. PanelWhite
  183. SSPanel#
  184. PanelWhite
  185. SSPanel#
  186. PanelWhite
  187. SSPanel#
  188. PanelWhite
  189. SSPanel#
  190.     IMG_PIANO
  191. IMG_BOTAOPIANO
  192. MidiOutOpen
  193. hMidiOut
  194. DeviceId
  195. MidiOutShortMsg
  196. MidiMessage
  197. MidiOutClose
  198. GetPrivateProfileString
  199. Sname
  200. Kname
  201. Sizek
  202. Fname
  203. sndPlaySound
  204. lpsSoundp
  205. wFlagC
  206. MidiEventOutR
  207. MidiNoteOut
  208. MidiVelOutG
  209. hmidioutcopy
  210. MidiOpenErrorw
  211. MODAL
  212. ShiftKey
  213.     MidiPatch
  214. MidiVolume
  215. TrackChannel
  216. MidiPan
  217. Octave
  218. MidiChannelOut
  219. MidiVelocity\
  220. CapsLock=
  221. NoteRepeat
  222. Command1_Click
  223. Image1_Clickd
  224. Index
  225. IMAGE1
  226. Picture
  227. PS2_SE
  228. BMP_DO1B
  229. BMP_DO1A
  230. Image1_MouseDown
  231. ButtonL
  232. Shift
  233. Image1_MouseUp{
  234. NoteCatchCountZ
  235. NoteOnCatcher
  236.     Form_Loadj
  237. Screen(
  238. MousePointer
  239. PianoC
  240. MidiOutOpenPort
  241. HScrollMIDIChannel
  242. Value
  243. HScrollPatch
  244. HScrollVolume
  245. HScrollPan
  246. HScrollOctave
  247. Form_Unload
  248. Cancel
  249. PanelWhite_DragDrop
  250. Source
  251. Control
  252. SendMidiOut
  253. PanelWhite
  254. BevelOuter
  255. Image1_DragOver
  256. State
  257. PanelWhite_DragOver
  258. MAGE1d
  259. IMG_BOTAOPIANO_Click
  260. IMG_PIANO_Clickn
  261.  MIDI Functions Windows 3.1P
  262. mmsystem.dll
  263. mmsystem.dll
  264. mmsystem.dll
  265.  Other API Functions
  266. kernel
  267. mmsystem
  268. Form_Load
  269. Screen.MousePointer = 11
  270. Piano.Left = 0
  271. Piano.Top = 00
  272.  Open Midi Driver
  273. HScrollMIDIChannel.Value = 13y
  274. HScrollPatch.Value = 0
  275. HScrollVolume.Value = 100=
  276. HScrollPan.Value = 64 
  277. HScrollOctave.Value = 2
  278. Screen.MousePointer = 0
  279. Form_Unload
  280. PanelWhite_DragDrop
  281. PanelWhite_DragOver
  282. If still on same note, discard
  283. Since drag/drop is being used, we must keep track of the note being played. 
  284. Don't let array get out of range
  285.