[1] | 1 | ' api_mmsys.sbp
|
---|
| 2 | ' Include file for Multimedia API's
|
---|
| 3 |
|
---|
| 4 |
|
---|
| 5 | #ifndef _INC_MMSYS
|
---|
| 6 | #define _INC_MMSYS
|
---|
| 7 |
|
---|
| 8 |
|
---|
| 9 | ' general constants
|
---|
| 10 | Const MAXPNAMELEN = 32
|
---|
| 11 | Const MAXERRORLENGTH = 256
|
---|
| 12 | Const MAX_JOYSTICKOEMVXDNAME = 260
|
---|
| 13 |
|
---|
| 14 | Const MM_MIDI_MAPPER = 1
|
---|
| 15 | Const MM_WAVE_MAPPER = 2
|
---|
| 16 | Const MM_SNDBLST_MIDIOUT = 3
|
---|
| 17 | Const MM_SNDBLST_MIDIIN = 4
|
---|
| 18 | Const MM_SNDBLST_SYNTH = 5
|
---|
| 19 | Const MM_SNDBLST_WAVEOUT = 6
|
---|
| 20 | Const MM_SNDBLST_WAVEIN = 7
|
---|
| 21 | Const MM_ADLIB = 9
|
---|
| 22 | Const MM_MPU401_MIDIOUT = 10
|
---|
| 23 | Const MM_MPU401_MIDIIN = 11
|
---|
| 24 | Const MM_PC_JOYSTICK = 12
|
---|
| 25 |
|
---|
| 26 | ' general data types
|
---|
| 27 | TypeDef MMVERSION = DWord
|
---|
| 28 | TypeDef VERSION = DWord
|
---|
| 29 | TypeDef MMRESULT = DWord
|
---|
| 30 |
|
---|
| 31 | ' MMTIME data structure
|
---|
| 32 |
|
---|
| 33 | Type Smpte
|
---|
| 34 | hour As Byte
|
---|
| 35 | min As Byte
|
---|
| 36 | sec As Byte
|
---|
| 37 | frame As Byte
|
---|
| 38 | fps As Byte
|
---|
| 39 | dummy As Byte
|
---|
| 40 | pad[ELM(2)] As Byte
|
---|
| 41 | End Type
|
---|
| 42 |
|
---|
| 43 | Type Midi
|
---|
| 44 | songptrpos As DWord
|
---|
| 45 | End Type
|
---|
| 46 |
|
---|
| 47 | Type MMTIME
|
---|
| 48 | Public
|
---|
| 49 | wType As DWord
|
---|
| 50 | u As DWord
|
---|
| 51 | /* union
|
---|
| 52 | ms As DWord
|
---|
| 53 | sample As DWord
|
---|
| 54 | cb As DWord
|
---|
| 55 | ticks As DWord
|
---|
| 56 | smpte As Smpte
|
---|
| 57 | midi As Midi
|
---|
| 58 | */
|
---|
| 59 | End Type
|
---|
| 60 | TypeDef PMMTIME = *MMTIME
|
---|
| 61 | TypeDef LPMMTIME = *MMTIME
|
---|
| 62 |
|
---|
| 63 | Const MAKEFOURCC(ch0, ch1, ch2, ch3) = (((ch0 As Byte) or ((ch1 As Byte)<<8) or ((ch2 As Byte)<<16) or ((ch3 As Byte)<<24)) As DWord)
|
---|
| 64 |
|
---|
| 65 | ' types for wType field in MMTIME struct
|
---|
| 66 | Const TIME_MS = &H0001
|
---|
| 67 | Const TIME_SAMPLES = &H0002
|
---|
| 68 | Const TIME_BYTES = &H0004
|
---|
| 69 | Const TIME_SMPTE = &H0008
|
---|
| 70 | Const TIME_MIDI = &H0010
|
---|
| 71 | Const TIME_TICKS = &H0020
|
---|
| 72 |
|
---|
| 73 | '----------------------------------------
|
---|
| 74 | ' Multimedia Extensions Window Messages
|
---|
| 75 |
|
---|
| 76 | Const MM_JOY1MOVE = &H3A0 'joystick
|
---|
| 77 | Const MM_JOY2MOVE = &H3A1
|
---|
| 78 | Const MM_JOY1ZMOVE = &H3A2
|
---|
| 79 | Const MM_JOY2ZMOVE = &H3A3
|
---|
| 80 | Const MM_JOY1BUTTONDOWN = &H3B5
|
---|
| 81 | Const MM_JOY2BUTTONDOWN = &H3B6
|
---|
| 82 | Const MM_JOY1BUTTONUP = &H3B7
|
---|
| 83 | Const MM_JOY2BUTTONUP = &H3B8
|
---|
| 84 |
|
---|
| 85 | Const MM_MCINOTIFY = &H3B9 'MCI
|
---|
| 86 | Const MCI_NOTIFY_SUCCESSFUL = &H0001
|
---|
| 87 | Const MCI_NOTIFY_SUPERSEDED = &H0002
|
---|
| 88 | Const MCI_NOTIFY_ABORTED = &H0004
|
---|
| 89 | Const MCI_NOTIFY_FAILURE = &H0008
|
---|
| 90 |
|
---|
| 91 | Const MM_WOM_OPEN = &H3BB 'waveform output
|
---|
| 92 | Const MM_WOM_CLOSE = &H3BC
|
---|
| 93 | Const MM_WOM_DONE = &H3BD
|
---|
| 94 |
|
---|
| 95 | Const MM_WIM_OPEN = &H3BE 'waveform input
|
---|
| 96 | Const MM_WIM_CLOSE = &H3BF
|
---|
| 97 | Const MM_WIM_DATA = &H3C0
|
---|
| 98 |
|
---|
| 99 | Const MM_MIM_OPEN = &H3C1 'MIDI input
|
---|
| 100 | Const MM_MIM_CLOSE = &H3C2
|
---|
| 101 | Const MM_MIM_DATA = &H3C3
|
---|
| 102 | Const MM_MIM_LONGDATA = &H3C4
|
---|
| 103 | Const MM_MIM_ERROR = &H3C5
|
---|
| 104 | Const MM_MIM_LONGERROR = &H3C6
|
---|
| 105 |
|
---|
| 106 | Const MM_MOM_OPEN = &H3C7 'MIDI output
|
---|
| 107 | Const MM_MOM_CLOSE = &H3C8
|
---|
| 108 | Const MM_MOM_DONE = &H3C9
|
---|
| 109 |
|
---|
| 110 | Const MM_DRVM_OPEN = &H3D0 'installable drivers
|
---|
| 111 | Const MM_DRVM_CLOSE = &H3D1
|
---|
| 112 | Const MM_DRVM_DATA = &H3D2
|
---|
| 113 | Const MM_DRVM_ERROR = &H3D3
|
---|
| 114 |
|
---|
| 115 | Const MM_STREAM_OPEN = &H3D4
|
---|
| 116 | Const MM_STREAM_CLOSE = &H3D5
|
---|
| 117 | Const MM_STREAM_DONE = &H3D6
|
---|
| 118 | Const MM_STREAM_ERROR = &H3D7
|
---|
| 119 |
|
---|
| 120 | Const MM_MOM_POSITIONCB = &H3CA
|
---|
| 121 |
|
---|
| 122 | Const MM_MCISIGNAL = &H3CB
|
---|
| 123 |
|
---|
| 124 | Const MM_MIM_MOREDATA = &H3CC 'MIM_DONE w/ pending events
|
---|
| 125 |
|
---|
| 126 | Const MM_MIXM_LINE_CHANGE = &H3D0 'mixer line change notify
|
---|
| 127 | Const MM_MIXM_CONTROL_CHANGE =&H3D1 'mixer control change notify
|
---|
| 128 |
|
---|
| 129 |
|
---|
| 130 | '----------------------------------------------
|
---|
| 131 | ' String resource number bases (internal use)
|
---|
| 132 |
|
---|
| 133 | Const MMSYSERR_BASE = 0
|
---|
| 134 | Const WAVERR_BASE = 32
|
---|
| 135 | Const MIDIERR_BASE = 64
|
---|
| 136 | Const TIMERR_BASE = 96
|
---|
| 137 | Const JOYERR_BASE = 160
|
---|
| 138 | Const MCIERR_BASE = 256
|
---|
| 139 | Const MIXERR_BASE = 1024
|
---|
| 140 |
|
---|
| 141 | Const MCI_STRING_OFFSET = 512
|
---|
| 142 | Const MCI_VD_OFFSET = 1024
|
---|
| 143 | Const MCI_CD_OFFSET = 1088
|
---|
| 144 | Const MCI_WAVE_OFFSET = 1152
|
---|
| 145 | Const MCI_SEQ_OFFSET = 1216
|
---|
| 146 |
|
---|
| 147 |
|
---|
| 148 | '----------------------------------------------
|
---|
| 149 | ' General error return values
|
---|
| 150 |
|
---|
| 151 | Const MMSYSERR_NOERROR = 0 'no error
|
---|
| 152 | Const MMSYSERR_ERROR = (MMSYSERR_BASE + 1) 'unspecified error
|
---|
| 153 | Const MMSYSERR_BADDEVICEID = (MMSYSERR_BASE + 2) 'device ID out of range
|
---|
| 154 | Const MMSYSERR_NOTENABLED = (MMSYSERR_BASE + 3) 'driver failed enable
|
---|
| 155 | Const MMSYSERR_ALLOCATED = (MMSYSERR_BASE + 4) 'device already allocated
|
---|
| 156 | Const MMSYSERR_INVALHANDLE = (MMSYSERR_BASE + 5) 'device handle is invalid
|
---|
| 157 | Const MMSYSERR_NODRIVER = (MMSYSERR_BASE + 6) 'no device driver present
|
---|
| 158 | Const MMSYSERR_NOMEM = (MMSYSERR_BASE + 7) 'memory allocation error
|
---|
| 159 | Const MMSYSERR_NOTSUPPORTED= (MMSYSERR_BASE + 8) 'function isn't supported
|
---|
| 160 | Const MMSYSERR_BADERRNUM = (MMSYSERR_BASE + 9) 'error value out of range
|
---|
| 161 | Const MMSYSERR_INVALFLAG = (MMSYSERR_BASE + 10) 'invalid flag passed
|
---|
| 162 | Const MMSYSERR_INVALPARAM = (MMSYSERR_BASE + 11) 'invalid parameter passed
|
---|
| 163 | Const MMSYSERR_HANDLEBUSY = (MMSYSERR_BASE + 12) 'handle being used
|
---|
| 164 | Const MMSYSERR_INVALIDALIAS= (MMSYSERR_BASE + 13) 'specified alias not found
|
---|
| 165 | Const MMSYSERR_BADDB = (MMSYSERR_BASE + 14) 'bad registry database
|
---|
| 166 | Const MMSYSERR_KEYNOTFOUND = (MMSYSERR_BASE + 15) 'registry key not found
|
---|
| 167 | Const MMSYSERR_READERROR = (MMSYSERR_BASE + 16) 'registry read error
|
---|
| 168 | Const MMSYSERR_WRITEERROR = (MMSYSERR_BASE + 17) 'registry write error
|
---|
| 169 | Const MMSYSERR_DELETEERROR = (MMSYSERR_BASE + 18) 'registry delete error
|
---|
| 170 | Const MMSYSERR_VALNOTFOUND = (MMSYSERR_BASE + 19) 'registry value not found
|
---|
| 171 | Const MMSYSERR_NODRIVERCB = (MMSYSERR_BASE + 20) 'driver does not call DriverCallback
|
---|
| 172 | Const MMSYSERR_LASTERROR = (MMSYSERR_BASE + 20) 'last error in range
|
---|
| 173 |
|
---|
| 174 |
|
---|
| 175 | '--------------------------------------------------------
|
---|
| 176 | ' Installable driver support
|
---|
| 177 |
|
---|
| 178 | Type _System_DeclareHandle_HDRVR:unused As DWord:End Type
|
---|
| 179 | TypeDef HDRVR = *_System_DeclareHandle_HDRVR
|
---|
| 180 |
|
---|
| 181 | Type DRVCONFIGINFOEX
|
---|
| 182 | dwDCISize As DWord
|
---|
| 183 | lpszDCISectionName As LPCWSTR
|
---|
| 184 | lpszDCIAliasName As LPCWSTR
|
---|
| 185 | dnDevNode As DWORD
|
---|
| 186 | End Type
|
---|
| 187 | TypeDef PDRVCONFIGINFOEX = *DRVCONFIGINFOEX
|
---|
| 188 | TypeDef LPDRVCONFIGINFOEX = *DRVCONFIGINFOEX
|
---|
| 189 |
|
---|
| 190 | ' Driver messages
|
---|
| 191 | Const DRV_LOAD = &H0001
|
---|
| 192 | Const DRV_ENABLE = &H0002
|
---|
| 193 | Const DRV_OPEN = &H0003
|
---|
| 194 | Const DRV_CLOSE = &H0004
|
---|
| 195 | Const DRV_DISABLE = &H0005
|
---|
| 196 | Const DRV_FREE = &H0006
|
---|
| 197 | Const DRV_CONFIGURE = &H0007
|
---|
| 198 | Const DRV_QUERYCONFIGURE = &H0008
|
---|
| 199 | Const DRV_INSTALL = &H0009
|
---|
| 200 | Const DRV_REMOVE = &H000A
|
---|
| 201 | Const DRV_EXITSESSION = &H000B
|
---|
| 202 | Const DRV_POWER = &H000F
|
---|
| 203 | Const DRV_RESERVED = &H0800
|
---|
| 204 | Const DRV_USER = &H4000
|
---|
| 205 |
|
---|
| 206 | Type DRVCONFIGINFO
|
---|
| 207 | dwDCISize As DWord
|
---|
| 208 | lpszDCISectionName As LPCWSTR
|
---|
| 209 | lpszDCIAliasName As LPCWSTR
|
---|
| 210 | End Type
|
---|
| 211 | TypeDef PDRVCONFIGINFO = *DRVCONFIGINFO
|
---|
| 212 | TypeDef LPDRVCONFIGINFO = *DRVCONFIGINFO
|
---|
| 213 |
|
---|
| 214 | ' Supported return values for DRV_CONFIGURE message
|
---|
| 215 | Const DRVCNF_CANCEL = &H0000
|
---|
| 216 | Const DRVCNF_OK = &H0001
|
---|
| 217 | Const DRVCNF_RESTART = &H0002
|
---|
| 218 |
|
---|
| 219 | TypeDef DRIVERPROC = *Function(dwDriverId As DWord, hdrvr As HDRVR, msg As DWord, lParam1 As LPARAM, lParam2 As LPARAM) As LRESULT
|
---|
| 220 |
|
---|
| 221 | Declare Function CloseDriver Lib "winmm" (hDriver As HDRVR, lParam1 As Long, lParam2 As Long) As LRESULT
|
---|
| 222 | Declare Function OpenDriver Lib "winmm" (szDriverName As LPCWSTR, szSectionName As LPCWSTR, lParam2 As Long) As HDRVR
|
---|
| 223 | Declare Function SendDriverMessage Lib "winmm" (hDriver As HDRVR, message As DWord, lParam1 As Long, lParam2 As Long) As LRESULT
|
---|
| 224 | Declare Function GetDriverModuleHandle Lib "winmm" (hDriver As HDRVR) As HMODULE
|
---|
| 225 | Declare Function DefDriverProc Lib "winmm" (dwDriverIdentifier As DWord, hdrvr As HDRVR, uMsg As DWord, lParam1 As LPARAM, lParam2 As LPARAM) As LRESULT
|
---|
| 226 |
|
---|
| 227 | Declare Function DrvClose Lib "winmm" Alias "CloseDriver" (hDriver As HDRVR, lParam1 As Long, lParam2 As Long) As LRESULT
|
---|
| 228 | Declare Function DrvOpen Lib "winmm" Alias "OpenDriver" (szDriverName As LPCWSTR, szSectionName As LPCWSTR, lParam2 As Long) As HDRVR
|
---|
| 229 | Declare Function DrvSendMessage Lib "winmm" Alias "SendDriverMessage" (hDriver As HDRVR, message As DWord, lParam1 As Long, lParam2 As Long) As LRESULT
|
---|
| 230 | Declare Function DrvGetModuleHandle Lib "winmm" Alias "GetDriverModuleHandle" (hDriver As HDRVR) As HMODULE
|
---|
| 231 | Declare Function DrvDefDriverProc Lib "winmm" Alias "DefDriverProc" (dwDriverIdentifier As DWord, hdrvr As HDRVR, uMsg As DWord, lParam1 As LPARAM, lParam2 As LPARAM) As LRESULT
|
---|
| 232 |
|
---|
| 233 | ' return values from DriverProc() function
|
---|
| 234 | Const DRV_CANCEL = DRVCNF_CANCEL
|
---|
| 235 | Const DRV_OK = DRVCNF_OK
|
---|
| 236 | Const DRV_RESTART = DRVCNF_RESTART
|
---|
| 237 |
|
---|
| 238 | Const DRV_MCI_FIRST = DRV_RESERVED
|
---|
| 239 | Const DRV_MCI_LAST = (DRV_RESERVED + &HFFF)
|
---|
| 240 |
|
---|
| 241 |
|
---|
| 242 | '--------------------------------------------------------
|
---|
| 243 | ' Driver callback support
|
---|
| 244 | Const CALLBACK_TYPEMASK = &H00070000 'callback type mask
|
---|
| 245 | Const CALLBACK_NULL = &H00000000 'no callback
|
---|
| 246 | Const CALLBACK_WINDOW = &H00010000 'dwCallback is a HWND
|
---|
| 247 | Const CALLBACK_TASK = &H00020000 'dwCallback is a HTASK
|
---|
| 248 | Const CALLBACK_FUNCTION = &H00030000 'dwCallback is a FARPROC
|
---|
| 249 | Const CALLBACK_THREAD = (CALLBACK_TASK)'thread ID replaces 16 bit task
|
---|
| 250 | Const CALLBACK_EVENT = &H00050000 'dwCallback is an EVENT Handle
|
---|
| 251 |
|
---|
| 252 | TypeDef DRVCALLBACK = *Sub(hdrvr As HDRVR, uMsg As DWord, dwUser As DWord, dw1 As DWord, dw2 As DWord)
|
---|
| 253 | TypeDef PDRVCALLBACK = *DRVCALLBACK
|
---|
| 254 | TypeDef LPDRVCALLBACK = *DRVCALLBACK
|
---|
| 255 |
|
---|
| 256 |
|
---|
| 257 | '--------------------------------------------------------
|
---|
| 258 | ' General MMSYSTEM support
|
---|
| 259 |
|
---|
| 260 | Declare Function mmsystemGetVersion Lib "winmm" () As DWord
|
---|
| 261 |
|
---|
| 262 |
|
---|
| 263 |
|
---|
| 264 | '--------------------------------------------------------
|
---|
| 265 | ' Sound support
|
---|
| 266 |
|
---|
| 267 | Declare Function sndPlaySound Lib "winmm" Alias "sndPlaySoundA" (pszSound As PCSTR, fuSound As DWord) As BOOL
|
---|
| 268 |
|
---|
| 269 | Const SND_SYNC = &H0000
|
---|
| 270 | Const SND_ASYNC = &H0001
|
---|
| 271 | Const SND_NODEFAULT = &H0002
|
---|
| 272 | Const SND_MEMORY = &H0004
|
---|
| 273 | Const SND_LOOP = &H0008
|
---|
| 274 | Const SND_NOSTOP = &H0010
|
---|
| 275 | Const SND_NOWAIT = &H00002000
|
---|
| 276 | Const SND_ALIAS = &H00010000
|
---|
| 277 | Const SND_ALIAS_ID = &H00110000
|
---|
| 278 | Const SND_FILENAME = &H00020000
|
---|
| 279 | Const SND_RESOURCE = &H00040004
|
---|
| 280 | Const SND_PURGE = &H0040
|
---|
| 281 | Const SND_APPLICATION = &H0080
|
---|
| 282 | Const SND_ALIAS_START = 0
|
---|
| 283 |
|
---|
| 284 | Const sndAlias(ch0, ch1) = (SND_ALIAS_START + ((&HFF AND ch0) OR (&HFF AND ch1)<<8))
|
---|
| 285 |
|
---|
| 286 | Const SND_ALIAS_SYSTEMASTERISK = sndAlias(&H53, &H2A)
|
---|
| 287 | Const SND_ALIAS_SYSTEMQUESTION = sndAlias(&H53, &H3F)
|
---|
| 288 | Const SND_ALIAS_SYSTEMHAND = sndAlias(&H53, &H48)
|
---|
| 289 | Const SND_ALIAS_SYSTEMEXIT = sndAlias(&H53, &H45)
|
---|
| 290 | Const SND_ALIAS_SYSTEMSTART = sndAlias(&H53, &H53)
|
---|
| 291 | Const SND_ALIAS_SYSTEMWELCOME = sndAlias(&H53, &H57)
|
---|
| 292 | Const SND_ALIAS_SYSTEMEXCLAMATION = sndAlias(&H53, &H21)
|
---|
| 293 | Const SND_ALIAS_SYSTEMDEFAULT = sndAlias(&H53, &H44)
|
---|
| 294 |
|
---|
| 295 | Declare Function PlaySound Lib "winmm" Alias "PlaySoundA" (pszSound As PCSTR, hmod As HMODULE, fdwSound As DWord) As BOOL
|
---|
| 296 |
|
---|
| 297 |
|
---|
| 298 | '--------------------------------------------------------
|
---|
| 299 | ' Waveform audio support
|
---|
| 300 |
|
---|
| 301 | ' waveform audio error return values
|
---|
| 302 | Const WAVERR_BADFORMAT = (WAVERR_BASE + 0)
|
---|
| 303 | Const WAVERR_STILLPLAYING = (WAVERR_BASE + 1)
|
---|
| 304 | Const WAVERR_UNPREPARED = (WAVERR_BASE + 2)
|
---|
| 305 | Const WAVERR_SYNC = (WAVERR_BASE + 3)
|
---|
| 306 | Const WAVERR_LASTERROR = (WAVERR_BASE + 3)
|
---|
| 307 |
|
---|
| 308 | ' waveform audio data types
|
---|
| 309 | Type _System_DeclareHandle_HWAVE:unused As DWord:End Type
|
---|
| 310 | TypeDef HWAVE = *_System_DeclareHandle_HWAVE
|
---|
| 311 | Type _System_DeclareHandle_HWAVEIN:unused As DWord:End Type
|
---|
| 312 | TypeDef HWAVEIN = *_System_DeclareHandle_HWAVEIN
|
---|
| 313 | Type _System_DeclareHandle_HWAVEOUT:unused As DWord:End Type
|
---|
| 314 | TypeDef HWAVEOUT = *_System_DeclareHandle_HWAVEOUT
|
---|
| 315 |
|
---|
| 316 | TypeDef WAVECALLBACK = DRVCALLBACK
|
---|
| 317 | TypeDef LPWAVECALLBACK = *WAVECALLBACK
|
---|
| 318 |
|
---|
| 319 | ' wave callback messages
|
---|
| 320 | Const WOM_OPEN = MM_WOM_OPEN
|
---|
| 321 | Const WOM_CLOSE = MM_WOM_CLOSE
|
---|
| 322 | Const WOM_DONE = MM_WOM_DONE
|
---|
| 323 | Const WIM_OPEN = MM_WIM_OPEN
|
---|
| 324 | Const WIM_CLOSE = MM_WIM_CLOSE
|
---|
| 325 | Const WIM_DATA = MM_WIM_DATA
|
---|
| 326 |
|
---|
| 327 | ' device ID for wave device mapper
|
---|
| 328 | Const WAVE_MAPPER = (-1)
|
---|
| 329 |
|
---|
| 330 | ' flags for dwFlags parameter in waveOutOpen() and waveInOpen()
|
---|
| 331 | Const WAVE_FORMAT_QUERY = &H0001
|
---|
| 332 | Const WAVE_ALLOWSYNC = &H0002
|
---|
| 333 | Const WAVE_MAPPED = &H0004
|
---|
| 334 | Const WAVE_FORMAT_DIRECT = &H0008
|
---|
| 335 | Const WAVE_FORMAT_DIRECT_QUERY = (WAVE_FORMAT_QUERY OR WAVE_FORMAT_DIRECT)
|
---|
| 336 |
|
---|
| 337 | ' wave data block header
|
---|
| 338 | Type WAVEHDR
|
---|
| 339 | lpData As LPSTR
|
---|
| 340 | dwBufferLength As DWord
|
---|
| 341 | dwBytesRecorded As DWord
|
---|
| 342 | dwUser As DWord
|
---|
| 343 | dwFlags As DWord
|
---|
| 344 | dwLoops As DWord
|
---|
| 345 | lpNext As *WAVEHDR
|
---|
| 346 | reserved As DWord
|
---|
| 347 | End Type
|
---|
| 348 | TypeDef PWAVEHDR = *WAVEHDR
|
---|
| 349 | TypeDef LPWAVEHDR = *WAVEHDR
|
---|
| 350 |
|
---|
| 351 | ' flags for dwFlags field of WAVEHDR
|
---|
| 352 | Const WHDR_DONE = &H00000001
|
---|
| 353 | Const WHDR_PREPARED = &H00000002
|
---|
| 354 | Const WHDR_BEGINLOOP = &H00000004
|
---|
| 355 | Const WHDR_ENDLOOP = &H00000008
|
---|
| 356 | Const WHDR_INQUEUE = &H00000010
|
---|
| 357 |
|
---|
| 358 | ' waveform output device capabilities structure
|
---|
| 359 | Type WAVEOUTCAPSA
|
---|
| 360 | wMid As Word
|
---|
| 361 | wPid As Word
|
---|
| 362 | vDriverVersion As MMVERSION
|
---|
| 363 | szPname[ELM(MAXPNAMELEN)] As Char
|
---|
| 364 | dwFormats As DWord
|
---|
| 365 | wChannels As Word
|
---|
| 366 | wReserved1 As Word
|
---|
| 367 | dwSupport As DWord
|
---|
| 368 | End Type
|
---|
| 369 | TypeDef PWAVEOUTCAPSA = *WAVEOUTCAPSA
|
---|
| 370 | TypeDef LPWAVEOUTCAPSA = *WAVEOUTCAPSA
|
---|
| 371 |
|
---|
| 372 | TypeDef WAVEOUTCAPS = WAVEOUTCAPSA
|
---|
| 373 | TypeDef PWAVEOUTCAPS = PWAVEOUTCAPSA
|
---|
| 374 | TypeDef LPWAVEOUTCAPS = LPWAVEOUTCAPSA
|
---|
| 375 |
|
---|
| 376 | ' flags for dwSupport field of WAVEOUTCAPS
|
---|
| 377 | Const WAVECAPS_PITCH = &H0001
|
---|
| 378 | Const WAVECAPS_PLAYBACKRATE = &H0002
|
---|
| 379 | Const WAVECAPS_VOLUME = &H0004
|
---|
| 380 | Const WAVECAPS_LRVOLUME = &H0008
|
---|
| 381 | Const WAVECAPS_SYNC = &H0010
|
---|
| 382 | Const WAVECAPS_SAMPLEACCURATE = &H0020
|
---|
| 383 | Const WAVECAPS_DIRECTSOUND = &H0040
|
---|
| 384 |
|
---|
| 385 | ' waveform input device capabilities structure
|
---|
| 386 | Type WAVEINCAPSA
|
---|
| 387 | wMid As Word
|
---|
| 388 | wPid As Word
|
---|
| 389 | vDriverVersion As MMVERSION
|
---|
| 390 | szPname[ELM(MAXPNAMELEN)] As Char
|
---|
| 391 | dwFormats As DWord
|
---|
| 392 | wChannels As Word
|
---|
| 393 | wReserved1 As Word
|
---|
| 394 | End Type
|
---|
| 395 | TypeDef PWAVEINCAPSA = *WAVEINCAPSA
|
---|
| 396 | TypeDef LPWAVEINCAPSA = *WAVEINCAPSA
|
---|
| 397 |
|
---|
| 398 | TypeDef WAVEINCAPS = WAVEINCAPSA
|
---|
| 399 | TypeDef PWAVEINCAPS = PWAVEINCAPSA
|
---|
| 400 | TypeDef LPWAVEINCAPS = LPWAVEINCAPSA
|
---|
| 401 |
|
---|
| 402 | ' defines for dwFormat field of WAVEINCAPS and WAVEOUTCAPS
|
---|
| 403 | Const WAVE_INVALIDFORMAT = &H00000000 ' invalid format
|
---|
| 404 | Const WAVE_FORMAT_1M08 = &H00000001 ' 11.025 kHz, Mono, 8-bit
|
---|
| 405 | Const WAVE_FORMAT_1S08 = &H00000002 ' 11.025 kHz, Stereo, 8-bit
|
---|
| 406 | Const WAVE_FORMAT_1M16 = &H00000004 ' 11.025 kHz, Mono, 16-bit
|
---|
| 407 | Const WAVE_FORMAT_1S16 = &H00000008 ' 11.025 kHz, Stereo, 16-bit
|
---|
| 408 | Const WAVE_FORMAT_2M08 = &H00000010 ' 22.05 kHz, Mono, 8-bit
|
---|
| 409 | Const WAVE_FORMAT_2S08 = &H00000020 ' 22.05 kHz, Stereo, 8-bit
|
---|
| 410 | Const WAVE_FORMAT_2M16 = &H00000040 ' 22.05 kHz, Mono, 16-bit
|
---|
| 411 | Const WAVE_FORMAT_2S16 = &H00000080 ' 22.05 kHz, Stereo, 16-bit
|
---|
| 412 | Const WAVE_FORMAT_4M08 = &H00000100 ' 44.1 kHz, Mono, 8-bit
|
---|
| 413 | Const WAVE_FORMAT_4S08 = &H00000200 ' 44.1 kHz, Stereo, 8-bit
|
---|
| 414 | Const WAVE_FORMAT_4M16 = &H00000400 ' 44.1 kHz, Mono, 16-bit
|
---|
| 415 | Const WAVE_FORMAT_4S16 = &H00000800 ' 44.1 kHz, Stereo, 16-bit
|
---|
| 416 |
|
---|
| 417 | ' OLD general waveform format structure (information common to all formats)
|
---|
| 418 | Type WAVEFORMAT
|
---|
| 419 | wFormatTag As Word
|
---|
| 420 | nChannels As Word
|
---|
| 421 | nSamplesPerSec As DWord
|
---|
| 422 | nAvgBytesPerSec As DWord
|
---|
| 423 | nBlockAlign As Word
|
---|
| 424 | End Type
|
---|
| 425 | TypeDef PWAVEFORMAT = *WAVEFORMAT
|
---|
| 426 | TypeDef LPWAVEFORMAT = *WAVEFORMAT
|
---|
| 427 |
|
---|
| 428 | ' flags for wFormatTag field of WAVEFORMAT
|
---|
| 429 | Const WAVE_FORMAT_PCM = 1
|
---|
| 430 |
|
---|
| 431 | ' specific waveform format structure for PCM data
|
---|
| 432 | Type PCMWAVEFORMAT
|
---|
| 433 | wf As WAVEFORMAT
|
---|
| 434 | wBitsPerSample As Word
|
---|
| 435 | End Type
|
---|
| 436 | TypeDef PPCMWAVEFORMAT = *PCMWAVEFORMAT
|
---|
| 437 | TypeDef LPPCMWAVEFORMAT = *PCMWAVEFORMAT
|
---|
| 438 |
|
---|
| 439 | Type WAVEFORMATEX
|
---|
| 440 | wFormatTag As Word
|
---|
| 441 | nChannels As Word
|
---|
| 442 | nSamplesPerSec As DWord
|
---|
| 443 | nAvgBytesPerSec As DWord
|
---|
| 444 | nBlockAlign As Word
|
---|
| 445 | wBitsPerSample As Word
|
---|
| 446 | cbSize As Word
|
---|
| 447 | End Type
|
---|
| 448 | TypeDef PWAVEFORMATEX = *WAVEFORMATEX
|
---|
| 449 | TypeDef LPWAVEFORMATEX = *WAVEFORMATEX
|
---|
| 450 | TypeDef LPCWAVEFORMATEX = *WAVEFORMATEX
|
---|
| 451 |
|
---|
| 452 | ' waveform audio function prototypes
|
---|
| 453 | Declare Function waveOutGetNumDevs Lib "winmm" () As DWord
|
---|
| 454 | Declare Function waveOutGetDevCaps Lib "winmm" Alias "waveOutGetDevCapsA" (uDeviceID As DWord, ByRef pwoc As WAVEOUTCAPS, cbwoc As DWord) As MMRESULT
|
---|
| 455 | Declare Function waveOutGetVolume Lib "winmm" (hwo As HWAVEOUT, ByRef pdwVolume As DWord) As MMRESULT
|
---|
| 456 | Declare Function waveOutSetVolume Lib "winmm" (hwo As HWAVEOUT, dwVolume As DWord) As MMRESULT
|
---|
| 457 | Declare Function waveOutGetErrorText Lib "winmm" Alias "waveOutGetErrorTextA" (mmrError As MMRESULT, pszText As LPSTR, cchText As DWord) As MMRESULT
|
---|
| 458 | Declare Function waveOutOpen Lib "winmm" (ByRef phwo As HWAVEOUT, uDeviceID As DWord, ByRef pwfx As WAVEFORMATEX, dwCallback As DWord, dwInstance As DWord, fdwOpen As DWord) As MMRESULT
|
---|
| 459 | Declare Function waveOutClose Lib "winmm" (hwo As HWAVEOUT) As MMRESULT
|
---|
| 460 | Declare Function waveOutPrepareHeader Lib "winmm" (hwo As HWAVEOUT, ByRef pwh As WAVEHDR, cbwh As DWord) As MMRESULT
|
---|
| 461 | Declare Function waveOutUnprepareHeader Lib "winmm" (hwo As HWAVEOUT, ByRef pwh As WAVEHDR, cbwh As DWord) As MMRESULT
|
---|
| 462 | Declare Function waveOutWrite Lib "winmm" (hwo As HWAVEOUT, ByRef pwh As WAVEHDR, cbwh As DWord) As MMRESULT
|
---|
| 463 | Declare Function waveOutPause Lib "winmm" (hwo As HWAVEOUT) As MMRESULT
|
---|
| 464 | Declare Function waveOutRestart Lib "winmm" (hwo As HWAVEOUT) As MMRESULT
|
---|
| 465 | Declare Function waveOutReset Lib "winmm" (hwo As HWAVEOUT) As MMRESULT
|
---|
| 466 | Declare Function waveOutBreakLoop Lib "winmm" (hwo As HWAVEOUT) As MMRESULT
|
---|
| 467 | Declare Function waveOutGetPosition Lib "winmm" (hwo As HWAVEOUT, ByRef pmmt As MMTIME, cbmmt As DWord) As MMRESULT
|
---|
| 468 | Declare Function waveOutGetPitch Lib "winmm" (hwo As HWAVEOUT, ByRef pdwPitch As DWord) As MMRESULT
|
---|
| 469 | Declare Function waveOutSetPitch Lib "winmm" (hwo As HWAVEOUT, dwPitch As DWord) As MMRESULT
|
---|
| 470 | Declare Function waveOutGetPlaybackRate Lib "winmm" (hwo As HWAVEOUT, ByRef pdwRate As DWord) As MMRESULT
|
---|
| 471 | Declare Function waveOutSetPlaybackRate Lib "winmm" (hwo As HWAVEOUT, dwRate As DWord) As MMRESULT
|
---|
| 472 | Declare Function waveOutGetID Lib "winmm" (hwo As HWAVEOUT, ByRef puDeviceID As DWord) As MMRESULT
|
---|
| 473 | Declare Function waveOutMessage Lib "winmm" (hwo As HWAVEOUT, uMsg As DWord, dw1 As DWord, dw2 As DWord) As MMRESULT
|
---|
| 474 |
|
---|
| 475 | Declare Function waveInGetNumDevs Lib "winmm" () As DWord
|
---|
| 476 | Declare Function waveInGetDevCaps Lib "winmm" Alias "waveInGetDevCapsA" (uDeviceID As DWord, ByRef pwic As WAVEINCAPS, cbwic As DWord) As MMRESULT
|
---|
| 477 | Declare Function waveInGetErrorText Lib "winmm" Alias "waveInGetErrorTextA" (mmrError As MMRESULT, pszText As LPSTR, cchText As DWord) As MMRESULT
|
---|
| 478 | Declare Function waveInOpen Lib "winmm" (ByRef phwi As HWAVEIN, uDeviceID As DWord, ByRef pwfx As WAVEFORMATEX, dwCallback As DWord, dwInstance As DWord, fdwOpen As DWord) As MMRESULT
|
---|
| 479 | Declare Function waveInClose Lib "winmm" (hwi As HWAVEIN) As MMRESULT
|
---|
| 480 | Declare Function waveInPrepareHeader Lib "winmm" (hwi As HWAVEIN, ByRef pwh As WAVEHDR, cbwh As DWord) As MMRESULT
|
---|
| 481 | Declare Function waveInUnprepareHeader Lib "winmm" (hwi As HWAVEIN, ByRef pwh As WAVEHDR, cbwh As DWord) As MMRESULT
|
---|
| 482 | Declare Function waveInAddBuffer Lib "winmm" (hwi As HWAVEIN, ByRef pwh As WAVEHDR, cbwh As DWord) As MMRESULT
|
---|
| 483 | Declare Function waveInStart Lib "winmm" (hwi As HWAVEIN) As MMRESULT
|
---|
| 484 | Declare Function waveInStop Lib "winmm" (hwi As HWAVEIN) As MMRESULT
|
---|
| 485 | Declare Function waveInReset Lib "winmm" (hwi As HWAVEIN) As MMRESULT
|
---|
| 486 | Declare Function waveInGetPosition Lib "winmm" (hwi As HWAVEIN, ByRef pmmt As MMTIME, cbmmt As DWord) As MMRESULT
|
---|
| 487 | Declare Function waveInGetID Lib "winmm" (hwi As HWAVEIN, ByRef puDeviceID As DWord) As MMRESULT
|
---|
| 488 | Declare Function waveInMessage Lib "winmm" (hwi As HWAVEIN, uMsg As DWord, dw1 As DWord, dw2 As DWord) As MMRESULT
|
---|
| 489 |
|
---|
| 490 |
|
---|
| 491 |
|
---|
| 492 | '--------------------------------------------------------
|
---|
| 493 | ' MIDI audio support
|
---|
| 494 |
|
---|
| 495 | ' MIDI error return values
|
---|
| 496 | Const MIDIERR_UNPREPARED = (MIDIERR_BASE + 0)
|
---|
| 497 | Const MIDIERR_STILLPLAYING = (MIDIERR_BASE + 1)
|
---|
| 498 | Const MIDIERR_NOMAP = (MIDIERR_BASE + 2)
|
---|
| 499 | Const MIDIERR_NOTREADY = (MIDIERR_BASE + 3)
|
---|
| 500 | Const MIDIERR_NODEVICE = (MIDIERR_BASE + 4)
|
---|
| 501 | Const MIDIERR_INVALIDSETUP = (MIDIERR_BASE + 5)
|
---|
| 502 | Const MIDIERR_BADOPENMODE = (MIDIERR_BASE + 6)
|
---|
| 503 | Const MIDIERR_DONT_CONTINUE = (MIDIERR_BASE + 7)
|
---|
| 504 | Const MIDIERR_LASTERROR = (MIDIERR_BASE + 7)
|
---|
| 505 |
|
---|
| 506 | ' MIDI audio data types
|
---|
| 507 | Type _System_DeclareHandle_HMIDI:unused As DWord:End Type
|
---|
| 508 | TypeDef HMIDI = *_System_DeclareHandle_HMIDI
|
---|
| 509 | Type _System_DeclareHandle_HMIDIIN:unused As DWord:End Type
|
---|
| 510 | TypeDef HMIDIIN = *_System_DeclareHandle_HMIDIIN
|
---|
| 511 | Type _System_DeclareHandle_HMIDIOUT:unused As DWord:End Type
|
---|
| 512 | TypeDef HMIDIOUT = *_System_DeclareHandle_HMIDIOUT
|
---|
| 513 | Type _System_DeclareHandle_HMIDISTRM:unused As DWord:End Type
|
---|
| 514 | TypeDef HMIDISTRM = *_System_DeclareHandle_HMIDISTRM
|
---|
| 515 |
|
---|
| 516 | TypeDef MIDICALLBACK = DRVCALLBACK
|
---|
| 517 | TypeDef LPMIDICALLBACK = *MIDICALLBACK
|
---|
| 518 |
|
---|
| 519 | Const MIDIPATCHSIZE = 128
|
---|
| 520 |
|
---|
| 521 | TypeDef LPPATCHARRAY = *Word
|
---|
| 522 | TypeDef LPKEYARRAY = *Word
|
---|
| 523 |
|
---|
| 524 | ' MIDI callback messages
|
---|
| 525 | Const MIM_OPEN = MM_MIM_OPEN
|
---|
| 526 | Const MIM_CLOSE = MM_MIM_CLOSE
|
---|
| 527 | Const MIM_DATA = MM_MIM_DATA
|
---|
| 528 | Const MIM_LONGDATA = MM_MIM_LONGDATA
|
---|
| 529 | Const MIM_ERROR = MM_MIM_ERROR
|
---|
| 530 | Const MIM_LONGERROR = MM_MIM_LONGERROR
|
---|
| 531 | Const MOM_OPEN = MM_MOM_OPEN
|
---|
| 532 | Const MOM_CLOSE = MM_MOM_CLOSE
|
---|
| 533 | Const MOM_DONE = MM_MOM_DONE
|
---|
| 534 | Const MIM_MOREDATA = MM_MIM_MOREDATA
|
---|
| 535 | Const MOM_POSITIONCB = MM_MOM_POSITIONCB
|
---|
| 536 |
|
---|
| 537 | ' device ID for MIDI mapper
|
---|
| 538 | Const MIDIMAPPER = (-1)
|
---|
| 539 | Const MIDI_MAPPER = (-1)
|
---|
| 540 |
|
---|
| 541 | Const MIDI_IO_STATUS = &H00000020
|
---|
| 542 |
|
---|
| 543 | ' flags for wFlags parm of midiOutCachePatches(), midiOutCacheDrumPatches()
|
---|
| 544 | Const MIDI_CACHE_ALL = 1
|
---|
| 545 | Const MIDI_CACHE_BESTFIT = 2
|
---|
| 546 | Const MIDI_CACHE_QUERY = 3
|
---|
| 547 | Const MIDI_UNCACHE = 4
|
---|
| 548 |
|
---|
| 549 | ' MIDI output device capabilities structure
|
---|
| 550 | Type MIDIOUTCAPSA
|
---|
| 551 | wMid As Word
|
---|
| 552 | wPid As Word
|
---|
| 553 | vDriverVersion As MMVERSION
|
---|
| 554 | szPname[ELM(MAXPNAMELEN)] As Char
|
---|
| 555 | wTechnology As Word
|
---|
| 556 | wVoices As Word
|
---|
| 557 | wNotes As Word
|
---|
| 558 | wChannelMask As Word
|
---|
| 559 | dwSupport As DWord
|
---|
| 560 | End Type
|
---|
| 561 | TypeDef PMIDIOUTCAPSA = *MIDIOUTCAPSA
|
---|
| 562 | TypeDef LPMIDIOUTCAPSA = *MIDIOUTCAPSA
|
---|
| 563 |
|
---|
| 564 | TypeDef MIDIOUTCAPS = MIDIOUTCAPSA
|
---|
| 565 | TypeDef PMIDIOUTCAPS = PMIDIOUTCAPSA
|
---|
| 566 | TypeDef LPMIDIOUTCAPS = LPMIDIOUTCAPSA
|
---|
| 567 |
|
---|
| 568 | ' flags for wTechnology field of MIDIOUTCAPS structure
|
---|
| 569 | Const MOD_MIDIPORT = 1
|
---|
| 570 | Const MOD_SYNTH = 2
|
---|
| 571 | Const MOD_SQSYNTH = 3
|
---|
| 572 | Const MOD_FMSYNTH = 4
|
---|
| 573 | Const MOD_MAPPER = 5
|
---|
| 574 |
|
---|
| 575 | ' flags for dwSupport field of MIDIOUTCAPS structure
|
---|
| 576 | Const MIDICAPS_VOLUME = &H0001
|
---|
| 577 | Const MIDICAPS_LRVOLUME = &H0002
|
---|
| 578 | Const MIDICAPS_CACHE = &H0004
|
---|
| 579 | Const MIDICAPS_STREAM = &H0008
|
---|
| 580 |
|
---|
| 581 | ' MIDI input device capabilities structure
|
---|
| 582 | Type MIDIINCAPSA
|
---|
| 583 | wMid As Word
|
---|
| 584 | wPid As Word
|
---|
| 585 | vDriverVersion As MMVERSION
|
---|
| 586 | szPname[ELM(MAXPNAMELEN)] As Char
|
---|
| 587 | dwSupport As DWord
|
---|
| 588 | End Type
|
---|
| 589 | TypeDef PMIDIINCAPSA = *MIDIINCAPSA
|
---|
| 590 | TypeDef LPMIDIINCAPSA = *MIDIINCAPSA
|
---|
| 591 |
|
---|
| 592 | TypeDef MIDIINCAPS = MIDIINCAPSA
|
---|
| 593 | TypeDef PMIDIINCAPS = PMIDIINCAPSA
|
---|
| 594 | TypeDef LPMIDIINCAPS = LPMIDIINCAPSA
|
---|
| 595 |
|
---|
| 596 | ' MIDI data block header
|
---|
| 597 | Type MIDIHDR
|
---|
| 598 | lpData As LPSTR
|
---|
| 599 | dwBufferLength As DWord
|
---|
| 600 | dwBytesRecorded As DWord
|
---|
| 601 | dwUser As DWord
|
---|
| 602 | dwFlags As DWord
|
---|
| 603 | lpNext As *MIDIHDR
|
---|
| 604 | reserved As DWord
|
---|
| 605 | dwOffset As DWord
|
---|
| 606 | dwReserved[ELM(8)] As DWord
|
---|
| 607 | End Type
|
---|
| 608 | TypeDef PMIDIHDR = *MIDIHDR
|
---|
| 609 | TypeDef LPMIDIHDR = *MIDIHDR
|
---|
| 610 |
|
---|
| 611 | Type MIDIEVENT
|
---|
| 612 | dwDeltaTime As DWord
|
---|
| 613 | dwStreamID As DWord
|
---|
| 614 | dwEvent As DWord
|
---|
| 615 | dwParms[ELM(1)] As DWord
|
---|
| 616 | End Type
|
---|
| 617 |
|
---|
| 618 | Type MIDISTRMBUFFVER
|
---|
| 619 | dwVersion As DWord
|
---|
| 620 | dwMid As DWord
|
---|
| 621 | dwOEMVersion As DWord
|
---|
| 622 | End Type
|
---|
| 623 |
|
---|
| 624 | ' flags for dwFlags field of MIDIHDR structure
|
---|
| 625 | Const MHDR_DONE = &H00000001
|
---|
| 626 | Const MHDR_PREPARED = &H00000002
|
---|
| 627 | Const MHDR_INQUEUE = &H00000004
|
---|
| 628 | Const MHDR_ISSTRM = &H00000008
|
---|
| 629 |
|
---|
| 630 | Const MEVT_F_SHORT = &H00000000
|
---|
| 631 | Const MEVT_F_LONG = &H80000000
|
---|
| 632 | Const MEVT_F_CALLBACK = &H40000000
|
---|
| 633 | Const MEVT_EVENTTYPE(x) = ((x>>24) AND &HFF)
|
---|
| 634 | Const MEVT_EVENTPARM(x) = (x AND &H00FFFFFF)
|
---|
| 635 | Const MEVT_SHORTMSG = (&H00)
|
---|
| 636 | Const MEVT_TEMPO = (&H01)
|
---|
| 637 | Const MEVT_NOP = (&H02)
|
---|
| 638 | Const MEVT_LONGMSG = (&H80)
|
---|
| 639 | Const MEVT_COMMENT = (&H82)
|
---|
| 640 | Const MEVT_VERSION = (&H84)
|
---|
| 641 |
|
---|
| 642 | Const MIDISTRM_ERROR = (-2)
|
---|
| 643 |
|
---|
| 644 | ' Structures and defines for midiStreamProperty
|
---|
| 645 | Const MIDIPROP_SET = &H80000000
|
---|
| 646 | Const MIDIPROP_GET = &H40000000
|
---|
| 647 | Const MIDIPROP_TIMEDIV = &H00000001
|
---|
| 648 | Const MIDIPROP_TEMPO = &H00000002
|
---|
| 649 |
|
---|
| 650 | Type MIDIPROPTIMEDIV
|
---|
| 651 | cbStruct As DWord
|
---|
| 652 | dwTimeDiv As DWord
|
---|
| 653 | End Type
|
---|
| 654 | TypeDef LPMIDIPROPTIMEDIV = *MIDIPROPTIMEDIV
|
---|
| 655 |
|
---|
| 656 | Type MIDIPROPTEMPO
|
---|
| 657 | cbStruct As DWord
|
---|
| 658 | dwTempo As DWord
|
---|
| 659 | End Type
|
---|
| 660 | TypeDef LPMIDIPROPTEMPO = *MIDIPROPTEMPO
|
---|
| 661 |
|
---|
| 662 |
|
---|
| 663 | ' MIDI function prototypes
|
---|
| 664 | Declare Function midiOutGetNumDevs Lib "winmm" () As DWord
|
---|
| 665 | Declare Function midiStreamOpen Lib "winmm" (ByRef phms As HMIDISTRM, ByRef puDeviceID As DWord, cMidi As DWord, dwCallback As DWord, dwInstance As DWord, fdwOpen As DWord) As MMRESULT
|
---|
| 666 | Declare Function midiStreamClose Lib "winmm" (hms As HMIDISTRM) As MMRESULT
|
---|
| 667 | Declare Function midiStreamProperty Lib "winmm" (hms As HMIDISTRM, lppropdata As *Byte, dwProperty As DWord) As MMRESULT
|
---|
| 668 | Declare Function midiStreamPosition Lib "winmm" (hms As HMIDISTRM, ByRef lpmmt As MMTIME, cbmmt As DWord) As MMRESULT
|
---|
| 669 | Declare Function midiStreamOut Lib "winmm" (hms As HMIDISTRM, ByRef pmh As MIDIHDR, cbmh As DWord) As MMRESULT
|
---|
| 670 | Declare Function midiStreamPause Lib "winmm" (hms As HMIDISTRM) As MMRESULT
|
---|
| 671 | Declare Function midiStreamRestart Lib "winmm" (hms As HMIDISTRM) As MMRESULT
|
---|
| 672 | Declare Function midiStreamStop Lib "winmm" (hms As HMIDISTRM) As MMRESULT
|
---|
| 673 |
|
---|
| 674 | Declare Function midiConnect Lib "winmm" (hmi As HMIDI, hmo As HMIDIOUT, pReserved As VoidPtr) As MMRESULT
|
---|
| 675 | Declare Function midiDisconnect Lib "winmm" (hmi As HMIDI, hmo As HMIDIOUT, pReserved As VoidPtr) As MMRESULT
|
---|
| 676 | Declare Function midiOutGetDevCaps Lib "winmm" Alias "midiOutGetDevCapsA" (uDeviceID As DWord, ByRef pmoc As MIDIOUTCAPS, cbmoc As DWord) As MMRESULT
|
---|
| 677 | Declare Function midiOutGetVolume Lib "winmm" (hmo As HMIDIOUT, ByRef pdwVolume As DWord) As MMRESULT
|
---|
| 678 | Declare Function midiOutSetVolume Lib "winmm" (hmo As HMIDIOUT, dwVolume As DWord) As MMRESULT
|
---|
| 679 | Declare Function midiOutGetErrorText Lib "winmm" Alias "midiOutGetErrorTextA" (mmrError As MMRESULT, pszText As LPSTR, cchText As DWord) As MMRESULT
|
---|
| 680 | Declare Function midiOutOpen Lib "winmm" (ByRef phmo As HMIDIOUT, uDeviceID As DWord, dwCallback As DWord, dwInstance As DWord, fdwOpen As DWord) As MMRESULT
|
---|
| 681 | Declare Function midiOutClose Lib "winmm" (hmo As HMIDIOUT) As MMRESULT
|
---|
| 682 | Declare Function midiOutPrepareHeader Lib "winmm" (hmo As HMIDIOUT, ByRef pmh As MIDIHDR, cbmh As DWord) As MMRESULT
|
---|
| 683 | Declare Function midiOutUnprepareHeader Lib "winmm" (hmo As HMIDIOUT, ByRef pmh As MIDIHDR, cbmh As DWord) As MMRESULT
|
---|
| 684 | Declare Function midiOutShortMsg Lib "winmm" (hmo As HMIDIOUT, dwMsg As DWord) As MMRESULT
|
---|
| 685 | Declare Function midiOutLongMsg Lib "winmm" (hmo As HMIDIOUT, ByRef pmh As MIDIHDR, cbmh As DWord) As MMRESULT
|
---|
| 686 | Declare Function midiOutReset Lib "winmm" (hmo As HMIDIOUT) As MMRESULT
|
---|
| 687 | Declare Function midiOutCachePatches Lib "winmm" (hmo As HMIDIOUT, uBank As DWord, ByRef pwpa As Word, fuCache As DWord) As MMRESULT
|
---|
| 688 | Declare Function midiOutCacheDrumPatches Lib "winmm" (hmo As HMIDIOUT, uPatch As DWord, ByRef pwkya As Word, fuCache As DWord) As MMRESULT
|
---|
| 689 | Declare Function midiOutGetID Lib "winmm" (hmo As HMIDIOUT, ByRef puDeviceID As DWord) As MMRESULT
|
---|
| 690 | Declare Function midiOutMessage Lib "winmm" (hmo As HMIDIOUT, uMsg As DWord, dw1 As DWord, dw2 As DWord) As MMRESULT
|
---|
| 691 |
|
---|
| 692 | Declare Function midiInGetNumDevs Lib "winmm" () As DWord
|
---|
| 693 | Declare Function midiInGetDevCaps Lib "winmm" Alias "midiInGetDevCapsA" (uDeviceID As DWord, ByRef pmic As MIDIINCAPS, cbmic As DWord) As MMRESULT
|
---|
| 694 | Declare Function midiInGetErrorText Lib "winmm" Alias "midiInGetErrorTextA" (mmrError As MMRESULT, pszText As LPSTR, cchText As DWord) As MMRESULT
|
---|
| 695 | Declare Function midiInOpen Lib "winmm" (ByRef phmi As HMIDIIN, uDeviceID As DWord, dwCallback As DWord, dwInstance As DWord, fdwOpen As DWord) As MMRESULT
|
---|
| 696 | Declare Function midiInClose Lib "winmm" (hmi As HMIDIIN) As MMRESULT
|
---|
| 697 | Declare Function midiInPrepareHeader Lib "winmm" (hmi As HMIDIIN, ByRef pmh As MIDIHDR, cbmh As DWord) As MMRESULT
|
---|
| 698 | Declare Function midiInUnprepareHeader Lib "winmm" (hmi As HMIDIIN, ByRef pmh As MIDIHDR, cbmh As DWord) As MMRESULT
|
---|
| 699 | Declare Function midiInAddBuffer Lib "winmm" (hmi As HMIDIIN, ByRef pmh As MIDIHDR, cbmh As DWord) As MMRESULT
|
---|
| 700 | Declare Function midiInStart Lib "winmm" (hmi As HMIDIIN) As MMRESULT
|
---|
| 701 | Declare Function midiInStop Lib "winmm" (hmi As HMIDIIN) As MMRESULT
|
---|
| 702 | Declare Function midiInReset Lib "winmm" (hmi As HMIDIIN) As MMRESULT
|
---|
| 703 | Declare Function midiInGetID Lib "winmm" (hmi As HMIDIIN, ByRef puDeviceID As DWord) As MMRESULT
|
---|
| 704 | Declare Function midiInMessage Lib "winmm" (hmi As HMIDIIN, uMsg As DWord, dw1 As DWord, dw2 As DWord) As MMRESULT
|
---|
| 705 |
|
---|
| 706 |
|
---|
[75] | 707 | '--------------------------------------------------------
|
---|
| 708 | ' Auxiliary audio support
|
---|
[1] | 709 |
|
---|
[75] | 710 | ' device ID for aux device mapper
|
---|
| 711 | Const AUX_MAPPER = (-1)
|
---|
| 712 |
|
---|
| 713 | ' Auxiliary audio device capabilities structure
|
---|
| 714 | Type AUXCAPSA
|
---|
| 715 | wMid As Word
|
---|
| 716 | wPid As Word
|
---|
| 717 | vDriverVersion As MMVERSION
|
---|
| 718 | szPname[ELM(MAXPNAMELEN)] As Char
|
---|
| 719 | wTechnology As Word
|
---|
| 720 | wReserved1 As Word
|
---|
| 721 | dwSupport As DWord
|
---|
| 722 | End Type
|
---|
| 723 | TypeDef PAUXCAPSA = *AUXCAPSA
|
---|
| 724 | TypeDef NPAUXCAPSA = *AUXCAPSA
|
---|
| 725 | TypeDef LPAUXCAPSA = *AUXCAPSA
|
---|
| 726 |
|
---|
| 727 | TypeDef AUXCAPS = AUXCAPSA
|
---|
| 728 | TypeDef PAUXCAPS = PAUXCAPSA
|
---|
| 729 | TypeDef NPAUXCAPS = NPAUXCAPSA
|
---|
| 730 | TypeDef LPAUXCAPS = LPAUXCAPSA
|
---|
| 731 |
|
---|
| 732 | Const AUXCAPS_CDAUDIO = 1
|
---|
| 733 | Const AUXCAPS_AUXIN = 2
|
---|
| 734 |
|
---|
| 735 | Const AUXCAPS_VOLUME = &H0001
|
---|
| 736 | Const AUXCAPS_LRVOLUME = &H0002
|
---|
| 737 |
|
---|
| 738 | ' auxiliary audio function prototypes
|
---|
| 739 | Declare Function auxGetNumDevs Lib "winmm" () As DWord
|
---|
| 740 | Declare Function auxGetDevCaps Lib "winmm" Alias "auxGetDevCapsA" (uDeviceID As DWord, pac As *AUXCAPS, cbac As DWord) As MMRESULT
|
---|
| 741 | Declare Function auxSetVolume Lib "winmm" (uDeviceID As DWord, dwVolume As DWord) As MMRESULT
|
---|
| 742 | Declare Function auxGetVolume Lib "winmm" (uDeviceID As DWord, pdwVolume As *DWord) As MMRESULT
|
---|
| 743 | Declare Function auxOutMessage Lib "winmm" (uDeviceID As DWord, uMsg As DWord, dw1 As DWord, dw2 As DWord) As MMRESULT
|
---|
| 744 |
|
---|
| 745 |
|
---|
[1] | 746 | '--------------------------------------------------------
|
---|
[75] | 747 | ' Mixer Support
|
---|
| 748 |
|
---|
| 749 | TypeDef HMIXEROBJ = VoidPtr
|
---|
| 750 | TypeDef LPHMIXEROBJ = HMIXEROBJ
|
---|
| 751 | TypeDef HMIXER = VoidPtr
|
---|
| 752 | TypeDef LPHMIXER = *HMIXER
|
---|
| 753 |
|
---|
| 754 | Const MIXER_SHORT_NAME_CHARS = 16
|
---|
| 755 | Const MIXER_LONG_NAME_CHARS = 64
|
---|
| 756 |
|
---|
| 757 | Const MIXERR_INVALLINE = (MIXERR_BASE + 0)
|
---|
| 758 | Const MIXERR_INVALCONTROL = (MIXERR_BASE + 1)
|
---|
| 759 | Const MIXERR_INVALVALUE = (MIXERR_BASE + 2)
|
---|
| 760 | Const MIXERR_LASTERROR = (MIXERR_BASE + 2)
|
---|
| 761 |
|
---|
| 762 | Const MIXER_OBJECTF_HANDLE = &H80000000
|
---|
| 763 | Const MIXER_OBJECTF_MIXER = &H00000000
|
---|
| 764 | Const MIXER_OBJECTF_HMIXER = (MIXER_OBJECTF_HANDLE OR MIXER_OBJECTF_MIXER)
|
---|
| 765 | Const MIXER_OBJECTF_WAVEOUT = &H10000000
|
---|
| 766 | Const MIXER_OBJECTF_HWAVEOUT = (MIXER_OBJECTF_HANDLE OR MIXER_OBJECTF_WAVEOUT)
|
---|
| 767 | Const MIXER_OBJECTF_WAVEIN = &H20000000
|
---|
| 768 | Const MIXER_OBJECTF_HWAVEIN = (MIXER_OBJECTF_HANDLE OR MIXER_OBJECTF_WAVEIN)
|
---|
| 769 | Const MIXER_OBJECTF_MIDIOUT = &H30000000
|
---|
| 770 | Const MIXER_OBJECTF_HMIDIOUT = (MIXER_OBJECTF_HANDLE OR MIXER_OBJECTF_MIDIOUT)
|
---|
| 771 | Const MIXER_OBJECTF_MIDIIN = &H40000000
|
---|
| 772 | Const MIXER_OBJECTF_HMIDIIN = (MIXER_OBJECTF_HANDLE OR MIXER_OBJECTF_MIDIIN)
|
---|
| 773 | Const MIXER_OBJECTF_AUX = &H50000000
|
---|
| 774 |
|
---|
| 775 | Declare Function mixerGetNumDevs Lib "winmm" () As DWord
|
---|
| 776 |
|
---|
| 777 | Type MIXERCAPSA
|
---|
| 778 | wMid As Word
|
---|
| 779 | wPid As Word
|
---|
| 780 | vDriverVersion As MMVERSION
|
---|
| 781 | szPname[ELM(MAXPNAMELEN)] As Char
|
---|
| 782 | fdwSupport As DWord
|
---|
| 783 | cDestinations As DWord
|
---|
| 784 | End Type
|
---|
| 785 | TypeDef PMIXERCAPSA = *MIXERCAPSA
|
---|
| 786 | TypeDef LPMIXERCAPSA = *MIXERCAPSA
|
---|
| 787 |
|
---|
| 788 | TypeDef MIXERCAPS = MIXERCAPSA
|
---|
| 789 | TypeDef PMIXERCAPS = PMIXERCAPSA
|
---|
| 790 | TypeDef LPMIXERCAPS = LPMIXERCAPSA
|
---|
| 791 |
|
---|
| 792 | Declare Function mixerGetDevCaps Lib "winmm" Alias "mixerGetDevCapsA" (uMxId As DWord, pmxcaps As *MIXERCAPS, cbmxcaps As DWord) As MMRESULT
|
---|
| 793 | Declare Function mixerOpen Lib "winmm" (phmx As *HMIXER, uMxId As DWord, dwCallback As DWord, dwInstance As DWord, fdwOpen As DWord) As MMRESULT
|
---|
| 794 | Declare Function mixerClose Lib "winmm" (hmx As HMIXER) As MMRESULT
|
---|
| 795 | Declare Function mixerMessage Lib "winmm" (hmx As HMIXER, uMsg As DWord, dwParam1 As DWord, dwParam2 As DWord) As DWord
|
---|
| 796 |
|
---|
| 797 | Type TARGET
|
---|
| 798 | dwType As DWord
|
---|
| 799 | dwDeviceID As DWord
|
---|
| 800 | wMid As Word
|
---|
| 801 | wPid As Word
|
---|
| 802 | vDriverVersion As MMVERSION
|
---|
| 803 | szPname[ELM(MAXPNAMELEN)] As Char
|
---|
| 804 | End Type
|
---|
| 805 |
|
---|
| 806 | Type MIXERLINEA
|
---|
| 807 | cbStruct As DWord
|
---|
| 808 | dwDestination As DWord
|
---|
| 809 | dwSource As DWord
|
---|
| 810 | dwLineID As DWord
|
---|
| 811 | fdwLine As DWord
|
---|
| 812 | dwUser As DWord
|
---|
| 813 | dwComponentType As DWord
|
---|
| 814 | cChannels As DWord
|
---|
| 815 | cConnections As DWord
|
---|
| 816 | cControls As DWord
|
---|
| 817 | szShortName[ELM(MIXER_SHORT_NAME_CHARS)] As Char
|
---|
| 818 | szName[ELM(MIXER_LONG_NAME_CHARS)] As Char
|
---|
| 819 | Target As TARGET
|
---|
| 820 | End Type
|
---|
| 821 | TypeDef PMIXERLINEA = *MIXERLINEA
|
---|
| 822 | TypeDef LPMIXERLINEA = *MIXERLINEA
|
---|
| 823 |
|
---|
| 824 | TypeDef MIXERLINE = MIXERLINEA
|
---|
| 825 | TypeDef PMIXERLINE = PMIXERLINEA
|
---|
| 826 | TypeDef LPMIXERLINE = LPMIXERLINEA
|
---|
| 827 |
|
---|
| 828 | ' MIXERLINE.fdwLine
|
---|
| 829 | Const MIXERLINE_LINEF_ACTIVE = &H00000001
|
---|
| 830 | Const MIXERLINE_LINEF_DISCONNECTED = &H00008000
|
---|
| 831 | Const MIXERLINE_LINEF_SOURCE = &H80000000
|
---|
| 832 |
|
---|
| 833 | ' MIXERLINE.dwComponentType
|
---|
| 834 | Const MIXERLINE_COMPONENTTYPE_DST_FIRST = &H00000000
|
---|
| 835 | Const MIXERLINE_COMPONENTTYPE_DST_UNDEFINED = (MIXERLINE_COMPONENTTYPE_DST_FIRST + 0)
|
---|
| 836 | Const MIXERLINE_COMPONENTTYPE_DST_DIGITAL = (MIXERLINE_COMPONENTTYPE_DST_FIRST + 1)
|
---|
| 837 | Const MIXERLINE_COMPONENTTYPE_DST_LINE = (MIXERLINE_COMPONENTTYPE_DST_FIRST + 2)
|
---|
| 838 | Const MIXERLINE_COMPONENTTYPE_DST_MONITOR = (MIXERLINE_COMPONENTTYPE_DST_FIRST + 3)
|
---|
| 839 | Const MIXERLINE_COMPONENTTYPE_DST_SPEAKERS = (MIXERLINE_COMPONENTTYPE_DST_FIRST + 4)
|
---|
| 840 | Const MIXERLINE_COMPONENTTYPE_DST_HEADPHONES = (MIXERLINE_COMPONENTTYPE_DST_FIRST + 5)
|
---|
| 841 | Const MIXERLINE_COMPONENTTYPE_DST_TELEPHONE = (MIXERLINE_COMPONENTTYPE_DST_FIRST + 6)
|
---|
| 842 | Const MIXERLINE_COMPONENTTYPE_DST_WAVEIN = (MIXERLINE_COMPONENTTYPE_DST_FIRST + 7)
|
---|
| 843 | Const MIXERLINE_COMPONENTTYPE_DST_VOICEIN = (MIXERLINE_COMPONENTTYPE_DST_FIRST + 8)
|
---|
| 844 | Const MIXERLINE_COMPONENTTYPE_DST_LAST = (MIXERLINE_COMPONENTTYPE_DST_FIRST + 8)
|
---|
| 845 |
|
---|
| 846 | Const MIXERLINE_COMPONENTTYPE_SRC_FIRST = &H00001000
|
---|
| 847 | Const MIXERLINE_COMPONENTTYPE_SRC_UNDEFINED = (MIXERLINE_COMPONENTTYPE_SRC_FIRST + 0)
|
---|
| 848 | Const MIXERLINE_COMPONENTTYPE_SRC_DIGITAL = (MIXERLINE_COMPONENTTYPE_SRC_FIRST + 1)
|
---|
| 849 | Const MIXERLINE_COMPONENTTYPE_SRC_LINE = (MIXERLINE_COMPONENTTYPE_SRC_FIRST + 2)
|
---|
| 850 | Const MIXERLINE_COMPONENTTYPE_SRC_MICROPHONE = (MIXERLINE_COMPONENTTYPE_SRC_FIRST + 3)
|
---|
| 851 | Const MIXERLINE_COMPONENTTYPE_SRC_SYNTHESIZER = (MIXERLINE_COMPONENTTYPE_SRC_FIRST + 4)
|
---|
| 852 | Const MIXERLINE_COMPONENTTYPE_SRC_COMPACTDISC = (MIXERLINE_COMPONENTTYPE_SRC_FIRST + 5)
|
---|
| 853 | Const MIXERLINE_COMPONENTTYPE_SRC_TELEPHONE = (MIXERLINE_COMPONENTTYPE_SRC_FIRST + 6)
|
---|
| 854 | Const MIXERLINE_COMPONENTTYPE_SRC_PCSPEAKER = (MIXERLINE_COMPONENTTYPE_SRC_FIRST + 7)
|
---|
| 855 | Const MIXERLINE_COMPONENTTYPE_SRC_WAVEOUT = (MIXERLINE_COMPONENTTYPE_SRC_FIRST + 8)
|
---|
| 856 | Const MIXERLINE_COMPONENTTYPE_SRC_AUXILIARY = (MIXERLINE_COMPONENTTYPE_SRC_FIRST + 9)
|
---|
| 857 | Const MIXERLINE_COMPONENTTYPE_SRC_ANALOG = (MIXERLINE_COMPONENTTYPE_SRC_FIRST + 10)
|
---|
| 858 | Const MIXERLINE_COMPONENTTYPE_SRC_LAST = (MIXERLINE_COMPONENTTYPE_SRC_FIRST + 10)
|
---|
| 859 |
|
---|
| 860 | ' MIXERLINE.Target.dwType
|
---|
| 861 | Const MIXERLINE_TARGETTYPE_UNDEFINED = 0
|
---|
| 862 | Const MIXERLINE_TARGETTYPE_WAVEOUT = 1
|
---|
| 863 | Const MIXERLINE_TARGETTYPE_WAVEIN = 2
|
---|
| 864 | Const MIXERLINE_TARGETTYPE_MIDIOUT = 3
|
---|
| 865 | Const MIXERLINE_TARGETTYPE_MIDIIN = 4
|
---|
| 866 | Const MIXERLINE_TARGETTYPE_AUX = 5
|
---|
| 867 |
|
---|
| 868 | Declare Function mixerGetLineInfo Lib "winmm" Alias "mixerGetLineInfoA" (hmxobj As HMIXEROBJ, pmxl As *MIXERLINE, fdwInfo As DWord) As MMRESULT
|
---|
| 869 |
|
---|
| 870 | Const MIXER_GETLINEINFOF_DESTINATION = &H00000000
|
---|
| 871 | Const MIXER_GETLINEINFOF_SOURCE = &H00000001
|
---|
| 872 | Const MIXER_GETLINEINFOF_LINEID = &H00000002
|
---|
| 873 | Const MIXER_GETLINEINFOF_COMPONENTTYPE = &H00000003
|
---|
| 874 | Const MIXER_GETLINEINFOF_TARGETTYPE = &H00000004
|
---|
| 875 | Const MIXER_GETLINEINFOF_QUERYMASK = &H0000000F
|
---|
| 876 |
|
---|
| 877 | Declare Function mixerGetID Lib "winmm" (hmxobj As HMIXEROBJ, puMxId As *DWord, fdwId As DWord) As MMRESULT
|
---|
| 878 |
|
---|
| 879 | Type MIXERCONTROLA
|
---|
| 880 | cbStruct As DWord
|
---|
| 881 | dwControlID As DWord
|
---|
| 882 | dwControlType As DWord
|
---|
| 883 | fdwControl As DWord
|
---|
| 884 | cMultipleItems As DWord
|
---|
| 885 | szShortName[ELM(MIXER_SHORT_NAME_CHARS)] As Char
|
---|
| 886 | szName[ELM(MIXER_LONG_NAME_CHARS)] As Char
|
---|
| 887 | Bounds[ELM(6)] As DWord
|
---|
| 888 | Metrics[ELM(6)] As DWord
|
---|
| 889 | End Type
|
---|
| 890 | TypeDef PMIXERCONTROLA = *MIXERCONTROLA
|
---|
| 891 | TypeDef LPMIXERCONTROLA = *MIXERCONTROLA
|
---|
| 892 |
|
---|
| 893 | TypeDef MIXERCONTROL = MIXERCONTROLA
|
---|
| 894 | TypeDef PMIXERCONTROL = PMIXERCONTROLA
|
---|
| 895 | TypeDef LPMIXERCONTROL = LPMIXERCONTROLA
|
---|
| 896 |
|
---|
| 897 | ' MIXERCONTROL.fdwControl
|
---|
| 898 | Const MIXERCONTROL_CONTROLF_UNIFORM = &H00000001
|
---|
| 899 | Const MIXERCONTROL_CONTROLF_MULTIPLE = &H00000002
|
---|
| 900 | Const MIXERCONTROL_CONTROLF_DISABLED = &H80000000
|
---|
| 901 |
|
---|
| 902 | ' MIXERCONTROL_CONTROLTYPE_xxx
|
---|
| 903 | Const MIXERCONTROL_CT_CLASS_MASK = &HF0000000
|
---|
| 904 | Const MIXERCONTROL_CT_CLASS_CUSTOM = &H00000000
|
---|
| 905 | Const MIXERCONTROL_CT_CLASS_METER = &H10000000
|
---|
| 906 | Const MIXERCONTROL_CT_CLASS_SWITCH = &H20000000
|
---|
| 907 | Const MIXERCONTROL_CT_CLASS_NUMBER = &H30000000
|
---|
| 908 | Const MIXERCONTROL_CT_CLASS_SLIDER = &H40000000
|
---|
| 909 | Const MIXERCONTROL_CT_CLASS_FADER = &H50000000
|
---|
| 910 | Const MIXERCONTROL_CT_CLASS_TIME = &H60000000
|
---|
| 911 | Const MIXERCONTROL_CT_CLASS_LIST = &H70000000
|
---|
| 912 | Const MIXERCONTROL_CT_SUBCLASS_MASK = &H0F000000
|
---|
| 913 | Const MIXERCONTROL_CT_SC_SWITCH_BOOLEAN = &H00000000
|
---|
| 914 | Const MIXERCONTROL_CT_SC_SWITCH_BUTTON = &H01000000
|
---|
| 915 | Const MIXERCONTROL_CT_SC_METER_POLLED = &H00000000
|
---|
| 916 | Const MIXERCONTROL_CT_SC_TIME_MICROSECS = &H00000000
|
---|
| 917 | Const MIXERCONTROL_CT_SC_TIME_MILLISECS = &H01000000
|
---|
| 918 | Const MIXERCONTROL_CT_SC_LIST_SINGLE = &H00000000
|
---|
| 919 | Const MIXERCONTROL_CT_SC_LIST_MULTIPLE = &H01000000
|
---|
| 920 | Const MIXERCONTROL_CT_UNITS_MASK = &H00FF0000
|
---|
| 921 | Const MIXERCONTROL_CT_UNITS_CUSTOM = &H00000000
|
---|
| 922 | Const MIXERCONTROL_CT_UNITS_BOOLEAN = &H00010000
|
---|
| 923 | Const MIXERCONTROL_CT_UNITS_SIGNED = &H00020000
|
---|
| 924 | Const MIXERCONTROL_CT_UNITS_UNSIGNED = &H00030000
|
---|
| 925 | Const MIXERCONTROL_CT_UNITS_DECIBELS = &H00040000
|
---|
| 926 | Const MIXERCONTROL_CT_UNITS_PERCENT = &H00050000
|
---|
| 927 |
|
---|
| 928 | ' MIXERCONTROL.dwControlType
|
---|
| 929 | Const MIXERCONTROL_CONTROLTYPE_CUSTOM = (MIXERCONTROL_CT_CLASS_CUSTOM OR MIXERCONTROL_CT_UNITS_CUSTOM)
|
---|
| 930 | Const MIXERCONTROL_CONTROLTYPE_BOOLEANMETER = (MIXERCONTROL_CT_CLASS_METER OR MIXERCONTROL_CT_SC_METER_POLLED OR MIXERCONTROL_CT_UNITS_BOOLEAN)
|
---|
| 931 | Const MIXERCONTROL_CONTROLTYPE_SIGNEDMETER = (MIXERCONTROL_CT_CLASS_METER OR MIXERCONTROL_CT_SC_METER_POLLED OR MIXERCONTROL_CT_UNITS_SIGNED)
|
---|
| 932 | Const MIXERCONTROL_CONTROLTYPE_PEAKMETER = (MIXERCONTROL_CONTROLTYPE_SIGNEDMETER + 1)
|
---|
| 933 | Const MIXERCONTROL_CONTROLTYPE_UNSIGNEDMETER = (MIXERCONTROL_CT_CLASS_METER OR MIXERCONTROL_CT_SC_METER_POLLED OR MIXERCONTROL_CT_UNITS_UNSIGNED)
|
---|
| 934 | Const MIXERCONTROL_CONTROLTYPE_BOOLEAN = (MIXERCONTROL_CT_CLASS_SWITCH OR MIXERCONTROL_CT_SC_SWITCH_BOOLEAN OR MIXERCONTROL_CT_UNITS_BOOLEAN)
|
---|
| 935 | Const MIXERCONTROL_CONTROLTYPE_ONOFF = (MIXERCONTROL_CONTROLTYPE_BOOLEAN + 1)
|
---|
| 936 | Const MIXERCONTROL_CONTROLTYPE_MUTE = (MIXERCONTROL_CONTROLTYPE_BOOLEAN + 2)
|
---|
| 937 | Const MIXERCONTROL_CONTROLTYPE_MONO = (MIXERCONTROL_CONTROLTYPE_BOOLEAN + 3)
|
---|
| 938 | Const MIXERCONTROL_CONTROLTYPE_LOUDNESS = (MIXERCONTROL_CONTROLTYPE_BOOLEAN + 4)
|
---|
| 939 | Const MIXERCONTROL_CONTROLTYPE_STEREOENH = (MIXERCONTROL_CONTROLTYPE_BOOLEAN + 5)
|
---|
| 940 | Const MIXERCONTROL_CONTROLTYPE_BUTTON = (MIXERCONTROL_CT_CLASS_SWITCH OR MIXERCONTROL_CT_SC_SWITCH_BUTTON OR MIXERCONTROL_CT_UNITS_BOOLEAN)
|
---|
| 941 | Const MIXERCONTROL_CONTROLTYPE_DECIBELS = (MIXERCONTROL_CT_CLASS_NUMBER OR MIXERCONTROL_CT_UNITS_DECIBELS)
|
---|
| 942 | Const MIXERCONTROL_CONTROLTYPE_SIGNED = (MIXERCONTROL_CT_CLASS_NUMBER OR MIXERCONTROL_CT_UNITS_SIGNED)
|
---|
| 943 | Const MIXERCONTROL_CONTROLTYPE_UNSIGNED = (MIXERCONTROL_CT_CLASS_NUMBER OR MIXERCONTROL_CT_UNITS_UNSIGNED)
|
---|
| 944 | Const MIXERCONTROL_CONTROLTYPE_PERCENT = (MIXERCONTROL_CT_CLASS_NUMBER OR MIXERCONTROL_CT_UNITS_PERCENT)
|
---|
| 945 | Const MIXERCONTROL_CONTROLTYPE_SLIDER = (MIXERCONTROL_CT_CLASS_SLIDER OR MIXERCONTROL_CT_UNITS_SIGNED)
|
---|
| 946 | Const MIXERCONTROL_CONTROLTYPE_PAN = (MIXERCONTROL_CONTROLTYPE_SLIDER + 1)
|
---|
| 947 | Const MIXERCONTROL_CONTROLTYPE_QSOUNDPAN = (MIXERCONTROL_CONTROLTYPE_SLIDER + 2)
|
---|
| 948 | Const MIXERCONTROL_CONTROLTYPE_FADER = (MIXERCONTROL_CT_CLASS_FADER OR MIXERCONTROL_CT_UNITS_UNSIGNED)
|
---|
| 949 | Const MIXERCONTROL_CONTROLTYPE_VOLUME = (MIXERCONTROL_CONTROLTYPE_FADER + 1)
|
---|
| 950 | Const MIXERCONTROL_CONTROLTYPE_BASS = (MIXERCONTROL_CONTROLTYPE_FADER + 2)
|
---|
| 951 | Const MIXERCONTROL_CONTROLTYPE_TREBLE = (MIXERCONTROL_CONTROLTYPE_FADER + 3)
|
---|
| 952 | Const MIXERCONTROL_CONTROLTYPE_EQUALIZER = (MIXERCONTROL_CONTROLTYPE_FADER + 4)
|
---|
| 953 | Const MIXERCONTROL_CONTROLTYPE_SINGLESELECT = (MIXERCONTROL_CT_CLASS_LIST OR MIXERCONTROL_CT_SC_LIST_SINGLE OR MIXERCONTROL_CT_UNITS_BOOLEAN)
|
---|
| 954 | Const MIXERCONTROL_CONTROLTYPE_MUX = (MIXERCONTROL_CONTROLTYPE_SINGLESELECT + 1)
|
---|
| 955 | Const MIXERCONTROL_CONTROLTYPE_MULTIPLESELECT = (MIXERCONTROL_CT_CLASS_LIST OR MIXERCONTROL_CT_SC_LIST_MULTIPLE OR MIXERCONTROL_CT_UNITS_BOOLEAN)
|
---|
| 956 | Const MIXERCONTROL_CONTROLTYPE_MIXER = (MIXERCONTROL_CONTROLTYPE_MULTIPLESELECT + 1)
|
---|
| 957 | Const MIXERCONTROL_CONTROLTYPE_MICROTIME = (MIXERCONTROL_CT_CLASS_TIME OR MIXERCONTROL_CT_SC_TIME_MICROSECS OR MIXERCONTROL_CT_UNITS_UNSIGNED)
|
---|
| 958 | Const MIXERCONTROL_CONTROLTYPE_MILLITIME = (MIXERCONTROL_CT_CLASS_TIME OR MIXERCONTROL_CT_SC_TIME_MILLISECS OR MIXERCONTROL_CT_UNITS_UNSIGNED)
|
---|
| 959 |
|
---|
| 960 | Type MIXERLINECONTROLSA
|
---|
| 961 | cbStruct As DWord
|
---|
| 962 | dwLineID As DWord
|
---|
| 963 | dwControl_ID_Type As DWord
|
---|
| 964 | cControls As DWord
|
---|
| 965 | cbmxctrl As DWord
|
---|
| 966 | pamxctrl As *MIXERCONTROL
|
---|
| 967 | End Type
|
---|
[76] | 968 | TypeDef PMIXERLINECONTROLSA = *MIXERLINECONTROLSA
|
---|
[75] | 969 | TypeDef LPMIXERLINECONTROLSA = *MIXERLINECONTROLSA
|
---|
| 970 |
|
---|
| 971 | TypeDef MIXERLINECONTROLS = MIXERLINECONTROLSA
|
---|
| 972 | TypeDef PMIXERLINECONTROLS = PMIXERLINECONTROLSA
|
---|
| 973 | TypeDef LPMIXERLINECONTROLS = LPMIXERLINECONTROLSA
|
---|
| 974 |
|
---|
| 975 | Declare Function mixerGetLineControls Lib "winmm" Alias "mixerGetLineControlsA" (hmxobj As HMIXEROBJ, pmxlc As *MIXERLINECONTROLS, fdwControls As DWord) As MMRESULT
|
---|
| 976 |
|
---|
| 977 | Const MIXER_GETLINECONTROLSF_ALL = &H00000000
|
---|
| 978 | Const MIXER_GETLINECONTROLSF_ONEBYID = &H00000001
|
---|
| 979 | Const MIXER_GETLINECONTROLSF_ONEBYTYPE = &H00000002
|
---|
| 980 | Const MIXER_GETLINECONTROLSF_QUERYMASK = &H0000000F
|
---|
| 981 |
|
---|
| 982 | Type MIXERCONTROLDETAILS
|
---|
| 983 | cbStruct As DWord
|
---|
| 984 | dwControlID As DWord
|
---|
| 985 | cChannels As DWord
|
---|
| 986 | cMultipleItems As DWord
|
---|
| 987 | cbDetails As DWord
|
---|
| 988 | paDetails As VoidPtr
|
---|
| 989 | End Type
|
---|
| 990 | TypeDef PMIXERCONTROLDETAILS = *MIXERCONTROLDETAILS
|
---|
| 991 | TypeDef LPMIXERCONTROLDETAILS = *MIXERCONTROLDETAILS
|
---|
| 992 |
|
---|
| 993 | Type MIXERCONTROLDETAILS_LISTTEXTA
|
---|
| 994 | dwParam1 As DWord
|
---|
| 995 | dwParam2 As DWord
|
---|
| 996 | szName[ELM(MIXER_LONG_NAME_CHARS)] As Char
|
---|
| 997 | End Type
|
---|
| 998 | TypeDef PMIXERCONTROLDETAILS_LISTTEXTA = *MIXERCONTROLDETAILS_LISTTEXTA
|
---|
| 999 | TypeDef LPMIXERCONTROLDETAILS_LISTTEXTA = *MIXERCONTROLDETAILS_LISTTEXTA
|
---|
| 1000 |
|
---|
| 1001 | TypeDef MIXERCONTROLDETAILS_LISTTEXT = MIXERCONTROLDETAILS_LISTTEXTA
|
---|
| 1002 | TypeDef PMIXERCONTROLDETAILS_LISTTEXT = PMIXERCONTROLDETAILS_LISTTEXTA
|
---|
| 1003 | TypeDef LPMIXERCONTROLDETAILS_LISTTEXT = LPMIXERCONTROLDETAILS_LISTTEXTA
|
---|
| 1004 |
|
---|
| 1005 | Type MIXERCONTROLDETAILS_BOOLEAN
|
---|
| 1006 | fValue As Long
|
---|
| 1007 | End Type
|
---|
| 1008 | TypeDef PMIXERCONTROLDETAILS_BOOLEAN = *MIXERCONTROLDETAILS_BOOLEAN
|
---|
| 1009 | TypeDef LPMIXERCONTROLDETAILS_BOOLEAN = *MIXERCONTROLDETAILS_BOOLEAN
|
---|
| 1010 |
|
---|
| 1011 | Type MIXERCONTROLDETAILS_SIGNED
|
---|
| 1012 | lValue As Long
|
---|
| 1013 | End Type
|
---|
| 1014 | TypeDef PMIXERCONTROLDETAILS_SIGNED = *MIXERCONTROLDETAILS_SIGNED
|
---|
| 1015 | TypeDef LPMIXERCONTROLDETAILS_SIGNED = *MIXERCONTROLDETAILS_SIGNED
|
---|
| 1016 |
|
---|
| 1017 | Type MIXERCONTROLDETAILS_UNSIGNED
|
---|
| 1018 | dwValue As DWord
|
---|
| 1019 | End Type
|
---|
| 1020 | TypeDef PMIXERCONTROLDETAILS_UNSIGNED = *MIXERCONTROLDETAILS_UNSIGNED
|
---|
| 1021 | TypeDef LPMIXERCONTROLDETAILS_UNSIGNED = *MIXERCONTROLDETAILS_UNSIGNED
|
---|
| 1022 |
|
---|
| 1023 | Declare Function mixerGetControlDetailsA Lib "winmm" (hmxobj As HMIXEROBJ, pmxcd As *MIXERCONTROLDETAILS, fdwDetails As DWord) As MMRESULT
|
---|
| 1024 | Declare Function mixerGetControlDetailsW Lib "winmm" (hmxobj As HMIXEROBJ, pmxcd As *MIXERCONTROLDETAILS, fdwDetails As DWord) As MMRESULT
|
---|
| 1025 | Declare Function mixerGetControlDetails Lib "winmm" Alias "mixerGetControlDetailsA" (hmxobj As HMIXEROBJ, pmxcd As *MIXERCONTROLDETAILS, fdwDetails As DWord) As MMRESULT
|
---|
| 1026 |
|
---|
| 1027 | Const MIXER_GETCONTROLDETAILSF_VALUE = &H00000000
|
---|
| 1028 | Const MIXER_GETCONTROLDETAILSF_LISTTEXT = &H00000001
|
---|
| 1029 | Const MIXER_GETCONTROLDETAILSF_QUERYMASK = &H0000000F
|
---|
| 1030 |
|
---|
| 1031 | Declare Function mixerSetControlDetails Lib "winmm" (hmxobj As HMIXEROBJ, pmxcd As *MIXERCONTROLDETAILS, fdwDetails As DWord) As MMRESULT
|
---|
| 1032 |
|
---|
| 1033 | Const MIXER_SETCONTROLDETAILSF_VALUE = &H00000000
|
---|
| 1034 | Const MIXER_SETCONTROLDETAILSF_CUSTOM = &H00000001
|
---|
| 1035 | Const MIXER_SETCONTROLDETAILSF_QUERYMASK = &H0000000F
|
---|
| 1036 |
|
---|
| 1037 |
|
---|
| 1038 | '--------------------------------------------------------
|
---|
| 1039 | ' Timer support
|
---|
| 1040 |
|
---|
| 1041 | ' timer error
|
---|
| 1042 | Const TIMERR_NOERROR = (0)
|
---|
| 1043 | Const TIMERR_NOCANDO = (TIMERR_BASE+1)
|
---|
| 1044 | Const TIMERR_STRUCT = (TIMERR_BASE+33)
|
---|
| 1045 |
|
---|
| 1046 | TypeDef LPTIMECALLBACK = *Sub(uTimerID As DWord, uMsg As DWord, dwUser As DWord, dw1 As DWord, dw2 As DWord)
|
---|
| 1047 |
|
---|
| 1048 | Const TIME_ONESHOT = &H0000
|
---|
| 1049 | Const TIME_PERIODIC = &H0001
|
---|
| 1050 |
|
---|
| 1051 | Const TIME_CALLBACK_FUNCTION = &H0000
|
---|
| 1052 | Const TIME_CALLBACK_EVENT_SET = &H0010
|
---|
| 1053 | Const TIME_CALLBACK_EVENT_PULSE = &H0020
|
---|
| 1054 |
|
---|
| 1055 | ' timer device capabilities data structure
|
---|
| 1056 | Type TIMECAPS
|
---|
| 1057 | wPeriodMin As DWord
|
---|
| 1058 | wPeriodMax As DWord
|
---|
| 1059 | End Type
|
---|
| 1060 | TypeDef PTIMECAPS = *TIMECAPS
|
---|
| 1061 | TypeDef NPTIMECAPS = *TIMECAPS
|
---|
| 1062 | TypeDef LPTIMECAPS = *TIMECAPS
|
---|
| 1063 |
|
---|
| 1064 | ' timer function prototypes
|
---|
| 1065 | Declare Function timeGetSystemTime Lib "winmm" (pmmt As *MMTIME, cbmmt As DWord) As MMRESULT
|
---|
| 1066 | Declare Function timeGetTime Lib "winmm" () As DWord
|
---|
| 1067 | Declare Function timeSetEvent Lib "winmm" (uDelay As DWord, uResolution As DWord, fptc As LPTIMECALLBACK, dwUser As DWord, fuEvent As DWord) As MMRESULT
|
---|
| 1068 | Declare Function timeKillEvent Lib "winmm" (uTimerID As DWord) As MMRESULT
|
---|
| 1069 | Declare Function timeGetDevCaps Lib "winmm" (ptc As *TIMECAPS, cbtc As DWord) As MMRESULT
|
---|
| 1070 | Declare Function timeBeginPeriod Lib "winmm" (uPeriod As DWord) As MMRESULT
|
---|
| 1071 | Declare Function timeEndPeriod Lib "winmm" (uPeriod As DWord) As MMRESULT
|
---|
| 1072 |
|
---|
| 1073 |
|
---|
| 1074 | '--------------------------------------------------------
|
---|
| 1075 | ' Joystick support
|
---|
| 1076 |
|
---|
| 1077 | ' joystick error
|
---|
| 1078 | Const JOYERR_NOERROR = (0)
|
---|
| 1079 | Const JOYERR_PARMS = (JOYERR_BASE+5)
|
---|
| 1080 | Const JOYERR_NOCANDO = (JOYERR_BASE+6)
|
---|
| 1081 | Const JOYERR_UNPLUGGED = (JOYERR_BASE+7)
|
---|
| 1082 |
|
---|
| 1083 | ' constants used with JOYINFO and JOYINFOEX structures and MM_JOY* messages
|
---|
| 1084 | Const JOY_BUTTON1 = &H0001
|
---|
| 1085 | Const JOY_BUTTON2 = &H0002
|
---|
| 1086 | Const JOY_BUTTON3 = &H0004
|
---|
| 1087 | Const JOY_BUTTON4 = &H0008
|
---|
| 1088 | Const JOY_BUTTON1CHG = &H0100
|
---|
| 1089 | Const JOY_BUTTON2CHG = &H0200
|
---|
| 1090 | Const JOY_BUTTON3CHG = &H0400
|
---|
| 1091 | Const JOY_BUTTON4CHG = &H0800
|
---|
| 1092 |
|
---|
| 1093 | ' constants used with JOYINFOEX
|
---|
| 1094 | Const JOY_BUTTON5 = &H00000010
|
---|
| 1095 | Const JOY_BUTTON6 = &H00000020
|
---|
| 1096 | Const JOY_BUTTON7 = &H00000040
|
---|
| 1097 | Const JOY_BUTTON8 = &H00000080
|
---|
| 1098 | Const JOY_BUTTON9 = &H00000100
|
---|
| 1099 | Const JOY_BUTTON10 = &H00000200
|
---|
| 1100 | Const JOY_BUTTON11 = &H00000400
|
---|
| 1101 | Const JOY_BUTTON12 = &H00000800
|
---|
| 1102 | Const JOY_BUTTON13 = &H00001000
|
---|
| 1103 | Const JOY_BUTTON14 = &H00002000
|
---|
| 1104 | Const JOY_BUTTON15 = &H00004000
|
---|
| 1105 | Const JOY_BUTTON16 = &H00008000
|
---|
| 1106 | Const JOY_BUTTON17 = &H00010000
|
---|
| 1107 | Const JOY_BUTTON18 = &H00020000
|
---|
| 1108 | Const JOY_BUTTON19 = &H00040000
|
---|
| 1109 | Const JOY_BUTTON20 = &H00080000
|
---|
| 1110 | Const JOY_BUTTON21 = &H00100000
|
---|
| 1111 | Const JOY_BUTTON22 = &H00200000
|
---|
| 1112 | Const JOY_BUTTON23 = &H00400000
|
---|
| 1113 | Const JOY_BUTTON24 = &H00800000
|
---|
| 1114 | Const JOY_BUTTON25 = &H01000000
|
---|
| 1115 | Const JOY_BUTTON26 = &H02000000
|
---|
| 1116 | Const JOY_BUTTON27 = &H04000000
|
---|
| 1117 | Const JOY_BUTTON28 = &H08000000
|
---|
| 1118 | Const JOY_BUTTON29 = &H10000000
|
---|
| 1119 | Const JOY_BUTTON30 = &H20000000
|
---|
| 1120 | Const JOY_BUTTON31 = &H40000000
|
---|
| 1121 | Const JOY_BUTTON32 = &H80000000
|
---|
| 1122 |
|
---|
| 1123 | ' constants used with JOYINFOEX structure
|
---|
| 1124 | Const JOY_POVCENTERED = (-1)
|
---|
| 1125 | Const JOY_POVFORWARD = 0
|
---|
| 1126 | Const JOY_POVRIGHT = 9000
|
---|
| 1127 | Const JOY_POVBACKWARD = 18000
|
---|
| 1128 | Const JOY_POVLEFT = 27000
|
---|
| 1129 |
|
---|
| 1130 | Const JOY_RETURNX = &H00000001
|
---|
| 1131 | Const JOY_RETURNY = &H00000002
|
---|
| 1132 | Const JOY_RETURNZ = &H00000004
|
---|
| 1133 | Const JOY_RETURNR = &H00000008
|
---|
| 1134 | Const JOY_RETURNU = &H00000010
|
---|
| 1135 | Const JOY_RETURNV = &H00000020
|
---|
| 1136 | Const JOY_RETURNPOV = &H00000040
|
---|
| 1137 | Const JOY_RETURNBUTTONS = &H00000080
|
---|
| 1138 | Const JOY_RETURNRAWDATA = &H00000100
|
---|
| 1139 | Const JOY_RETURNPOVCTS = &H00000200
|
---|
| 1140 | Const JOY_RETURNCENTERED = &H00000400
|
---|
| 1141 | Const JOY_USEDEADZONE = &H00000800
|
---|
| 1142 | Const JOY_RETURNALL = (JOY_RETURNX OR JOY_RETURNY OR JOY_RETURNZ OR JOY_RETURNR OR JOY_RETURNU OR JOY_RETURNV OR JOY_RETURNPOV OR JOY_RETURNBUTTONS)
|
---|
| 1143 | Const JOY_CAL_READALWAYS = &H00010000
|
---|
| 1144 | Const JOY_CAL_READXYONLY = &H00020000
|
---|
| 1145 | Const JOY_CAL_READ3 = &H00040000
|
---|
| 1146 | Const JOY_CAL_READ4 = &H00080000
|
---|
| 1147 | Const JOY_CAL_READXONLY = &H00100000
|
---|
| 1148 | Const JOY_CAL_READYONLY = &H00200000
|
---|
| 1149 | Const JOY_CAL_READ5 = &H00400000
|
---|
| 1150 | Const JOY_CAL_READ6 = &H00800000
|
---|
| 1151 | Const JOY_CAL_READZONLY = &H01000000
|
---|
| 1152 | Const JOY_CAL_READRONLY = &H02000000
|
---|
| 1153 | Const JOY_CAL_READUONLY = &H04000000
|
---|
| 1154 | Const JOY_CAL_READVONLY = &H08000000
|
---|
| 1155 |
|
---|
| 1156 | ' joystick ID constants
|
---|
| 1157 | Const JOYSTICKID1 = 0
|
---|
| 1158 | Const JOYSTICKID2 = 1
|
---|
| 1159 |
|
---|
| 1160 | ' joystick driver capabilites
|
---|
| 1161 | Const JOYCAPS_HASZ = &H0001
|
---|
| 1162 | Const JOYCAPS_HASR = &H0002
|
---|
| 1163 | Const JOYCAPS_HASU = &H0004
|
---|
| 1164 | Const JOYCAPS_HASV = &H0008
|
---|
| 1165 | Const JOYCAPS_HASPOV = &H0010
|
---|
| 1166 | Const JOYCAPS_POV4DIR = &H0020
|
---|
| 1167 | Const JOYCAPS_POVCTS = &H0040
|
---|
| 1168 |
|
---|
| 1169 | Type JOYCAPSA
|
---|
| 1170 | wMid As Word
|
---|
| 1171 | wPid As Word
|
---|
| 1172 | szPname[ELM(MAXPNAMELEN)] As Char
|
---|
| 1173 | wXmin As DWord
|
---|
| 1174 | wXmax As DWord
|
---|
| 1175 | wYmin As DWord
|
---|
| 1176 | wYmax As DWord
|
---|
| 1177 | wZmin As DWord
|
---|
| 1178 | wZmax As DWord
|
---|
| 1179 | wNumButtons As DWord
|
---|
| 1180 | wPeriodMin As DWord
|
---|
| 1181 | wPeriodMax As DWord
|
---|
| 1182 | wRmin As DWord
|
---|
| 1183 | wRmax As DWord
|
---|
| 1184 | wUmin As DWord
|
---|
| 1185 | wUmax As DWord
|
---|
| 1186 | wVmin As DWord
|
---|
| 1187 | wVmax As DWord
|
---|
| 1188 | wCaps As DWord
|
---|
| 1189 | wMaxAxes As DWord
|
---|
| 1190 | wNumAxes As DWord
|
---|
| 1191 | wMaxButtons As DWord
|
---|
| 1192 | szRegKey[ELM(MAXPNAMELEN)] As Char
|
---|
| 1193 | szOEMVxD[ELM(MAX_JOYSTICKOEMVXDNAME)] As Char
|
---|
| 1194 | End Type
|
---|
| 1195 | TypeDef PJOYCAPSA = *JOYCAPSA
|
---|
| 1196 | TypeDef NPJOYCAPSA = *JOYCAPSA
|
---|
| 1197 | TypeDef LPJOYCAPSA = *JOYCAPSA
|
---|
| 1198 |
|
---|
| 1199 | TypeDef JOYCAPS = JOYCAPSA
|
---|
| 1200 | TypeDef PJOYCAPS = PJOYCAPSA
|
---|
| 1201 | TypeDef NPJOYCAPS = NPJOYCAPSA
|
---|
| 1202 | TypeDef LPJOYCAPS = LPJOYCAPSA
|
---|
| 1203 |
|
---|
| 1204 | Type JOYINFO
|
---|
| 1205 | wXpos As DWord
|
---|
| 1206 | wYpos As DWord
|
---|
| 1207 | wZpos As DWord
|
---|
| 1208 | wButtons As DWord
|
---|
| 1209 | End Type
|
---|
[76] | 1210 | TypeDef PJOYINFO = *JOYINFO
|
---|
[75] | 1211 | TypeDef NPJOYINFO = *JOYINFO
|
---|
| 1212 | TypeDef LPJOYINFO = *JOYINFO
|
---|
| 1213 |
|
---|
| 1214 | Type JOYINFOEX
|
---|
| 1215 | dwSize As DWord
|
---|
| 1216 | dwFlags As DWord
|
---|
| 1217 | dwXpos As DWord
|
---|
| 1218 | dwYpos As DWord
|
---|
| 1219 | dwZpos As DWord
|
---|
| 1220 | dwRpos As DWord
|
---|
| 1221 | dwUpos As DWord
|
---|
| 1222 | dwVpos As DWord
|
---|
| 1223 | dwButtons As DWord
|
---|
| 1224 | dwButtonNumber As DWord
|
---|
| 1225 | dwPOV As DWord
|
---|
| 1226 | dwReserved1 As DWord
|
---|
| 1227 | dwReserved2 As DWord
|
---|
| 1228 | End Type
|
---|
| 1229 | TypeDef PJOYINFOEX = *JOYINFOEX
|
---|
| 1230 | TypeDef NPJOYINFOEX = *JOYINFOEX
|
---|
| 1231 | TypeDef LPJOYINFOEX = *JOYINFOEX
|
---|
| 1232 |
|
---|
| 1233 | ' joystick function prototypes
|
---|
| 1234 | Declare Function joyGetNumDevs Lib "winmm" () As DWord
|
---|
| 1235 | Declare Function joyGetDevCaps Lib "winmm" Alias "joyGetDevCapsA" (uJoyID As DWord, pjc As *JOYCAPS, cbjc As DWord) As MMRESULT
|
---|
| 1236 | Declare Function joyGetPos Lib "winmm" (uJoyID As DWord, pji As *JOYINFO) As MMRESULT
|
---|
| 1237 | Declare Function joyGetPosEx Lib "winmm" (uJoyID As DWord, pji As *JOYINFOEX) As MMRESULT
|
---|
| 1238 | Declare Function joyGetThreshold Lib "winmm" (uJoyID As DWord, puThreshold As *DWord) As MMRESULT
|
---|
| 1239 | Declare Function joyReleaseCapture Lib "winmm" (uJoyID As DWord) As MMRESULT
|
---|
| 1240 | Declare Function joySetCapture Lib "winmm" (hwnd As HWND, uJoyID As DWord, uPeriod As DWord, fChanged As BOOL) As MMRESULT
|
---|
| 1241 | Declare Function joySetThreshold Lib "winmm" (uJoyID As DWord, uThreshold As DWord) As MMRESULT
|
---|
| 1242 |
|
---|
| 1243 |
|
---|
| 1244 | '--------------------------------------------------------
|
---|
| 1245 | ' Multimedia File I/O support
|
---|
| 1246 |
|
---|
| 1247 | ' MMIO error return values
|
---|
| 1248 | Const MMIOERR_BASE = 256
|
---|
| 1249 | Const MMIOERR_FILENOTFOUND = (MMIOERR_BASE + 1)
|
---|
| 1250 | Const MMIOERR_OUTOFMEMORY = (MMIOERR_BASE + 2)
|
---|
| 1251 | Const MMIOERR_CANNOTOPEN = (MMIOERR_BASE + 3)
|
---|
| 1252 | Const MMIOERR_CANNOTCLOSE = (MMIOERR_BASE + 4)
|
---|
| 1253 | Const MMIOERR_CANNOTREAD = (MMIOERR_BASE + 5)
|
---|
| 1254 | Const MMIOERR_CANNOTWRITE = (MMIOERR_BASE + 6)
|
---|
| 1255 | Const MMIOERR_CANNOTSEEK = (MMIOERR_BASE + 7)
|
---|
| 1256 | Const MMIOERR_CANNOTEXPAND = (MMIOERR_BASE + 8)
|
---|
| 1257 | Const MMIOERR_CHUNKNOTFOUND = (MMIOERR_BASE + 9)
|
---|
| 1258 | Const MMIOERR_UNBUFFERED = (MMIOERR_BASE + 10)
|
---|
| 1259 | Const MMIOERR_PATHNOTFOUND = (MMIOERR_BASE + 11)
|
---|
| 1260 | Const MMIOERR_ACCESSDENIED = (MMIOERR_BASE + 12)
|
---|
| 1261 | Const MMIOERR_SHARINGVIOLATION = (MMIOERR_BASE + 13)
|
---|
| 1262 | Const MMIOERR_NETWORKERROR = (MMIOERR_BASE + 14)
|
---|
| 1263 | Const MMIOERR_TOOMANYOPENFILES = (MMIOERR_BASE + 15)
|
---|
| 1264 | Const MMIOERR_INVALIDFILE = (MMIOERR_BASE + 16)
|
---|
| 1265 |
|
---|
| 1266 | ' MMIO constants
|
---|
| 1267 | Const CFSEPCHAR = "+"
|
---|
| 1268 |
|
---|
| 1269 | ' MMIO data types
|
---|
| 1270 | TypeDef FOURCC = DWord
|
---|
| 1271 | TypeDef HPSTR = *Char
|
---|
| 1272 | TypeDef HMMIO = VoidPtr
|
---|
| 1273 |
|
---|
| 1274 | TypeDef LPMMIOPROC = *Function(lpmmioinfo As LPSTR, uMsg As DWord, lParam1 As LPARAM, lParam2 As LPARAM) As LRESULT
|
---|
| 1275 |
|
---|
| 1276 | Type MMIOINFO
|
---|
| 1277 | dwFlags As DWord
|
---|
| 1278 | fccIOProc As FOURCC
|
---|
| 1279 | pIOProc As LPMMIOPROC
|
---|
| 1280 | wErrorRet As DWord
|
---|
| 1281 | htask As HTASK
|
---|
| 1282 | cchBuffer As Long
|
---|
| 1283 | pchBuffer As HPSTR
|
---|
| 1284 | pchNext As HPSTR
|
---|
| 1285 | pchEndRead As HPSTR
|
---|
| 1286 | pchEndWrite As HPSTR
|
---|
| 1287 | lBufOffset As Long
|
---|
| 1288 | lDiskOffset As Long
|
---|
| 1289 | adwInfo[ELM(3)] As DWord
|
---|
| 1290 | dwReserved1 As DWord
|
---|
| 1291 | dwReserved2 As DWord
|
---|
| 1292 | hmmio As HMMIO
|
---|
| 1293 | End Type
|
---|
| 1294 | TypeDef PMMIOINFO = *MMIOINFO
|
---|
| 1295 | TypeDef NPMMIOINFO = *MMIOINFO
|
---|
| 1296 | TypeDef LPMMIOINFO = *MMIOINFO
|
---|
| 1297 |
|
---|
| 1298 | Type MMCKINFO
|
---|
| 1299 | ckid As FOURCC
|
---|
| 1300 | cksize As DWord
|
---|
| 1301 | fccType As FOURCC
|
---|
| 1302 | dwDataOffset As DWord
|
---|
| 1303 | dwFlags As DWord
|
---|
| 1304 | End Type
|
---|
| 1305 | TypeDef PMMCKINFO = *MMCKINFO
|
---|
| 1306 | TypeDef NPMMCKINFO = *MMCKINFO
|
---|
| 1307 | TypeDef LPMMCKINFO = *MMCKINFO
|
---|
| 1308 |
|
---|
| 1309 | Const MMIO_RWMODE = &H00000003
|
---|
| 1310 | Const MMIO_SHAREMODE = &H00000070
|
---|
| 1311 | Const MMIO_CREATE = &H00001000
|
---|
| 1312 | Const MMIO_PARSE = &H00000100
|
---|
| 1313 | Const MMIO_DELETE = &H00000200
|
---|
| 1314 | Const MMIO_EXIST = &H00004000
|
---|
| 1315 | Const MMIO_ALLOCBUF = &H00010000
|
---|
| 1316 | Const MMIO_GETTEMP = &H00020000
|
---|
| 1317 | Const MMIO_DIRTY = &H10000000
|
---|
| 1318 | Const MMIO_READ = &H00000000
|
---|
| 1319 | Const MMIO_WRITE = &H00000001
|
---|
| 1320 | Const MMIO_READWRITE = &H00000002
|
---|
| 1321 | Const MMIO_COMPAT = &H00000000
|
---|
| 1322 | Const MMIO_EXCLUSIVE = &H00000010
|
---|
| 1323 | Const MMIO_DENYWRITE = &H00000020
|
---|
| 1324 | Const MMIO_DENYREAD = &H00000030
|
---|
| 1325 | Const MMIO_DENYNONE = &H00000040
|
---|
| 1326 | Const MMIO_FHOPEN = &H0010
|
---|
| 1327 | Const MMIO_EMPTYBUF = &H0010
|
---|
| 1328 | Const MMIO_TOUPPER = &H0010
|
---|
| 1329 | Const MMIO_INSTALLPROC = &H00010000
|
---|
| 1330 | Const MMIO_GLOBALPROC = &H10000000
|
---|
| 1331 | Const MMIO_REMOVEPROC = &H00020000
|
---|
| 1332 | Const MMIO_UNICODEPROC = &H01000000
|
---|
| 1333 | Const MMIO_FINDPROC = &H00040000
|
---|
| 1334 | Const MMIO_FINDCHUNK = &H0010
|
---|
| 1335 | Const MMIO_FINDRIFF = &H0020
|
---|
| 1336 | Const MMIO_FINDLIST = &H0040
|
---|
| 1337 | Const MMIO_CREATERIFF = &H0020
|
---|
| 1338 | Const MMIO_CREATELIST = &H0040
|
---|
| 1339 |
|
---|
| 1340 | Const MMIOM_READ = MMIO_READ
|
---|
| 1341 | Const MMIOM_WRITE = MMIO_WRITE
|
---|
| 1342 | Const MMIOM_SEEK = 2
|
---|
| 1343 | Const MMIOM_OPEN = 3
|
---|
| 1344 | Const MMIOM_CLOSE = 4
|
---|
| 1345 | Const MMIOM_WRITEFLUSH = 5
|
---|
| 1346 | Const MMIOM_RENAME = 6
|
---|
| 1347 | Const MMIOM_USER = &H8000
|
---|
| 1348 |
|
---|
| 1349 | Const FOURCC_RIFF = MAKEFOURCC(&H52, &H49, &H46, &H46)
|
---|
| 1350 | Const FOURCC_LIST = MAKEFOURCC(&H4C, &H49, &H53, &H54)
|
---|
| 1351 | Const FOURCC_DOS = MAKEFOURCC(&H44, &H4F, &H53, &H20)
|
---|
| 1352 | Const FOURCC_MEM = MAKEFOURCC(&H4D, &H45, &H4D, &H20)
|
---|
| 1353 |
|
---|
| 1354 | Const SEEK_SET = 0
|
---|
| 1355 | Const SEEK_CUR = 1
|
---|
| 1356 | Const SEEK_END = 2
|
---|
| 1357 |
|
---|
| 1358 | Const MMIO_DEFAULTBUFFER = 8192
|
---|
| 1359 |
|
---|
| 1360 | Function mmioFOURCC(ch0 As String, ch1 As String, ch2 As String, ch3 As String) As FOURCC
|
---|
| 1361 | mmioFOURCC = MAKEFOURCC(Asc(ch0), Asc(ch1), Asc(ch2), Asc(ch3))
|
---|
| 1362 | End Function
|
---|
| 1363 |
|
---|
| 1364 | ' MMIO function prototypes
|
---|
| 1365 | Declare Function mmioStringToFOURCC Lib "winmm" Alias "mmioStringToFOURCCA" (sz As LPSTR, uFlags As DWord) As FOURCC
|
---|
| 1366 | Declare Function mmioInstallIOProc Lib "winmm" Alias "mmioInstallIOProcA" (fccIOProc As FOURCC, pIOProc As LPMMIOPROC, dwFlags As DWord) As LPMMIOPROC
|
---|
| 1367 | Declare Function mmioOpen Lib "winmm" Alias "mmioOpenA" (pszFileName As LPSTR, pmmioinfo As *MMIOINFO, fdwOpen As DWord) As HMMIO
|
---|
| 1368 | Declare Function mmioRename Lib "winmm" Alias "mmioRenameA" (pszFileName As LPSTR, pszNewFileName As LPSTR, pmmioinfo As *MMIOINFO, fdwRename As DWord) As MMRESULT
|
---|
| 1369 | Declare Function mmioClose Lib "winmm" (hmmio As HMMIO, fuClose As DWord) As MMRESULT
|
---|
| 1370 | Declare Function mmioRead Lib "winmm" (hmmio As HMMIO, pch As HPSTR, cch As Long) As Long
|
---|
| 1371 | Declare Function mmioWrite Lib "winmm" (hmmio As HMMIO, pch As HPSTR, cch As Long) As Long
|
---|
| 1372 | Declare Function mmioSeek Lib "winmm" (hmmio As HMMIO, lOffset As Long, iOrigin As Long) As Long
|
---|
| 1373 | Declare Function mmioGetInfo Lib "winmm" (hmmio As HMMIO, pmmioinfo As *MMIOINFO, fuInfo As DWord) As MMRESULT
|
---|
| 1374 | Declare Function mmioSetInfo Lib "winmm" (hmmio As HMMIO, pmmioinfo As *MMIOINFO, fuInfo As DWord) As MMRESULT
|
---|
| 1375 | Declare Function mmioSetBuffer Lib "winmm" (hmmio As HMMIO, pchBuffer As LPSTR, cchBuffer As Long, fuBuffer As DWord) As MMRESULT
|
---|
| 1376 | Declare Function mmioFlush Lib "winmm" (hmmio As HMMIO, fuFlush As DWord) As MMRESULT
|
---|
| 1377 | Declare Function mmioAdvance Lib "winmm" (hmmio As HMMIO, pmmioinfo As *MMIOINFO, fuAdvance As DWord) As MMRESULT
|
---|
| 1378 | Declare Function mmioSendMessage Lib "winmm" (hmmio As HMMIO, uMsg As DWord, lParam1 As LPARAM, lParam2 As LPARAM) As LRESULT
|
---|
| 1379 | Declare Function mmioDescend Lib "winmm" (hmmio As HMMIO, pmmcki As *MMCKINFO, pmmckiParent As *MMCKINFO, fuDescend As DWord) As MMRESULT
|
---|
| 1380 | Declare Function mmioAscend Lib "winmm" (hmmio As HMMIO, pmmcki As *MMCKINFO, fuAscend As DWord) As MMRESULT
|
---|
| 1381 | Declare Function mmioCreateChunk Lib "winmm" (hmmio As HMMIO, pmmcki As *MMCKINFO, fuCreate As DWord) As MMRESULT
|
---|
| 1382 |
|
---|
| 1383 |
|
---|
| 1384 | '--------------------------------------------------------
|
---|
| 1385 | ' MCI support
|
---|
| 1386 |
|
---|
| 1387 | '--------------------------------------------------------
|
---|
[1] | 1388 | ' Time Format(used in MCI_SET_PARAMS, MCI_STATUS_PARAMS)
|
---|
| 1389 |
|
---|
| 1390 | Const MCI_FORMAT_MILLISECONDS = 0
|
---|
| 1391 | Const MCI_FORMAT_HMS = 1
|
---|
| 1392 | Const MCI_FORMAT_MSF = 2
|
---|
| 1393 | Const MCI_FORMAT_FRAMES = 3
|
---|
| 1394 | Const MCI_FORMAT_SMPTE_24 = 4
|
---|
| 1395 | Const MCI_FORMAT_SMPTE_25 = 5
|
---|
| 1396 | Const MCI_FORMAT_SMPTE_30 = 6
|
---|
| 1397 | Const MCI_FORMAT_SMPTE_30DROP = 7
|
---|
| 1398 | Const MCI_FORMAT_BYTES = 8
|
---|
| 1399 | Const MCI_FORMAT_SAMPLES = 9
|
---|
| 1400 | Const MCI_FORMAT_TMSF = 10
|
---|
| 1401 |
|
---|
| 1402 |
|
---|
| 1403 | '--------------
|
---|
| 1404 | ' Types of MCI
|
---|
| 1405 | '--------------
|
---|
| 1406 |
|
---|
| 1407 | Type MCI_OPEN_PARMS
|
---|
| 1408 | dwCallback As DWord
|
---|
| 1409 | wDeviceID As DWord
|
---|
| 1410 | lpstrDeviceType As BytePtr
|
---|
| 1411 | lpstrElementName As BytePtr
|
---|
| 1412 | lpstrAlias As BytePtr
|
---|
| 1413 | End Type
|
---|
| 1414 |
|
---|
| 1415 | Type MCI_PLAY_PARMS
|
---|
| 1416 | dwCallback As DWord
|
---|
| 1417 | dwFrom As DWord
|
---|
| 1418 | dwTo As DWord
|
---|
| 1419 | End Type
|
---|
| 1420 |
|
---|
| 1421 | Type MCI_SEEK_PARMS
|
---|
| 1422 | dwCallback As DWord
|
---|
| 1423 | dwTo As DWord
|
---|
| 1424 | End Type
|
---|
| 1425 |
|
---|
| 1426 | Type MCI_SET_PARMS
|
---|
| 1427 | dwCallback As DWord
|
---|
| 1428 | dwTimeFormat As DWord
|
---|
| 1429 | dwAudio As DWord
|
---|
| 1430 | End Type
|
---|
| 1431 |
|
---|
| 1432 | Const MCI_STATUS_LENGTH = &H00000001
|
---|
| 1433 | Const MCI_STATUS_POSITION = &H00000002
|
---|
| 1434 | Const MCI_STATUS_NUMBER_OF_TRACKS = &H00000003
|
---|
| 1435 | Const MCI_STATUS_MODE = &H00000004
|
---|
| 1436 | Const MCI_STATUS_MEDIA_PRESENT = &H00000005
|
---|
| 1437 | Const MCI_STATUS_TIME_FORMAT = &H00000006
|
---|
| 1438 | Const MCI_STATUS_READY = &H00000007
|
---|
| 1439 | Const MCI_STATUS_CURRENT_TRACK = &H00000008
|
---|
| 1440 | Type MCI_STATUS_PARMS
|
---|
| 1441 | dwCallback As DWord
|
---|
| 1442 | dwReturn As DWord
|
---|
| 1443 | dwItem As DWord
|
---|
| 1444 | dwTrack As DWord
|
---|
| 1445 | End Type
|
---|
| 1446 |
|
---|
| 1447 |
|
---|
| 1448 | '------------
|
---|
| 1449 | ' MCI Macros
|
---|
| 1450 |
|
---|
| 1451 | Function MCI_MAKE_TMSF(tracks As Byte, minutes As Byte, seconds As Byte, frames As Byte) As DWord
|
---|
| 1452 | MCI_MAKE_TMSF=MAKELONG(MAKEWORD(tracks,minutes),MAKEWORD(seconds,frames))
|
---|
| 1453 | End Function
|
---|
| 1454 |
|
---|
| 1455 | Function MCI_MSF_MINUTE(dwMFS As DWord) As Byte
|
---|
| 1456 | MCI_MSF_MINUTE=LOBYTE(LOWORD(dwMFS))
|
---|
| 1457 | End Function
|
---|
| 1458 |
|
---|
| 1459 | Function MCI_MSF_SECOND(dwMFS As DWord) As Byte
|
---|
| 1460 | MCI_MSF_SECOND=HIBYTE(LOWORD(dwMFS))
|
---|
| 1461 | End Function
|
---|
| 1462 |
|
---|
| 1463 |
|
---|
| 1464 | '---------------
|
---|
| 1465 | ' MCI Functions
|
---|
| 1466 |
|
---|
| 1467 | ' common flags for dwFlags parameter of MCI command messages
|
---|
| 1468 | Const MCI_NOTIFY = &H00000001
|
---|
| 1469 | Const MCI_WAIT = &H00000002
|
---|
| 1470 | Const MCI_FROM = &H00000004
|
---|
| 1471 | Const MCI_TO = &H00000008
|
---|
| 1472 | Const MCI_TRACK = &H00000010
|
---|
| 1473 |
|
---|
| 1474 | ' flags for dwFlags parameter of MCI_OPEN command message
|
---|
| 1475 | Const MCI_OPEN_SHAREABLE = &H00000100
|
---|
| 1476 | Const MCI_OPEN_ELEMENT = &H00000200
|
---|
| 1477 | Const MCI_OPEN_ALIAS = &H00000400
|
---|
| 1478 | Const MCI_OPEN_ELEMENT_ID = &H00000800
|
---|
| 1479 | Const MCI_OPEN_TYPE_ID = &H00001000
|
---|
| 1480 | Const MCI_OPEN_TYPE = &H00002000
|
---|
| 1481 | Const MCI_ANIM_OPEN_WS = &H00010000
|
---|
| 1482 | Const MCI_ANIM_OPEN_PARENT = &H00020000
|
---|
| 1483 | Const MCI_ANIM_OPEN_NOSTATIC = &H00040000
|
---|
| 1484 | Const MCI_DGV_OPEN_WS = &H00010000
|
---|
| 1485 | Const MCI_DGV_OPEN_PARENT = &H00020000
|
---|
| 1486 | Const MCI_DGV_OPEN_NOSTATIC = &H00040000
|
---|
| 1487 | Const MCI_DGV_OPEN_16BIT = &H00080000
|
---|
| 1488 | Const MCI_DGV_OPEN_32BIT = &H00100000
|
---|
| 1489 | Const MCI_OVLY_OPEN_WS = &H00010000
|
---|
| 1490 | Const MCI_OVLY_OPEN_PARENT = &H00020000
|
---|
| 1491 |
|
---|
| 1492 | ' flags for dwFlags parameter of MCI_PLAY command message
|
---|
| 1493 | Const MCI_ANIM_PLAY_SPEED = &H00010000
|
---|
| 1494 | Const MCI_ANIM_PLAY_REVERSE = &H00020000
|
---|
| 1495 | Const MCI_ANIM_PLAY_FAST = &H00040000
|
---|
| 1496 | Const MCI_ANIM_PLAY_SLOW = &H00080000
|
---|
| 1497 | Const MCI_ANIM_PLAY_SCAN = &H00100000
|
---|
| 1498 | Const MCI_DGV_PLAY_REPEAT = &H00010000
|
---|
| 1499 | Const MCI_DGV_PLAY_REVERSE = &H00020000
|
---|
| 1500 | Const MCI_MCIAVI_PLAY_WINDOW = &H01000000
|
---|
| 1501 | Const MCI_MCIAVI_PLAY_FULLSCREEN = &H02000000
|
---|
| 1502 | Const MCI_VCR_PLAY_REVERSE = &H00010000
|
---|
| 1503 | Const MCI_VCR_PLAY_AT = &H00020000
|
---|
| 1504 | Const MCI_VCR_PLAY_SCAN = &H00040000
|
---|
| 1505 | Const MCI_VD_PLAY_REVERSE = &H00010000
|
---|
| 1506 | Const MCI_VD_PLAY_FAST = &H00020000
|
---|
| 1507 | Const MCI_VD_PLAY_SPEED = &H00040000
|
---|
| 1508 | Const MCI_VD_PLAY_SCAN = &H00080000
|
---|
| 1509 | Const MCI_VD_PLAY_SLOW = &H00100000
|
---|
| 1510 |
|
---|
| 1511 | ' flags for dwFlags parameter of MCI_SEEK command message
|
---|
| 1512 | Const MCI_SEEK_TO_START = &H00000100
|
---|
| 1513 | Const MCI_SEEK_TO_END = &H00000200
|
---|
| 1514 | Const MCI_VCR_SEEK_REVERSE = &H00010000
|
---|
| 1515 | Const MCI_VCR_SEEK_MARK = &H00020000
|
---|
| 1516 | Const MCI_VCR_SEEK_AT = &H00040000
|
---|
| 1517 | Const MCI_VD_SEEK_REVERSE = &H00010000
|
---|
| 1518 |
|
---|
| 1519 | ' flags for dwFlags parameter of MCI_SET command message
|
---|
| 1520 | Const MCI_SET_DOOR_OPEN = &H00000100
|
---|
| 1521 | Const MCI_SET_DOOR_CLOSED = &H00000200
|
---|
| 1522 | Const MCI_SET_TIME_FORMAT = &H00000400
|
---|
| 1523 | Const MCI_SET_AUDIO = &H00000800
|
---|
| 1524 | Const MCI_SET_VIDEO = &H00001000
|
---|
| 1525 | Const MCI_SET_ON = &H00002000
|
---|
| 1526 | Const MCI_SET_OFF = &H00004000
|
---|
| 1527 | Const MCI_DGV_SET_SEEK_EXACTLY = &H00010000
|
---|
| 1528 | Const MCI_DGV_SET_SPEED = &H00020000
|
---|
| 1529 | Const MCI_DGV_SET_STILL = &H00040000
|
---|
| 1530 | Const MCI_DGV_SET_FILEFORMAT = &H00080000
|
---|
| 1531 | Const MCI_SEQ_FORMAT_SONGPTR = &H4001
|
---|
| 1532 | Const MCI_SEQ_FILE = &H4002
|
---|
| 1533 | Const MCI_SEQ_MIDI = &H4003
|
---|
| 1534 | Const MCI_SEQ_SMPTE = &H4004
|
---|
| 1535 | Const MCI_SEQ_NONE = 65533
|
---|
| 1536 | Const MCI_SEQ_MAPPER = 65535
|
---|
| 1537 | Const MCI_SEQ_SET_TEMPO = &H00010000
|
---|
| 1538 | Const MCI_SEQ_SET_PORT = &H00020000
|
---|
| 1539 | Const MCI_SEQ_SET_SLAVE = &H00040000
|
---|
| 1540 | Const MCI_SEQ_SET_MASTER = &H00080000
|
---|
| 1541 | Const MCI_SEQ_SET_OFFSET = &H01000000
|
---|
| 1542 | Const MCI_VCR_SET_TIME_MODE = &H00010000
|
---|
| 1543 | Const MCI_VCR_SET_POWER = &H00020000
|
---|
| 1544 | Const MCI_VCR_SET_RECORD_FORMAT = &H00040000
|
---|
| 1545 | Const MCI_VCR_SET_COUNTER_FORMAT = &H00080000
|
---|
| 1546 | Const MCI_VCR_SET_INDEX = &H00100000
|
---|
| 1547 | Const MCI_VCR_SET_ASSEMBLE_RECORD = &H00200000
|
---|
| 1548 | Const MCI_VCR_SET_TRACKING = &H00400000
|
---|
| 1549 | Const MCI_VCR_SET_SPEED = &H00800000
|
---|
| 1550 | Const MCI_VCR_SET_TAPE_LENGTH = &H01000000
|
---|
| 1551 | Const MCI_VCR_SET_COUNTER_VALUE = &H02000000
|
---|
| 1552 | Const MCI_VCR_SET_CLOCK = &H04000000
|
---|
| 1553 | Const MCI_VCR_SET_PAUSE_TIMEOUT = &H08000000
|
---|
| 1554 | Const MCI_VCR_SET_PREROLL_DURATION = &H10000000
|
---|
| 1555 | Const MCI_VCR_SET_POSTROLL_DURATION = &H20000000
|
---|
| 1556 | Const MCI_VD_FORMAT_TRACK = &H4001
|
---|
| 1557 | Const MCI_WAVE_SET_FORMATTAG = &H00010000
|
---|
| 1558 | Const MCI_WAVE_SET_CHANNELS = &H00020000
|
---|
| 1559 | Const MCI_WAVE_SET_SAMPLESPERSEC = &H00040000
|
---|
| 1560 | Const MCI_WAVE_SET_AVGBYTESPERSEC = &H00080000
|
---|
| 1561 | Const MCI_WAVE_SET_BLOCKALIGN = &H00100000
|
---|
| 1562 | Const MCI_WAVE_SET_BITSPERSAMPLE = &H00200000
|
---|
| 1563 | Const MCI_WAVE_INPUT = &H00400000
|
---|
| 1564 | Const MCI_WAVE_OUTPUT = &H00800000
|
---|
| 1565 | Const MCI_WAVE_SET_ANYINPUT = &H04000000
|
---|
| 1566 | Const MCI_WAVE_SET_ANYOUTPUT = &H08000000
|
---|
| 1567 |
|
---|
| 1568 | ' flags for dwFlags parameter of MCI_STATUS command message
|
---|
| 1569 | Const MCI_STATUS_ITEM = &H00000100
|
---|
| 1570 | Const MCI_STATUS_START = &H00000200
|
---|
| 1571 | Const MCI_CDA_STATUS_TYPE_TRACK = &H00004001
|
---|
| 1572 | Const MCI_CDA_TRACK_AUDIO = MCI_CD_OFFSET+0
|
---|
| 1573 | Const MCI_CDA_TRACK_OTHER = MCI_CD_OFFSET+1
|
---|
| 1574 | Const MCI_DGV_STATUS_NOMINAL = &H00020000
|
---|
| 1575 | Const MCI_DGV_STATUS_REFERENCE = &H00040000
|
---|
| 1576 | Const MCI_DGV_STATUS_LEFT = &H00080000
|
---|
| 1577 | Const MCI_DGV_STATUS_RIGHT = &H00100000
|
---|
| 1578 | Const MCI_DGV_STATUS_DISKSPACE = &H00200000
|
---|
| 1579 | Const MCI_DGV_STATUS_INPUT = &H00400000
|
---|
| 1580 | Const MCI_DGV_STATUS_OUTPUT = &H00800000
|
---|
| 1581 | Const MCI_DGV_STATUS_RECORD = &H01000000
|
---|
| 1582 |
|
---|
| 1583 | ' constants for predefined MCI device types
|
---|
| 1584 | Const MCI_DEVTYPE_VCR = 513
|
---|
| 1585 | Const MCI_DEVTYPE_VIDEODISC = 514
|
---|
| 1586 | Const MCI_DEVTYPE_OVERLAY = 515
|
---|
| 1587 | Const MCI_DEVTYPE_CD_AUDIO = 516
|
---|
| 1588 | Const MCI_DEVTYPE_DAT = 517
|
---|
| 1589 | Const MCI_DEVTYPE_SCANNER = 518
|
---|
| 1590 | Const MCI_DEVTYPE_ANIMATION = 519
|
---|
| 1591 | Const MCI_DEVTYPE_DIGITAL_VIDEO = 520
|
---|
| 1592 | Const MCI_DEVTYPE_OTHER = 521
|
---|
| 1593 | Const MCI_DEVTYPE_WAVEFORM_AUDIO = 522
|
---|
| 1594 | Const MCI_DEVTYPE_SEQUENCER = 523
|
---|
| 1595 |
|
---|
| 1596 | ' return values for 'status mode' command
|
---|
| 1597 | Const MCI_MODE_NOT_READY = MCI_STRING_OFFSET + 12
|
---|
| 1598 | Const MCI_MODE_STOP = MCI_STRING_OFFSET + 13
|
---|
| 1599 | Const MCI_MODE_PLAY = MCI_STRING_OFFSET + 14
|
---|
| 1600 | Const MCI_MODE_RECORD = MCI_STRING_OFFSET + 15
|
---|
| 1601 | Const MCI_MODE_SEEK = MCI_STRING_OFFSET + 16
|
---|
| 1602 | Const MCI_MODE_PAUSE = MCI_STRING_OFFSET + 17
|
---|
| 1603 | Const MCI_MODE_OPEN = MCI_STRING_OFFSET + 18
|
---|
| 1604 |
|
---|
| 1605 | Const MCI_OPEN = &H0803
|
---|
| 1606 | Const MCI_CLOSE = &H0804
|
---|
| 1607 | Const MCI_ESCAPE = &H0805
|
---|
| 1608 | Const MCI_PLAY = &H0806
|
---|
| 1609 | Const MCI_SEEK = &H0807
|
---|
| 1610 | Const MCI_STOP = &H0808
|
---|
| 1611 | Const MCI_PAUSE = &H0809
|
---|
| 1612 | Const MCI_INFO = &H080A
|
---|
| 1613 | Const MCI_GETDEVCAPS = &H080B
|
---|
| 1614 | Const MCI_SPIN = &H080C
|
---|
| 1615 | Const MCI_SET = &H080D
|
---|
| 1616 | Const MCI_STEP = &H080E
|
---|
| 1617 | Const MCI_RECORD = &H080F
|
---|
| 1618 | Const MCI_SYSINFO = &H0810
|
---|
| 1619 | Const MCI_BREAK = &H0811
|
---|
| 1620 | Const MCI_SAVE = &H0813
|
---|
| 1621 | Const MCI_STATUS = &H0814
|
---|
| 1622 | Const MCI_CUE = &H0830
|
---|
| 1623 | Const MCI_REALIZE = &H0840
|
---|
| 1624 | Const MCI_WINDOW = &H0841
|
---|
| 1625 | Const MCI_PUT = &H0842
|
---|
| 1626 | Const MCI_WHERE = &H0843
|
---|
| 1627 | Const MCI_FREEZE = &H0844
|
---|
| 1628 | Const MCI_UNFREEZE = &H0845
|
---|
| 1629 | Const MCI_LOAD = &H0850
|
---|
| 1630 | Const MCI_CUT = &H0851
|
---|
| 1631 | Const MCI_COPY = &H0852
|
---|
| 1632 | Const MCI_PASTE = &H0853
|
---|
| 1633 | Const MCI_UPDATE = &H0854
|
---|
| 1634 | Const MCI_RESUME = &H0855
|
---|
| 1635 | Const MCI_DELETE = &H0856
|
---|
| 1636 | Declare Function mciSendCommand Lib "winmm" Alias "mciSendCommandA" (dwMciID As DWord, uMsg As DWord, fdwCommand As DWord, ByRef lpParam As Any) As DWord
|
---|
| 1637 |
|
---|
| 1638 | Const MCIERR_INVALID_DEVICE_ID = MCIERR_BASE + 1
|
---|
| 1639 | Const MCIERR_UNRECOGNIZED_KEYWORD = MCIERR_BASE + 3
|
---|
| 1640 | Const MCIERR_UNRECOGNIZED_COMMAND = MCIERR_BASE + 5
|
---|
| 1641 | Const MCIERR_HARDWARE = MCIERR_BASE + 6
|
---|
| 1642 | Const MCIERR_INVALID_DEVICE_NAME = MCIERR_BASE + 7
|
---|
| 1643 | Const MCIERR_OUT_OF_MEMORY = MCIERR_BASE + 8
|
---|
| 1644 | Const MCIERR_DEVICE_OPEN = MCIERR_BASE + 9
|
---|
| 1645 | Const MCIERR_CANNOT_LOAD_DRIVER = MCIERR_BASE + 10
|
---|
| 1646 | Const MCIERR_MISSING_COMMAND_STRING = MCIERR_BASE + 11
|
---|
| 1647 | Const MCIERR_PARAM_OVERFLOW = MCIERR_BASE + 12
|
---|
| 1648 | Const MCIERR_MISSING_STRING_ARGUMENT = MCIERR_BASE + 13
|
---|
| 1649 | Const MCIERR_BAD_INTEGER = MCIERR_BASE + 14
|
---|
| 1650 | Const MCIERR_PARSER_INTERNAL = MCIERR_BASE + 15
|
---|
| 1651 | Const MCIERR_DRIVER_INTERNAL = MCIERR_BASE + 16
|
---|
| 1652 | Const MCIERR_MISSING_PARAMETER = MCIERR_BASE + 17
|
---|
| 1653 | Const MCIERR_UNSUPPORTED_FUNCTION = MCIERR_BASE + 18
|
---|
| 1654 | Const MCIERR_FILE_NOT_FOUND = MCIERR_BASE + 19
|
---|
| 1655 | Const MCIERR_DEVICE_NOT_READY = MCIERR_BASE + 20
|
---|
| 1656 | Const MCIERR_INTERNAL = MCIERR_BASE + 21
|
---|
| 1657 | Const MCIERR_DRIVER = MCIERR_BASE + 22
|
---|
| 1658 | Const MCIERR_CANNOT_USE_ALL = MCIERR_BASE + 23
|
---|
| 1659 | Const MCIERR_MULTIPLE = MCIERR_BASE + 24
|
---|
| 1660 | Const MCIERR_EXTENSION_NOT_FOUND = MCIERR_BASE + 25
|
---|
| 1661 | Const MCIERR_OUTOFRANGE = MCIERR_BASE + 26
|
---|
| 1662 | Const MCIERR_FLAGS_NOT_COMPATIBLE = MCIERR_BASE + 28
|
---|
| 1663 | Const MCIERR_FILE_NOT_SAVED = MCIERR_BASE + 30
|
---|
| 1664 | Const MCIERR_DEVICE_TYPE_REQUIRED = MCIERR_BASE + 31
|
---|
| 1665 | Const MCIERR_DEVICE_LOCKED = MCIERR_BASE + 32
|
---|
| 1666 | Const MCIERR_DUPLICATE_ALIAS = MCIERR_BASE + 33
|
---|
| 1667 | Const MCIERR_BAD_CONSTANT = MCIERR_BASE + 34
|
---|
| 1668 | Const MCIERR_MUST_USE_SHAREABLE = MCIERR_BASE + 35
|
---|
| 1669 | Const MCIERR_MISSING_DEVICE_NAME = MCIERR_BASE + 36
|
---|
| 1670 | Const MCIERR_BAD_TIME_FORMAT = MCIERR_BASE + 37
|
---|
| 1671 | Const MCIERR_NO_CLOSING_QUOTE = MCIERR_BASE + 38
|
---|
| 1672 | Const MCIERR_DUPLICATE_FLAGS = MCIERR_BASE + 39
|
---|
| 1673 | Const MCIERR_INVALID_FILE = MCIERR_BASE + 40
|
---|
| 1674 | Const MCIERR_NULL_PARAMETER_BLOCK = MCIERR_BASE + 41
|
---|
| 1675 | Const MCIERR_UNNAMED_RESOURCE = MCIERR_BASE + 42
|
---|
| 1676 | Const MCIERR_NEW_REQUIRES_ALIAS = MCIERR_BASE + 43
|
---|
| 1677 | Const MCIERR_NOTIFY_ON_AUTO_OPEN = MCIERR_BASE + 44
|
---|
| 1678 | Const MCIERR_NO_ELEMENT_ALLOWED = MCIERR_BASE + 45
|
---|
| 1679 | Const MCIERR_NONAPPLICABLE_FUNCTION = MCIERR_BASE + 46
|
---|
| 1680 | Const MCIERR_ILLEGAL_FOR_AUTO_OPEN = MCIERR_BASE + 47
|
---|
| 1681 | Const MCIERR_FILENAME_REQUIRED = MCIERR_BASE + 48
|
---|
| 1682 | Const MCIERR_EXTRA_CHARACTERS = MCIERR_BASE + 49
|
---|
| 1683 | Const MCIERR_DEVICE_NOT_INSTALLED = MCIERR_BASE + 50
|
---|
| 1684 | Const MCIERR_GET_CD = MCIERR_BASE + 51
|
---|
| 1685 | Const MCIERR_SET_CD = MCIERR_BASE + 52
|
---|
| 1686 | Const MCIERR_SET_DRIVE = MCIERR_BASE + 53
|
---|
| 1687 | Const MCIERR_DEVICE_LENGTH = MCIERR_BASE + 54
|
---|
| 1688 | Const MCIERR_DEVICE_ORD_LENGTH = MCIERR_BASE + 55
|
---|
| 1689 | Const MCIERR_NO_INTEGER = MCIERR_BASE + 56
|
---|
| 1690 | Const MCIERR_WAVE_OUTPUTSINUSE = MCIERR_BASE + 64
|
---|
| 1691 | Const MCIERR_WAVE_SETOUTPUTINUSE = MCIERR_BASE + 65
|
---|
| 1692 | Const MCIERR_WAVE_INPUTSINUSE = MCIERR_BASE + 66
|
---|
| 1693 | Const MCIERR_WAVE_SETINPUTINUSE = MCIERR_BASE + 67
|
---|
| 1694 | Const MCIERR_WAVE_OUTPUTUNSPECIFIED = MCIERR_BASE + 68
|
---|
| 1695 | Const MCIERR_WAVE_INPUTUNSPECIFIED = MCIERR_BASE + 69
|
---|
| 1696 | Const MCIERR_WAVE_OUTPUTSUNSUITABLE = MCIERR_BASE + 70
|
---|
| 1697 | Const MCIERR_WAVE_SETOUTPUTUNSUITABLE = MCIERR_BASE + 71
|
---|
| 1698 | Const MCIERR_WAVE_INPUTSUNSUITABLE = MCIERR_BASE + 72
|
---|
| 1699 | Const MCIERR_WAVE_SETINPUTUNSUITABLE = MCIERR_BASE + 73
|
---|
| 1700 | Const MCIERR_SEQ_DIV_INCOMPATIBLE = MCIERR_BASE + 80
|
---|
| 1701 | Const MCIERR_SEQ_PORT_INUSE = MCIERR_BASE + 81
|
---|
| 1702 | Const MCIERR_SEQ_PORT_NONEXISTENT = MCIERR_BASE + 82
|
---|
| 1703 | Const MCIERR_SEQ_PORT_MAPNODEVICE = MCIERR_BASE + 83
|
---|
| 1704 | Const MCIERR_SEQ_PORT_MISCERROR = MCIERR_BASE + 84
|
---|
| 1705 | Const MCIERR_SEQ_TIMER = MCIERR_BASE + 85
|
---|
| 1706 | Const MCIERR_SEQ_PORTUNSPECIFIED = MCIERR_BASE + 86
|
---|
| 1707 | Const MCIERR_SEQ_NOMIDIPRESENT = MCIERR_BASE + 87
|
---|
| 1708 | Const MCIERR_NO_WINDOW = MCIERR_BASE + 90
|
---|
| 1709 | Const MCIERR_CREATEWINDOW = MCIERR_BASE + 91
|
---|
| 1710 | Const MCIERR_FILE_READ = MCIERR_BASE + 92
|
---|
| 1711 | Const MCIERR_FILE_WRITE = MCIERR_BASE + 93
|
---|
| 1712 | Const MCIERR_NO_IDENTITY = MCIERR_BASE + 94
|
---|
| 1713 | Const MCIERR_CUSTOM_DRIVER_BASE = MCIERR_BASE + 256
|
---|
| 1714 | Declare Function mciGetErrorString Lib "winmm" Alias "mciGetErrorStringA" (mcierr As DWord, pszText As PSTR, cchText As Long) As BOOL
|
---|
| 1715 |
|
---|
| 1716 |
|
---|
| 1717 | #endif '_INC_MMSYS
|
---|