home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / idecla2 / mmdecs.asc < prev    next >
Encoding:
Text File  |  1994-06-21  |  11.2 KB  |  134 lines
  1. Declare Function DrvClose& Lib "MMSYSTEM.DLL" (ByVal hDriver%, ByVal lParam1&, ByVal lParam2&)
  2. Declare Function DrvOpen% Lib "MMSYSTEM.DLL" (ByVal szDriverName$, ByVal szSectionName$, ByVal lParam2&)
  3. Declare Function DrvSendMessageClose& Lib "MMSYSTEM.DLL" (ByVal hDriver%, ByVal uMessage%, ByVal lParam1&, ByVal lParam2&)
  4. Declare Function DrvGetModuleHandle% Lib "MMSYSTEM.DLL" (ByVal hDriver%)
  5. Declare Function DrvDefDriverProc& Lib "MMSYSTEM.DLL" (ByVal dwDriverId&, ByVal driverID, ByVal uMessage%, ByVal lParam1&, ByVal lParam2&)
  6.  
  7. Declare Function mmsystemGetVersion% Lib "MMSYSTEM.DLL" ()
  8. Declare Sub OutputDebugStr Lib "MMSYSTEM.DLL" (ByVal strout$)
  9.  
  10. Declare Function sndPlaySound% Lib "MMSYSTEM.DLL" (ByVal lpszSoundName$, ByVal uFlags%)
  11. Declare Function waveOutGetNumDevs% Lib "MMSYSTEM.DLL" ()
  12. Declare Function waveOutGetDevCaps% Lib "MMSYSTEM.DLL" (ByVal uDeviceID%, lpCaps As WAVEOUTCAPS, ByVal uSize%)
  13. Declare Function waveOutGetVolume% Lib "MMSYSTEM.DLL" (ByVal uDeviceID%, lpdwVolume&)
  14. Declare Function waveOutSetVolume% Lib "MMSYSTEM.DLL" (ByVal uDeviceID%, ByVal dwVolume&)
  15. Declare Function waveOutGetErrorText% Lib "MMSYSTEM.DLL" (ByVal uError%, ByVal lpText$, ByVal uSize%)
  16. Declare Function waveOutOpen% Lib "MMSYSTEM.DLL" (lphWaveOut%, ByVal uDeviceID%, lpFormat As WAVEFORMAT, ByVal dwCallback&, ByVal dwInstance&, ByVal dwFlags&)
  17. Declare Function waveOutClose% Lib "MMSYSTEM.DLL" (ByVal hWaveOut%)
  18. Declare Function waveOutPrepareHeader% Lib "MMSYSTEM.DLL" (ByVal hWaveOut%, lpWaveOutHdr As WAVEHDR, ByVal uSize%)
  19. Declare Function waveOutUnprepareHeader% Lib "MMSYSTEM.DLL" (ByVal hWaveOut%, lpWaveOutHdr As WAVEHDR, ByVal uSize%)
  20. Declare Function waveOutWrite% Lib "MMSYSTEM.DLL" (ByVal hWaveOut%, lpWaveOutHdr As WAVEHDR, ByVal uSize%)
  21. Declare Function waveOutPause% Lib "MMSYSTEM.DLL" (ByVal hWaveOut%)
  22. Declare Function waveOutRestart% Lib "MMSYSTEM.DLL" (ByVal hWaveOut%)
  23. Declare Function waveOutReset% Lib "MMSYSTEM.DLL" (ByVal hWaveOut%)
  24. Declare Function waveOutBreakLoop% Lib "MMSYSTEM.DLL" (ByVal hWaveOut%)
  25. Declare Function waveOutGetPosition% Lib "MMSYSTEM.DLL" (ByVal hWaveOut%, lpInfo As MMTIME, ByVal uSize%)
  26. Declare Function waveOutGetPitch% Lib "MMSYSTEM.DLL" (ByVal hWaveOut%, lpdwPitch&)
  27. Declare Function waveOutSetPitch% Lib "MMSYSTEM.DLL" (ByVal hWaveOut%, ByVal dwPitch&)
  28. Declare Function waveOutGetPlaybackRate% Lib "MMSYSTEM.DLL" (ByVal hWaveOut%, lpdwRate&)
  29. Declare Function waveOutSetPlaybackRate% Lib "MMSYSTEM.DLL" (ByVal hWaveOut%, ByVal dwRate&)
  30. Declare Function waveOutGetID% Lib "MMSYSTEM.DLL" (ByVal hWaveOut%, lpuDeviceID%)
  31. Declare Function waveOutMessage& Lib "MMSYSTEM.DLL" (ByVal hWaveOut%, ByVal uMessage%, ByVal dw1&, ByVal dw2&)
  32. Declare Function waveInGetNumDevs% Lib "MMSYSTEM.DLL" ()
  33. Declare Function waveInGetDevCaps% Lib "MMSYSTEM.DLL" (ByVal uDeviceID%, lpCaps As WAVEINCAPS, ByVal uSize%)
  34. Declare Function waveInGetErrorText% Lib "MMSYSTEM.DLL" (ByVal uError%, ByVal lpText$, ByVal uSize%)
  35. Declare Function waveInOpen% Lib "MMSYSTEM.DLL" (lphWaveIn%, ByVal uDeviceID%, lpFormat As WAVEFORMAT, ByVal dwCallback&, ByVal dwInstance&, ByVal dwFlags&)
  36. Declare Function waveInClose% Lib "MMSYSTEM.DLL" (ByVal hWaveIn%)
  37. Declare Function waveInPrepareHeader% Lib "MMSYSTEM.DLL" (ByVal hWaveIn%, lpWaveInHdr As WAVEHDR, ByVal uSize%)
  38. Declare Function waveInUnprepareHeader% Lib "MMSYSTEM.DLL" (ByVal hWaveIn%, lpWaveInHdr As WAVEHDR, ByVal uSize%)
  39. Declare Function waveInAddBuffer% Lib "MMSYSTEM.DLL" (ByVal hWaveIn%, lpWaveInHdr As WAVEHDR, ByVal uSize%)
  40. Declare Function waveInStart% Lib "MMSYSTEM.DLL" (ByVal hWaveIn%)
  41. Declare Function waveInStop% Lib "MMSYSTEM.DLL" (ByVal hWaveIn%)
  42. Declare Function waveInReset% Lib "MMSYSTEM.DLL" (ByVal hWaveIn%)
  43. Declare Function waveInGetPosition% Lib "MMSYSTEM.DLL" (ByVal hWaveIn%, lpInfo As MMTIME, ByVal uSize%)
  44. Declare Function waveInGetID% Lib "MMSYSTEM.DLL" (ByVal hWaveIn%, lpuDeviceID%)
  45. Declare Function waveInMessage& Lib "MMSYSTEM.DLL" (ByVal hWaveIn%, ByVal uMessage%, ByVal dw1&, ByVal dw2&)
  46.  
  47. ' MIDI function prototypes 
  48. Declare Function midiOutGetNumDevs% Lib "MMSYSTEM.DLL" ()
  49. Declare Function midiOutGetDevCaps% Lib "MMSYSTEM.DLL" (ByVal uDeviceID%, lpCaps As MIDIOUTCAPS, ByVal uSize%)
  50. Declare Function midiOutGetVolume% Lib "MMSYSTEM.DLL" (ByVal uDeviceID%, lpdwVolume&)
  51. Declare Function midiOutSetVolume% Lib "MMSYSTEM.DLL" (ByVal uDeviceID%, ByVal dwVolume&)
  52. Declare Function midiOutGetErrorText% Lib "MMSYSTEM.DLL" (ByVal uError%, ByVal lpText$, ByVal uSize%)
  53. Declare Function midiOutOpen% Lib "MMSYSTEM.DLL" (lphMidiOut&, ByVal uDeviceID%, ByVal dwCallback&, ByVal dwInstance&, ByVal dwFlags&)
  54. Declare Function midiOutClose% Lib "MMSYSTEM.DLL" (ByVal hMidiOut%)
  55. Declare Function midiOutPrepareHeader% Lib "MMSYSTEM.DLL" (ByVal hMidiOut%, lpMidiOutHdr As MIDIHDR, ByVal uSize%)
  56. Declare Function midiOutUnprepareHeader% Lib "MMSYSTEM.DLL" (ByVal hMidiOut%, lpMidiOutHdr As MIDIHDR, ByVal uSize%)
  57. Declare Function midiOutShortMsg% Lib "MMSYSTEM.DLL" (ByVal hMidiOut%, ByVal dwMsg&)
  58. Declare Function midiOutLongMsg% Lib "MMSYSTEM.DLL" (ByVal hMidiOut%, lpMidiOutHdr As MIDIHDR, ByVal uSize%)
  59. Declare Function midiOutReset% Lib "MMSYSTEM.DLL" (ByVal hMidiOut%)
  60. Declare Function midiOutCachePatches% Lib "MMSYSTEM.DLL" (ByVal hMidiOut%, ByVal uBank%, lpwPatchArray%, ByVal uFlags%)
  61. Declare Function midiOutCacheDrumPatches% Lib "MMSYSTEM.DLL" (ByVal hMidiOut%, ByVal uPatch%, lpwKeyArray%, ByVal uFlags%)
  62. Declare Function midiOutGetID% Lib "MMSYSTEM.DLL" (ByVal hMidiOut%, lpuDeviceID%)
  63. Declare Function midiOutMessage& Lib "MMSYSTEM.DLL" (ByVal hMidiOut%, ByVal uMessage%, ByVal dw1&, ByVal dw2&)
  64. Declare Function midiInGetNumDevs% Lib "MMSYSTEM.DLL" ()
  65. Declare Function midiInGetDevCaps% Lib "MMSYSTEM.DLL" (ByVal uDeviceID%, lpCaps As MIDIINCAPS, ByVal uSize%)
  66. Declare Function midiInGetErrorText% Lib "MMSYSTEM.DLL" (ByVal uError%, ByVal lpText$, ByVal uSize%)
  67. Declare Function midiInOpen% Lib "MMSYSTEM.DLL" (lphMidiIn%, ByVal uDeviceID%, ByVal dwCallback&, ByVal dwInstance&, ByVal dwFlags&)
  68. Declare Function midiInClose% Lib "MMSYSTEM.DLL" (ByVal hMidiIn%)
  69. Declare Function midiInPrepareHeader% Lib "MMSYSTEM.DLL" (ByVal hMidiIn%, lpMidiInHdr As MIDIHDR, ByVal uSize%)
  70. Declare Function midiInUnprepareHeader% Lib "MMSYSTEM.DLL" (ByVal hMidiIn%, lpMidiInHdr As MIDIHDR, ByVal uSize%)
  71. Declare Function midiInAddBuffer% Lib "MMSYSTEM.DLL" (ByVal hMidiIn%, lpMidiInHdr As MIDIHDR, ByVal uSize%)
  72. Declare Function midiInStart% Lib "MMSYSTEM.DLL" (ByVal hMidiIn%)
  73. Declare Function midiInStop% Lib "MMSYSTEM.DLL" (ByVal hMidiIn%)
  74. Declare Function midiInReset% Lib "MMSYSTEM.DLL" (ByVal hMidiIn%)
  75. Declare Function midiInGetID% Lib "MMSYSTEM.DLL" (ByVal hMidiIn%, lpuDeviceID%)
  76. Declare Function midiInMessage& Lib "MMSYSTEM.DLL" (ByVal hMidiIn%, ByVal uMessage%, ByVal dw1&, ByVal dw2&)
  77.  
  78. ' auxiliary audio function prototypes 
  79. Declare Function auxGetNumDevs% Lib "MMSYSTEM.DLL" ()
  80. Declare Function auxGetDevCaps% Lib "MMSYSTEM.DLL" (ByVal uDeviceID%, lpCaps As AUXCAPS, ByVal uSize%)
  81. Declare Function auxSetVolume% Lib "MMSYSTEM.DLL" (ByVal uDeviceID%, ByVal dwVolume&)
  82. Declare Function auxGetVolume% Lib "MMSYSTEM.DLL" (ByVal uDeviceID%, lpdwVolume&)
  83. Declare Function auxOutMessage& Lib "MMSYSTEM.DLL" (ByVal uDeviceID%, ByVal uMessage%, ByVal dw1&, ByVal dw2&)
  84.  
  85. ' timer function prototypes 
  86. Declare Function timeGetSystemTime% Lib "MMSYSTEM.DLL" (lpTime As MMTIME, ByVal uSize%)
  87. Declare Function timeGetTime& Lib "MMSYSTEM.DLL" ()
  88. Declare Function timeSetEvent% Lib "MMSYSTEM.DLL" (ByVal uDelay%, ByVal uResolution%, ByVal lpFunction&, ByVal dwUser&, ByVal uFlags%)
  89. Declare Function timeKillEvent% Lib "MMSYSTEM.DLL" (ByVal uTimerID%)
  90. Declare Function timeGetDevCaps% Lib "MMSYSTEM.DLL" (lpTimeCaps As TIMECAPS, ByVal uSize%)
  91. Declare Function timeBeginPeriod% Lib "MMSYSTEM.DLL" (ByVal uPeriod%)
  92. Declare Function timeEndPeriod% Lib "MMSYSTEM.DLL" (ByVal uPeriod%)
  93.  
  94. ' joystick function prototypes 
  95. Declare Function joyGetDevCaps% Lib "MMSYSTEM.DLL" (ByVal uJoyID%, lpCaps As JOYCAPS, ByVal uSize%)
  96. Declare Function joyGetNumDevs% Lib "MMSYSTEM.DLL" ()
  97. Declare Function joyGetPos% Lib "MMSYSTEM.DLL" (ByVal uJoyID%, lpInfo As JOYINFO)
  98. Declare Function joyGetThreshold% Lib "MMSYSTEM.DLL" (ByVal uJoyID%, lpuThreshold%)
  99. Declare Function joyReleaseCapture% Lib "MMSYSTEM.DLL" (ByVal uJoyID%)
  100. Declare Function joySetCapture% Lib "MMSYSTEM.DLL" (ByVal hwnd%, ByVal uJoyID%, ByVal uPeriod%, ByVal bChanged%)
  101. Declare Function joySetThreshold% Lib "MMSYSTEM.DLL" (ByVal uJoyID%, ByVal uThreshold%)
  102.  
  103. ' MMIO function prototypes 
  104. Declare Function mmioStringToFOURCC& Lib "MMSYSTEM.DLL" (ByVal sz$, ByVal uFlags%)
  105. Declare Function mmioInstallIOProc& Lib "MMSYSTEM.DLL" (ByVal fccIOProc&, ByVal pIOProc&, ByVal dwFlags&)
  106. Declare Function mmioOpen% Lib "MMSYSTEM.DLL" (ByVal szFileName$, lpmmioinfo As MMIOINFO, ByVal dwOpenFlags&)
  107. Declare Function mmioRename% Lib "MMSYSTEM.DLL" (ByVal szFileName$, ByVal szNewFileName$, lpmmioinfo As MMIOINFO, ByVal dwRenameFlags&)
  108. Declare Function mmioClose% Lib "MMSYSTEM.DLL" (ByVal hmmio%, ByVal uFlags%)
  109. Declare Function mmioRead& Lib "MMSYSTEM.DLL" (ByVal hmmio%, ByVal pch$, ByVal cch&)
  110. Declare Function mmioWrite& Lib "MMSYSTEM.DLL" (ByVal hmmio%, ByVal pch$, ByVal cch&)
  111. Declare Function mmioSeek& Lib "MMSYSTEM.DLL" (ByVal hmmio%, ByVal lOffset&, ByVal iOrigin%)
  112. Declare Function mmioGetInfo% Lib "MMSYSTEM.DLL" (ByVal hmmio%, lpmmioinfo As MMIOINFO, ByVal uFlags%)
  113. Declare Function mmioSetInfo% Lib "MMSYSTEM.DLL" (ByVal hmmio%, lpmmioinfo As MMIOINFO, ByVal uFlags%)
  114. Declare Function mmioSetBuffer% Lib "MMSYSTEM.DLL" (ByVal hmmio%, ByVal pchBuffer$, ByVal cchBuffer&, ByVal uFlags%)
  115. Declare Function mmioFlush% Lib "MMSYSTEM.DLL" (ByVal hmmio%, ByVal uFlags%)
  116. Declare Function mmioAdvance% Lib "MMSYSTEM.DLL" (ByVal hmmio%, lpmmioinfo As MMIOINFO, ByVal uFlags%)
  117. Declare Function mmioSendMessage& Lib "MMSYSTEM.DLL" (ByVal hmmio%, ByVal uMessage%, ByVal lParam1&, ByVal lParam2&)
  118. Declare Function mmioDescend% Lib "MMSYSTEM.DLL" (ByVal hmmio%, lpck As MMCKINFO, lpckParent As MMCKINFO, ByVal uFlags%)
  119. Declare Function mmioAscend% Lib "MMSYSTEM.DLL" (ByVal hmmio%, lpck As MMCKINFO, ByVal uFlags%)
  120. Declare Function mmioCreateChunk% Lib "MMSYSTEM.DLL" (ByVal hmmio%, lpck As MMCKINFO, ByVal uFlags%)
  121.  
  122. ' MCI function prototypes 
  123. Declare Function mciSendCommand& Lib "MMSYSTEM.DLL"  (ByVal uDeviceID%, ByVal uMessage%, ByVal dwParam1&, ByVal dwParam2&)
  124. Declare Function mciSendString& Lib "MMSYSTEM.DLL"  (ByVal lpstrCommand$, ByVal lpstrReturnString$, ByVal uReturnLength%, ByVal hwndCallback%)
  125. Declare Function mciSendStringAny& Lib "MMSYSTEM.DLL"  Alias "mciSendString" (ByVal lpstrCommand$, ByVal lpstrReturnString As Any, ByVal uReturnLength%, ByVal hwndCallback%)
  126. Declare Function mciGetDeviceID% Lib "MMSYSTEM.DLL" (ByVal lpstrName$)
  127. Declare Function mciGetDeviceIDFromElementID% Lib "MMSYSTEM.DLL" (ByVal dwElementID&, ByVal lpstrType$)
  128. Declare Function mciGetErrorString% Lib "MMSYSTEM.DLL"  (ByVal wError&, ByVal lpstrBuffer$, ByVal uLength%)
  129. Declare Function mciSetYieldProc% Lib "MMSYSTEM.DLL"  (ByVal uDeviceID%, ByVal fpYieldProc&, ByVal dwYieldData&)
  130. Declare Function mciGetCreatorTask% Lib "MMSYSTEM.DLL" (ByVal uDeviceID%)
  131. Declare Function mciGetYieldProc& Lib "MMSYSTEM.DLL" (ByVal uDeviceID%, lpdwYieldData&)
  132. Declare Function mciExecute% Lib "MMSYSTEM.DLL"  (ByVal lpstrCommand$)
  133.  
  134.