Changeset 158 for Include


Ignore:
Timestamp:
Mar 12, 2007, 8:36:24 PM (18 years ago)
Author:
NoWest
Message:

コミット先が変になっていたので改めてコミット。

File:
1 edited

Legend:

Unmodified
Added
Removed
  • Include/api_mmsys.sbp

    r141 r158  
    66#define _INC_MMSYS
    77
    8 #ifdef UNICODE
    9 Const _FuncName_sndPlaySound = "sndPlaySoundW"
    10 Const _FuncName_PlaySound = "PlaySoundW"
    11 Const _FuncName_waveOutGetDevCaps = "waveOutGetDevCapsW"
    12 Const _FuncName_waveOutGetErrorText = "waveOutGetErrorTextW"
    13 Const _FuncName_waveInGetDevCaps = "waveInGetDevCapsW"
    14 Const _FuncName_waveInGetErrorText = "waveInGetErrorTextW"
    15 Const _FuncName_midiOutGetDevCaps = "midiOutGetDevCapsW"
    16 Const _FuncName_midiOutGetErrorText = "midiOutGetErrorTextW"
    17 Const _FuncName_midiInGetDevCaps = "midiInGetDevCapsW"
    18 Const _FuncName_midiInGetErrorText = "midiInGetErrorTextW"
    19 Const _FuncName_auxGetDevCaps = "auxGetDevCapsW"
    20 Const _FuncName_mixerGetDevCaps = "mixerGetDevCapsW"
    21 Const _FuncName_mixerGetLineInfo = "mixerGetLineInfoW"
    22 Const _FuncName_mixerGetLineControls = "mixerGetLineControlsW"
    23 Const _FuncName_mixerGetControlDetails = "mixerGetControlDetailsW"
    24 Const _FuncName_joyGetDevCaps = "joyGetDevCapsW"
    25 Const _FuncName_mmioStringToFOURCC = "mmioStringToFOURCCW"
    26 Const _FuncName_mmioInstallIOProc = "mmioInstallIOProcW"
    27 Const _FuncName_mmioOpen = "mmioOpenW"
    28 Const _FuncName_mmioRename = "mmioRenameW"
    29 Const _FuncName_mciSendCommand = "mciSendCommandW"
    30 Const _FuncName_mciSendString = "mciSendStringW"
    31 Const _FuncName_mciGetDeviceID = "mciGetDeviceIDW"
    32 Const _FuncName_mciGetErrorString = "mciGetErrorStringW"
    33 #else
    34 Const _FuncName_sndPlaySound = "sndPlaySoundA"
    35 Const _FuncName_PlaySound = "PlaySoundA"
    36 Const _FuncName_waveOutGetDevCaps = "waveOutGetDevCapsA"
    37 Const _FuncName_waveOutGetErrorText = "waveOutGetErrorTextA"
    38 Const _FuncName_waveInGetDevCaps = "waveInGetDevCapsA"
    39 Const _FuncName_waveInGetErrorText = "waveInGetErrorTextA"
    40 Const _FuncName_midiOutGetDevCaps = "midiOutGetDevCapsA"
    41 Const _FuncName_midiOutGetErrorText = "midiOutGetErrorTextA"
    42 Const _FuncName_midiInGetDevCaps = "midiInGetDevCapsA"
    43 Const _FuncName_midiInGetErrorText = "midiInGetErrorTextA"
    44 Const _FuncName_auxGetDevCaps = "auxGetDevCapsA"
    45 Const _FuncName_mixerGetDevCaps = "mixerGetDevCapsA"
    46 Const _FuncName_mixerGetLineInfo = "mixerGetLineInfoA"
    47 Const _FuncName_mixerGetLineControls = "mixerGetLineControlsA"
    48 Const _FuncName_mixerGetControlDetails = "mixerGetControlDetailsA"
    49 Const _FuncName_joyGetDevCaps = "joyGetDevCapsA"
    50 Const _FuncName_mmioStringToFOURCC = "mmioStringToFOURCCA"
    51 Const _FuncName_mmioInstallIOProc = "mmioInstallIOProcA"
    52 Const _FuncName_mmioOpen = "mmioOpenA"
    53 Const _FuncName_mmioRename = "mmioRenameA"
    54 Const _FuncName_mciSendCommand = "mciSendCommandA"
    55 Const _FuncName_mciSendString = "mciSendStringA"
    56 Const _FuncName_mciGetDeviceID = "mciGetDeviceIDA"
    57 Const _FuncName_mciGetErrorString = "mciGetErrorStringA"
    58 #endif
    598
    609' general constants
     
    312261' Sound support
    313262
    314 Declare Function sndPlaySound Lib "winmm" Alias _FuncName_sndPlaySound (pszSound As PCTSTR, fuSound As DWord) As BOOL
     263#ifdef UNICODE
     264Declare Function sndPlaySound Lib "winmm" Alias "sndPlaySoundW" (pszSound As PCWSTR, fuSound As DWord) As BOOL
     265#else
     266Declare Function sndPlaySound Lib "winmm" Alias "sndPlaySoundA" (pszSound As PCSTR, fuSound As DWord) As BOOL
     267#endif
    315268
    316269Const SND_SYNC = &H0000
     
    340293Const SND_ALIAS_SYSTEMDEFAULT = sndAlias(&H53, &H44)
    341294
    342 Declare Function PlaySound Lib "winmm" Alias _FuncName_PlaySound (pszSound As PCTSTR, hmod As HMODULE, fdwSound As DWord) As BOOL
     295#ifdef UNICODE
     296Declare Function PlaySound Lib "winmm" Alias "PlaySoundW" (pszSound As PCWSTR, hmod As HMODULE, fdwSound As DWord) As BOOL
     297#else
     298Declare Function PlaySound Lib "winmm" Alias "PlaySoundA" (pszSound As PCSTR, hmod As HMODULE, fdwSound As DWord) As BOOL
     299#endif
    343300
    344301
     
    416373TypeDef PWAVEOUTCAPSW = *WAVEOUTCAPSW
    417374TypeDef LPWAVEOUTCAPSW = *WAVEOUTCAPSW
     375
    418376Type WAVEOUTCAPSA
    419377    wMid As Word
     
    428386TypeDef PWAVEOUTCAPSA = *WAVEOUTCAPSA
    429387TypeDef LPWAVEOUTCAPSA = *WAVEOUTCAPSA
     388
    430389#ifdef UNICODE
    431390TypeDef WAVEOUTCAPS = WAVEOUTCAPSW
     391TypeDef PWAVEOUTCAPS = PWAVEOUTCAPSW
     392TypeDef LPWAVEOUTCAPS = LPWAVEOUTCAPSW
    432393#else
    433394TypeDef WAVEOUTCAPS = WAVEOUTCAPSA
    434 #endif
    435 TypeDef PWAVEOUTCAPS = *WAVEOUTCAPS
    436 TypeDef LPWAVEOUTCAPS = *WAVEOUTCAPS
     395TypeDef PWAVEOUTCAPS = PWAVEOUTCAPSA
     396TypeDef LPWAVEOUTCAPS = LPWAVEOUTCAPSA
     397#endif
    437398
    438399' flags for dwSupport field of WAVEOUTCAPS
     
    457418TypeDef PWAVEINCAPSW = *WAVEINCAPSW
    458419TypeDef LPWAVEINCAPSW = *WAVEINCAPSW
     420
    459421Type WAVEINCAPSA
    460422    wMid As Word
     
    468430TypeDef PWAVEINCAPSA = *WAVEINCAPSA
    469431TypeDef LPWAVEINCAPSA = *WAVEINCAPSA
     432
    470433#ifdef UNICODE
    471434TypeDef WAVEINCAPS = WAVEINCAPSW
     435TypeDef PWAVEINCAPS = PWAVEINCAPSW
     436TypeDef LPWAVEINCAPS = LPWAVEINCAPSW
    472437#else
    473438TypeDef WAVEINCAPS = WAVEINCAPSA
    474 #endif
    475 TypeDef PWAVEINCAPS = *WAVEINCAPS
    476 TypeDef LPWAVEINCAPS = *WAVEINCAPS
     439TypeDef PWAVEINCAPS = PWAVEINCAPSA
     440TypeDef LPWAVEINCAPS = LPWAVEINCAPSA
     441#endif
    477442
    478443' defines for dwFormat field of WAVEINCAPS and WAVEOUTCAPS
    479444Const WAVE_INVALIDFORMAT     = &H00000000       ' invalid format
    480 Const WAVE_FORMAT_1M08       = &H00000001       ' 11.025 kHz, Mono,   8-bit
    481 Const WAVE_FORMAT_1S08       = &H00000002       ' 11.025 kHz, Stereo, 8-bit
     445Const WAVE_FORMAT_1M08       = &H00000001       ' 11.025 kHz, Mono,   8-bit 
     446Const WAVE_FORMAT_1S08       = &H00000002       ' 11.025 kHz, Stereo, 8-bit 
    482447Const WAVE_FORMAT_1M16       = &H00000004       ' 11.025 kHz, Mono,   16-bit
    483448Const WAVE_FORMAT_1S16       = &H00000008       ' 11.025 kHz, Stereo, 16-bit
    484 Const WAVE_FORMAT_2M08       = &H00000010       ' 22.05  kHz, Mono,   8-bit
    485 Const WAVE_FORMAT_2S08       = &H00000020       ' 22.05  kHz, Stereo, 8-bit
     449Const WAVE_FORMAT_2M08       = &H00000010       ' 22.05  kHz, Mono,   8-bit 
     450Const WAVE_FORMAT_2S08       = &H00000020       ' 22.05  kHz, Stereo, 8-bit 
    486451Const WAVE_FORMAT_2M16       = &H00000040       ' 22.05  kHz, Mono,   16-bit
    487452Const WAVE_FORMAT_2S16       = &H00000080       ' 22.05  kHz, Stereo, 16-bit
    488 Const WAVE_FORMAT_4M08       = &H00000100       ' 44.1   kHz, Mono,   8-bit
    489 Const WAVE_FORMAT_4S08       = &H00000200       ' 44.1   kHz, Stereo, 8-bit
     453Const WAVE_FORMAT_4M08       = &H00000100       ' 44.1   kHz, Mono,   8-bit 
     454Const WAVE_FORMAT_4S08       = &H00000200       ' 44.1   kHz, Stereo, 8-bit 
    490455Const WAVE_FORMAT_4M16       = &H00000400       ' 44.1   kHz, Mono,   16-bit
    491456Const WAVE_FORMAT_4S16       = &H00000800       ' 44.1   kHz, Stereo, 16-bit
     
    528493' waveform audio function prototypes
    529494Declare Function waveOutGetNumDevs Lib "winmm" () As DWord
    530 Declare Function waveOutGetDevCaps Lib "winmm" Alias _FuncName_waveOutGetDevCaps (uDeviceID As DWord, ByRef woc As WAVEOUTCAPS, cbwoc As DWord) As MMRESULT
     495#ifdef UNICODE
     496Declare Function waveOutGetDevCaps Lib "winmm" Alias "waveOutGetDevCapsW" (uDeviceID As DWord, ByRef pwoc As WAVEOUTCAPSW, cbwoc As DWord) As MMRESULT
     497#else
     498Declare Function waveOutGetDevCaps Lib "winmm" Alias "waveOutGetDevCapsA" (uDeviceID As DWord, ByRef pwoc As WAVEOUTCAPS, cbwoc As DWord) As MMRESULT
     499#endif
    531500Declare Function waveOutGetVolume Lib "winmm" (hwo As HWAVEOUT, ByRef pdwVolume As DWord) As MMRESULT
    532501Declare Function waveOutSetVolume Lib "winmm" (hwo As HWAVEOUT, dwVolume As DWord) As MMRESULT
    533 Declare Function waveOutGetErrorText Lib "winmm" Alias _FuncName_waveOutGetErrorText (mmrError As MMRESULT, pszText As LPTSTR, cchText As DWord) As MMRESULT
     502#ifdef UNICODE
     503Declare Function waveOutGetErrorText Lib "winmm" Alias "waveOutGetErrorTextW" (mmrError As MMRESULT, pszText As LPWSTR, cchText As DWord) As MMRESULT
     504#else
     505Declare Function waveOutGetErrorText Lib "winmm" Alias "waveOutGetErrorTextA" (mmrError As MMRESULT, pszText As LPSTR, cchText As DWord) As MMRESULT
     506#endif
    534507Declare 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
    535508Declare Function waveOutClose Lib "winmm" (hwo As HWAVEOUT) As MMRESULT
     
    550523
    551524Declare Function waveInGetNumDevs Lib "winmm" () As DWord
    552 Declare Function waveInGetDevCaps Lib "winmm" Alias _FuncName_waveInGetDevCaps (uDeviceID As DWord, ByRef pwic As WAVEINCAPS, cbwic As DWord) As MMRESULT
    553 Declare Function waveInGetErrorText Lib "winmm" Alias _FuncName_waveInGetErrorText (mmrError As MMRESULT, pszText As LPTSTR, cchText As DWord) As MMRESULT
     525#ifdef UNICODE
     526Declare Function waveInGetDevCaps Lib "winmm" Alias "waveInGetDevCapsW" (uDeviceID As DWord, ByRef pwic As WAVEINCAPSW, cbwic As DWord) As MMRESULT
     527Declare Function waveInGetErrorText Lib "winmm" Alias "waveInGetErrorTextW" (mmrError As MMRESULT, pszText As LPWSTR, cchText As DWord) As MMRESULT
     528#else
     529Declare Function waveInGetDevCaps Lib "winmm" Alias "waveInGetDevCapsA" (uDeviceID As DWord, ByRef pwic As WAVEINCAPS, cbwic As DWord) As MMRESULT
     530Declare Function waveInGetErrorText Lib "winmm" Alias "waveInGetErrorTextA" (mmrError As MMRESULT, pszText As LPSTR, cchText As DWord) As MMRESULT
     531#endif
    554532Declare 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
    555533Declare Function waveInClose Lib "winmm" (hwi As HWAVEIN) As MMRESULT
     
    637615TypeDef PMIDIOUTCAPSW = *MIDIOUTCAPSW
    638616TypeDef LPMIDIOUTCAPSW = *MIDIOUTCAPSW
     617
    639618Type MIDIOUTCAPSA
    640619    wMid As Word
     
    653632#ifdef UNICODE
    654633TypeDef MIDIOUTCAPS = MIDIOUTCAPSW
     634TypeDef PMIDIOUTCAPS = PMIDIOUTCAPSW
     635TypeDef LPMIDIOUTCAPS = LPMIDIOUTCAPSW
    655636#else
    656637TypeDef MIDIOUTCAPS = MIDIOUTCAPSA
    657 #endif
    658 TypeDef PMIDIOUTCAPS = *MIDIOUTCAPS
    659 TypeDef LPMIDIOUTCAPS = *MIDIOUTCAPS
     638TypeDef PMIDIOUTCAPS = PMIDIOUTCAPSA
     639TypeDef LPMIDIOUTCAPS = LPMIDIOUTCAPSA
     640#endif
    660641
    661642' flags for wTechnology field of MIDIOUTCAPS structure
     
    677658    wPid As Word
    678659    vDriverVersion As MMVERSION
    679     szPname[ELM(MAXPNAMELEN)] As WCHAR
     660    szPname[ELM(MAXPNAMELEN)] As Char
    680661    dwSupport As DWord
    681662End Type
    682663TypeDef PMIDIINCAPSW = *MIDIINCAPSW
    683664TypeDef LPMIDIINCAPSW = *MIDIINCAPSW
     665
    684666Type MIDIINCAPSA
    685667    wMid As Word
    686668    wPid As Word
    687669    vDriverVersion As MMVERSION
    688     szPname[ELM(MAXPNAMELEN)] As SByte
     670    szPname[ELM(MAXPNAMELEN)] As Char
    689671    dwSupport As DWord
    690672End Type
    691673TypeDef PMIDIINCAPSA = *MIDIINCAPSA
    692674TypeDef LPMIDIINCAPSA = *MIDIINCAPSA
     675
    693676#ifdef UNICODE
    694677TypeDef MIDIINCAPS = MIDIINCAPSW
     678TypeDef PMIDIINCAPS = PMIDIINCAPSW
     679TypeDef LPMIDIINCAPS = LPMIDIINCAPSW
    695680#else
    696681TypeDef MIDIINCAPS = MIDIINCAPSA
    697 #endif
    698 TypeDef PMIDIINCAPS = *MIDIINCAPS
    699 TypeDef LPMIDIINCAPS = *MIDIINCAPS
     682TypeDef PMIDIINCAPS = PMIDIINCAPSA
     683TypeDef LPMIDIINCAPS = LPMIDIINCAPSA
     684#endif
    700685
    701686' MIDI data block header
     
    779764Declare Function midiConnect Lib "winmm" (hmi As HMIDI, hmo As HMIDIOUT, pReserved As VoidPtr) As MMRESULT
    780765Declare Function midiDisconnect Lib "winmm" (hmi As HMIDI, hmo As HMIDIOUT, pReserved As VoidPtr) As MMRESULT
    781 Declare Function midiOutGetDevCaps Lib "winmm" Alias _FuncName_midiOutGetDevCaps (uDeviceID As DWord, ByRef moc As MIDIOUTCAPS, cbmoc As DWord) As MMRESULT
     766#ifdef UNICODE
     767Declare Function midiOutGetDevCaps Lib "winmm" Alias "midiOutGetDevCapsW" (uDeviceID As DWord, ByRef pmoc  As MIDIOUTCAPSW, cbmoc As DWord) As MMRESULT
     768#else
     769Declare Function midiOutGetDevCaps Lib "winmm" Alias "midiOutGetDevCapsA" (uDeviceID As DWord, ByRef pmoc  As MIDIOUTCAPS, cbmoc As DWord) As MMRESULT
     770#endif
    782771Declare Function midiOutGetVolume Lib "winmm" (hmo As HMIDIOUT, ByRef pdwVolume As DWord) As MMRESULT
    783772Declare Function midiOutSetVolume Lib "winmm" (hmo As HMIDIOUT, dwVolume As DWord) As MMRESULT
    784 Declare Function midiOutGetErrorText Lib "winmm" Alias _FuncName_midiOutGetErrorText (mmrError As MMRESULT, pszText As LPTSTR, cchText As DWord) As MMRESULT
     773#ifdef UNICODE
     774Declare Function midiOutGetErrorText Lib "winmm" Alias "midiOutGetErrorTextW" (mmrError As MMRESULT, pszText As LPWSTR, cchText As DWord) As MMRESULT
     775#else
     776Declare Function midiOutGetErrorText Lib "winmm" Alias "midiOutGetErrorTextA" (mmrError As MMRESULT, pszText As LPSTR, cchText As DWord) As MMRESULT
     777#endif
    785778Declare Function midiOutOpen Lib "winmm" (ByRef phmo As HMIDIOUT, uDeviceID As DWord, dwCallback As DWord, dwInstance As DWord, fdwOpen As DWord) As MMRESULT
    786779Declare Function midiOutClose Lib "winmm" (hmo As HMIDIOUT) As MMRESULT
     
    796789
    797790Declare Function midiInGetNumDevs Lib "winmm" () As DWord
    798 Declare Function midiInGetDevCaps Lib "winmm" Alias _FuncName_midiInGetDevCaps (uDeviceID As DWord, ByRef pmic As MIDIINCAPS, cbmic As DWord) As MMRESULT
    799 Declare Function midiInGetErrorText Lib "winmm" Alias _FuncName_midiInGetErrorText (mmrError As MMRESULT, pszText As LPCTSTR, cchText As DWord) As MMRESULT
     791#ifdef UNICODE
     792Declare Function midiInGetDevCaps Lib "winmm" Alias "midiInGetDevCapsW" (uDeviceID As DWord, ByRef pmic As MIDIINCAPSW, cbmic As DWord) As MMRESULT
     793Declare Function midiInGetErrorText Lib "winmm" Alias "midiInGetErrorTextW" (mmrError As MMRESULT, pszText As LPWSTR, cchText As DWord) As MMRESULT
     794#else
     795Declare Function midiInGetDevCaps Lib "winmm" Alias "midiInGetDevCapsA" (uDeviceID As DWord, ByRef pmic As MIDIINCAPS, cbmic As DWord) As MMRESULT
     796Declare Function midiInGetErrorText Lib "winmm" Alias "midiInGetErrorTextA" (mmrError As MMRESULT, pszText As LPSTR, cchText As DWord) As MMRESULT
     797#endif
    800798Declare Function midiInOpen Lib "winmm" (ByRef phmi As HMIDIIN, uDeviceID As DWord, dwCallback As DWord, dwInstance As DWord, fdwOpen As DWord) As MMRESULT
    801799Declare Function midiInClose Lib "winmm" (hmi As HMIDIIN) As MMRESULT
     
    829827TypeDef NPAUXCAPSW = *AUXCAPSW
    830828TypeDef LPAUXCAPSW = *AUXCAPSW
     829
    831830Type AUXCAPSA
    832831    wMid As Word
     
    841840TypeDef NPAUXCAPSA = *AUXCAPSA
    842841TypeDef LPAUXCAPSA = *AUXCAPSA
    843 #ifdef UNICODE
     842
     843#ifdef UNICODE
     844TypeDef AUXCAPS = AUXCAPSW
     845TypeDef PAUXCAPS = PAUXCAPSW
     846TypeDef NPAUXCAPS = NPAUXCAPSW
     847TypeDef LPAUXCAPS = LPAUXCAPSW
     848#else
    844849TypeDef AUXCAPS = AUXCAPSA
    845 #else
    846 TypeDef AUXCAPS = AUXCAPSA
    847 #endif
    848 TypeDef PAUXCAPS = *AUXCAPS
    849 TypeDef NPAUXCAPS = *AUXCAPS
    850 TypeDef LPAUXCAPS = *AUXCAPS
     850TypeDef PAUXCAPS = PAUXCAPSA
     851TypeDef NPAUXCAPS = NPAUXCAPSA
     852TypeDef LPAUXCAPS = LPAUXCAPSA
     853#endif
    851854
    852855Const AUXCAPS_CDAUDIO = 1
     
    858861' auxiliary audio function prototypes
    859862Declare Function auxGetNumDevs Lib "winmm" () As DWord
    860 Declare Function auxGetDevCaps Lib "winmm" Alias _FuncName_auxGetDevCaps (uDeviceID As DWord, pac As *AUXCAPS, cbac As DWord) As MMRESULT
     863#ifdef UNICODE
     864Declare Function auxGetDevCaps Lib "winmm" Alias "auxGetDevCapsW" (uDeviceID As DWord, pac As *AUXCAPSW, cbac As DWord) As MMRESULT
     865#else
     866Declare Function auxGetDevCaps Lib "winmm" Alias "auxGetDevCapsA" (uDeviceID As DWord, pac As *AUXCAPS, cbac As DWord) As MMRESULT
     867#endif
    861868Declare Function auxSetVolume Lib "winmm" (uDeviceID As DWord, dwVolume As DWord) As MMRESULT
    862869Declare Function auxGetVolume Lib "winmm" (uDeviceID As DWord, pdwVolume As *DWord) As MMRESULT
     
    905912TypeDef PMIXERCAPSW = *MIXERCAPSW
    906913TypeDef LPMIXERCAPSW = *MIXERCAPSW
     914
    907915Type MIXERCAPSA
    908916    wMid As Word
    909917    wPid As Word
    910918    vDriverVersion As MMVERSION
    911     szPname[ELM(MAXPNAMELEN)] As Char
     919    szPname[ELM(MAXPNAMELEN)] As SByte
    912920    fdwSupport As DWord
    913921    cDestinations As DWord
     
    915923TypeDef PMIXERCAPSA = *MIXERCAPSA
    916924TypeDef LPMIXERCAPSA = *MIXERCAPSA
     925
    917926#ifdef UNICODE
    918927TypeDef MIXERCAPS = MIXERCAPSW
     928TypeDef PMIXERCAPS = PMIXERCAPSW
     929TypeDef LPMIXERCAPS = LPMIXERCAPSW
     930Declare Function mixerGetDevCaps Lib "winmm" Alias "mixerGetDevCapsW" (uMxId As DWord, pmxcaps As *MIXERCAPSW, cbmxcaps As DWord) As MMRESULT
    919931#else
    920932TypeDef MIXERCAPS = MIXERCAPSA
    921 #endif
    922 TypeDef PMIXERCAPS = *MIXERCAPS
    923 TypeDef LPMIXERCAPS = *MIXERCAPS
    924 
    925 Declare Function mixerGetDevCaps Lib "winmm" Alias _FuncName_mixerGetDevCaps (uMxId As DWord, pmxcaps As *MIXERCAPS, cbmxcaps As DWord) As MMRESULT
     933TypeDef PMIXERCAPS = PMIXERCAPSA
     934TypeDef LPMIXERCAPS = LPMIXERCAPSA
     935Declare Function mixerGetDevCaps Lib "winmm" Alias "mixerGetDevCapsA" (uMxId As DWord, pmxcaps As *MIXERCAPS, cbmxcaps As DWord) As MMRESULT
     936#endif
     937
    926938Declare Function mixerOpen Lib "winmm" (phmx As *HMIXER, uMxId As DWord, dwCallback As DWord, dwInstance As DWord, fdwOpen As DWord) As MMRESULT
    927939Declare Function mixerClose Lib "winmm" (hmx As HMIXER) As MMRESULT
    928940Declare Function mixerMessage Lib "winmm" (hmx As HMIXER, uMsg As DWord, dwParam1 As DWord, dwParam2 As DWord) As DWord
    929941
    930 Type _MMSYSTEM_TARGETW
     942#ifdef UNICODE
     943Type TARGET
    931944    dwType As DWord
    932945    dwDeviceID As DWord
     
    936949    szPname[ELM(MAXPNAMELEN)] As WCHAR
    937950End Type
     951#else
     952Type TARGET
     953    dwType As DWord
     954    dwDeviceID As DWord
     955    wMid As Word
     956    wPid As Word
     957    vDriverVersion As MMVERSION
     958    szPname[ELM(MAXPNAMELEN)] As SByte
     959End Type
     960#endif
    938961
    939962Type MIXERLINEW
     
    950973    szShortName[ELM(MIXER_SHORT_NAME_CHARS)] As WCHAR
    951974    szName[ELM(MIXER_LONG_NAME_CHARS)] As WCHAR
    952     Target As _MMSYSTEM_TARGETW
     975    Target As TARGET
    953976End Type
    954977TypeDef PMIXERLINEW = *MIXERLINEW
    955978TypeDef LPMIXERLINEW = *MIXERLINEW
    956 
    957 Type _MMSYSTEM_TARGETA
    958     dwType As DWord
    959     dwDeviceID As DWord
    960     wMid As Word
    961     wPid As Word
    962     vDriverVersion As MMVERSION
    963     szPname[ELM(MAXPNAMELEN)] As SByte
    964 End Type
    965979
    966980Type MIXERLINEA
     
    977991    szShortName[ELM(MIXER_SHORT_NAME_CHARS)] As SByte
    978992    szName[ELM(MIXER_LONG_NAME_CHARS)] As SByte
    979     Target As _MMSYSTEM_TARGETA
     993    Target As TARGET
    980994End Type
    981995TypeDef PMIXERLINEA = *MIXERLINEA
    982996TypeDef LPMIXERLINEA = *MIXERLINEA
    983 #ifdef UNICODE
     997
     998#ifdef UNICODE
     999TypeDef MIXERLINE = MIXERLINEA
     1000TypeDef PMIXERLINE = PMIXERLINEA
     1001TypeDef LPMIXERLINE = LPMIXERLINEA
     1002#else
    9841003TypeDef MIXERLINE = MIXERLINEW
    985 #else
    986 TypeDef MIXERLINE = MIXERLINEA
    987 #endif
    988 TypeDef PMIXERLINE = *MIXERLINE
    989 TypeDef LPMIXERLINE = *MIXERLINE
     1004TypeDef PMIXERLINE = PMIXERLINEW
     1005TypeDef LPMIXERLINE = LPMIXERLINEW
     1006#endif
    9901007
    9911008' MIXERLINE.fdwLine
     
    10291046Const MIXERLINE_TARGETTYPE_AUX = 5
    10301047
    1031 Declare Function mixerGetLineInfo Lib "winmm" Alias _FuncName_mixerGetLineInfo (hmxobj As HMIXEROBJ, pmxl As *MIXERLINE, fdwInfo As DWord) As MMRESULT
     1048#ifdef UNICODE
     1049Declare Function mixerGetLineInfo Lib "winmm" Alias "mixerGetLineInfoW" (hmxobj As HMIXEROBJ, pmxl As *MIXERLINEW, fdwInfo As DWord) As MMRESULT
     1050#else
     1051Declare Function mixerGetLineInfo Lib "winmm" Alias "mixerGetLineInfoA" (hmxobj As HMIXEROBJ, pmxl As *MIXERLINE, fdwInfo As DWord) As MMRESULT
     1052#endif
    10321053
    10331054Const MIXER_GETLINEINFOF_DESTINATION = &H00000000
     
    10531074TypeDef PMIXERCONTROLW = *MIXERCONTROLW
    10541075TypeDef LPMIXERCONTROLW = *MIXERCONTROLW
     1076
    10551077Type MIXERCONTROLA
    10561078    cbStruct As DWord
     
    10661088TypeDef PMIXERCONTROLA = *MIXERCONTROLA
    10671089TypeDef LPMIXERCONTROLA = *MIXERCONTROLA
     1090
    10681091#ifdef UNICODE
    10691092TypeDef MIXERCONTROL = MIXERCONTROLW
     1093TypeDef PMIXERCONTROL = PMIXERCONTROLW
     1094TypeDef LPMIXERCONTROL = LPMIXERCONTROLW
    10701095#else
    10711096TypeDef MIXERCONTROL = MIXERCONTROLA
    1072 #endif
    1073 TypeDef PMIXERCONTROL = *MIXERCONTROL
    1074 TypeDef LPMIXERCONTROL = *MIXERCONTROL
     1097TypeDef PMIXERCONTROL = PMIXERCONTROLA
     1098TypeDef LPMIXERCONTROL = LPMIXERCONTROLA
     1099#endif
    10751100
    10761101' MIXERCONTROL.fdwControl
     
    11471172TypeDef PMIXERLINECONTROLSW = *MIXERLINECONTROLSW
    11481173TypeDef LPMIXERLINECONTROLSW = *MIXERLINECONTROLSW
     1174
    11491175Type MIXERLINECONTROLSA
    11501176    cbStruct As DWord
     
    11531179    cControls As DWord
    11541180    cbmxctrl As DWord
    1155     pamxctrl As *MIXERCONTROLA
     1181    pamxctrl As *MIXERCONTROL
    11561182End Type
    11571183TypeDef PMIXERLINECONTROLSA = *MIXERLINECONTROLSA
    11581184TypeDef LPMIXERLINECONTROLSA = *MIXERLINECONTROLSA
    1159 #ifdef UNICODE
     1185
     1186#ifdef UNICODE
     1187TypeDef MIXERLINECONTROLS = MIXERLINECONTROLSW
     1188TypeDef PMIXERLINECONTROLS = PMIXERLINECONTROLSW
     1189TypeDef LPMIXERLINECONTROLS = LPMIXERLINECONTROLSW
     1190Declare Function mixerGetLineControls Lib "winmm" Alias "mixerGetLineControlsA" (hmxobj As HMIXEROBJ, pmxlc As *MIXERLINECONTROLSW, fdwControls As DWord) As MMRESULT
     1191#else
    11601192TypeDef MIXERLINECONTROLS = MIXERLINECONTROLSA
    1161 #else
    1162 TypeDef MIXERLINECONTROLS = MIXERLINECONTROLSA
    1163 #endif
    1164 TypeDef PMIXERLINECONTROLS = *MIXERLINECONTROLS
    1165 TypeDef LPMIXERLINECONTROLS = *MIXERLINECONTROLS
    1166 
    1167 Declare Function mixerGetLineControls Lib "winmm" Alias _FuncName_mixerGetLineControls (hmxobj As HMIXEROBJ, pmxlc As *MIXERLINECONTROLS, fdwControls As DWord) As MMRESULT
     1193TypeDef PMIXERLINECONTROLS = PMIXERLINECONTROLSA
     1194TypeDef LPMIXERLINECONTROLS = LPMIXERLINECONTROLSA
     1195Declare Function mixerGetLineControls Lib "winmm" Alias "mixerGetLineControlsA" (hmxobj As HMIXEROBJ, pmxlc As *MIXERLINECONTROLS, fdwControls As DWord) As MMRESULT
     1196#endif
    11681197
    11691198Const MIXER_GETLINECONTROLSF_ALL = &H00000000
     
    11901219TypeDef PMIXERCONTROLDETAILS_LISTTEXTW = *MIXERCONTROLDETAILS_LISTTEXTW
    11911220TypeDef LPMIXERCONTROLDETAILS_LISTTEXTW = *MIXERCONTROLDETAILS_LISTTEXTW
     1221
    11921222Type MIXERCONTROLDETAILS_LISTTEXTA
    11931223    dwParam1 As DWord
     
    11971227TypeDef PMIXERCONTROLDETAILS_LISTTEXTA = *MIXERCONTROLDETAILS_LISTTEXTA
    11981228TypeDef LPMIXERCONTROLDETAILS_LISTTEXTA = *MIXERCONTROLDETAILS_LISTTEXTA
     1229
    11991230#ifdef UNICODE
    12001231TypeDef MIXERCONTROLDETAILS_LISTTEXT = MIXERCONTROLDETAILS_LISTTEXTW
     1232TypeDef PMIXERCONTROLDETAILS_LISTTEXT = PMIXERCONTROLDETAILS_LISTTEXTW
     1233TypeDef LPMIXERCONTROLDETAILS_LISTTEXT = LPMIXERCONTROLDETAILS_LISTTEXTW
    12011234#else
    12021235TypeDef MIXERCONTROLDETAILS_LISTTEXT = MIXERCONTROLDETAILS_LISTTEXTA
    1203 #endif
    1204 TypeDef PMIXERCONTROLDETAILS_LISTTEXT = *MIXERCONTROLDETAILS_LISTTEXT
    1205 TypeDef LPMIXERCONTROLDETAILS_LISTTEXT = *MIXERCONTROLDETAILS_LISTTEXT
     1236TypeDef PMIXERCONTROLDETAILS_LISTTEXT = PMIXERCONTROLDETAILS_LISTTEXTA
     1237TypeDef LPMIXERCONTROLDETAILS_LISTTEXT = LPMIXERCONTROLDETAILS_LISTTEXTA
     1238#endif
    12061239
    12071240Type MIXERCONTROLDETAILS_BOOLEAN
     
    12251258Declare Function mixerGetControlDetailsA Lib "winmm" (hmxobj As HMIXEROBJ, pmxcd As *MIXERCONTROLDETAILS, fdwDetails As DWord) As MMRESULT
    12261259Declare Function mixerGetControlDetailsW Lib "winmm" (hmxobj As HMIXEROBJ, pmxcd As *MIXERCONTROLDETAILS, fdwDetails As DWord) As MMRESULT
    1227 Declare Function mixerGetControlDetails Lib "winmm" Alias _FuncName_mixerGetControlDetails (hmxobj As HMIXEROBJ, pmxcd As *MIXERCONTROLDETAILS, fdwDetails As DWord) As MMRESULT
     1260#ifdef UNICODE
     1261Declare Function mixerGetControlDetails Lib "winmm" Alias "mixerGetControlDetailsW" (hmxobj As HMIXEROBJ, pmxcd As *MIXERCONTROLDETAILS, fdwDetails As DWord) As MMRESULT
     1262#else
     1263Declare Function mixerGetControlDetails Lib "winmm" Alias "mixerGetControlDetailsA" (hmxobj As HMIXEROBJ, pmxcd As *MIXERCONTROLDETAILS, fdwDetails As DWord) As MMRESULT
     1264#endif
    12281265
    12291266Const MIXER_GETCONTROLDETAILSF_VALUE = &H00000000
     
    13981435TypeDef NPJOYCAPSW = *JOYCAPSW
    13991436TypeDef LPJOYCAPSW = *JOYCAPSW
     1437
    14001438Type JOYCAPSA
    14011439    wMid As Word
     
    14271465TypeDef NPJOYCAPSA = *JOYCAPSA
    14281466TypeDef LPJOYCAPSA = *JOYCAPSA
     1467
    14291468#ifdef UNICODE
    14301469TypeDef JOYCAPS = JOYCAPSW
     1470TypeDef PJOYCAPS = PJOYCAPSW
     1471TypeDef NPJOYCAPS = NPJOYCAPSW
     1472TypeDef LPJOYCAPS = LPJOYCAPSW
    14311473#else
    14321474TypeDef JOYCAPS = JOYCAPSA
    1433 #endif
    14341475TypeDef PJOYCAPS = PJOYCAPSA
    14351476TypeDef NPJOYCAPS = NPJOYCAPSA
    14361477TypeDef LPJOYCAPS = LPJOYCAPSA
     1478#endif
    14371479
    14381480Type JOYINFO
     
    14671509' joystick function prototypes
    14681510Declare Function joyGetNumDevs Lib "winmm" () As DWord
    1469 Declare Function joyGetDevCaps Lib "winmm" Alias _FuncName_joyGetDevCaps (uJoyID As DWord, pjc As *JOYCAPS, cbjc As DWord) As MMRESULT
     1511#ifdef UNICODE
     1512Declare Function joyGetDevCaps Lib "winmm" Alias "joyGetDevCapsW" (uJoyID As DWord, pjc As *JOYCAPSW, cbjc As DWord) As MMRESULT
     1513#else
     1514Declare Function joyGetDevCaps Lib "winmm" Alias "joyGetDevCapsA" (uJoyID As DWord, pjc As *JOYCAPS, cbjc As DWord) As MMRESULT
     1515#endif
    14701516Declare Function joyGetPos Lib "winmm" (uJoyID As DWord, pji As *JOYINFO) As MMRESULT
    14711517Declare Function joyGetPosEx Lib "winmm" (uJoyID As DWord, pji As *JOYINFOEX) As MMRESULT
     
    15971643
    15981644' MMIO function prototypes
    1599 Declare Function mmioStringToFOURCC Lib "winmm" Alias _FuncName_mmioStringToFOURCC (sz As LPCTSTR, uFlags As DWord) As FOURCC
    1600 Declare Function mmioInstallIOProc Lib "winmm" Alias _FuncName_mmioInstallIOProc (fccIOProc As FOURCC, pIOProc As LPMMIOPROC, dwFlags As DWord) As LPMMIOPROC
    1601 Declare Function mmioOpen Lib "winmm" Alias _FuncName_mmioOpen (pszFileName As LPTSTR, pmmioinfo As *MMIOINFO, fdwOpen As DWord) As HMMIO
    1602 Declare Function mmioRename Lib "winmm" Alias _FuncName_mmioRename (pszFileName As LPCTSTR, pszNewFileName As LPCTSTR, pmmioinfo As *MMIOINFO, fdwRename As DWord) As MMRESULT
     1645#ifdef UNICODE
     1646Declare Function mmioStringToFOURCC Lib "winmm" Alias "mmioStringToFOURCCW" (sz As LPWSTR, uFlags As DWord) As FOURCC
     1647Declare Function mmioInstallIOProc Lib "winmm" Alias "mmioInstallIOProcW" (fccIOProc As FOURCC, pIOProc As LPMMIOPROC, dwFlags As DWord) As LPMMIOPROC
     1648Declare Function mmioOpen Lib "winmm" Alias "mmioOpenW" (pszFileName As LPWSTR, pmmioinfo As *MMIOINFO, fdwOpen As DWord) As HMMIO
     1649Declare Function mmioRename Lib "winmm" Alias "mmioRenameW" (pszFileName As LPSTR, pszNewFileName As LPWSTR, pmmioinfo As *MMIOINFO, fdwRename As DWord) As MMRESULT
     1650#else
     1651Declare Function mmioStringToFOURCC Lib "winmm" Alias "mmioStringToFOURCCA" (sz As LPSTR, uFlags As DWord) As FOURCC
     1652Declare Function mmioInstallIOProc Lib "winmm" Alias "mmioInstallIOProcA" (fccIOProc As FOURCC, pIOProc As LPMMIOPROC, dwFlags As DWord) As LPMMIOPROC
     1653Declare Function mmioOpen Lib "winmm" Alias "mmioOpenA" (pszFileName As LPSTR, pmmioinfo As *MMIOINFO, fdwOpen As DWord) As HMMIO
     1654Declare Function mmioRename Lib "winmm" Alias "mmioRenameA" (pszFileName As LPSTR, pszNewFileName As LPSTR, pmmioinfo As *MMIOINFO, fdwRename As DWord) As MMRESULT
     1655#endif
    16031656Declare Function mmioClose Lib "winmm" (hmmio As HMMIO, fuClose As DWord) As MMRESULT
    16041657Declare Function mmioRead Lib "winmm" (hmmio As HMMIO, pch As HPSTR, cch As Long) As Long
     
    16241677
    16251678' MCI Functions
    1626 Declare Function mciSendCommand Lib "winmm" Alias _FuncName_mciSendCommand (mciId As MCIDEVICEID, uMsg As DWord, dwParam1 As ULONG_PTR, ByRef dwParam2 As Any) As MCIERROR
    1627 Declare Function mciSendString Lib "winmm" Alias _FuncName_mciSendString (lpstrCommand As LPTSTR, lpstrReturnString As LPTSTR, uReturnLength As DWord, hwndCallback As HWND) As MCIERROR
    1628 Declare Function mciGetDeviceID Lib "winmm" Alias _FuncName_mciGetDeviceID (pszDevice As LPCTSTR) As MCIDEVICEID
    1629 
    1630 Declare Function mciGetErrorString Lib "winmm" Alias _FuncName_mciGetErrorString (mcierr As MCIERROR, pszText As LPSTR, cchText As DWord) As BOOL
     1679#ifdef UNICODE
     1680Declare Function mciSendCommand Lib "winmm" Alias "mciSendCommandW" (mciId As MCIDEVICEID, uMsg As DWord, dwParam1 As DWord, ByRef dwParam2 As Any) As MCIERROR
     1681Declare Function mciSendString Lib "winmm" Alias "mciSendStringW" (lpstrCommand As LPWSTR, lpstrReturnString As LPWSTR, uReturnLength As DWord, hwndCallback As HWND) As MCIERROR
     1682Declare Function mciGetDeviceID Lib "winmm" Alias "mciGetDeviceIDW" (pszDevice As LPWSTR) As MCIDEVICEID
     1683Declare Function mciGetErrorString Lib "winmm" Alias "mciGetErrorStringA" (mcierr As MCIERROR, pszText As LPWSTR, cchText As DWord) As BOOL
     1684#else
     1685Declare Function mciSendCommand Lib "winmm" Alias "mciSendCommandA" (mciId As MCIDEVICEID, uMsg As DWord, dwParam1 As DWord, ByRef dwParam2 As Any) As MCIERROR
     1686Declare Function mciSendString Lib "winmm" Alias "mciSendStringA" (lpstrCommand As LPSTR, lpstrReturnString As LPSTR, uReturnLength As DWord, hwndCallback As HWND) As MCIERROR
     1687Declare Function mciGetDeviceID Lib "winmm" Alias "mciGetDeviceIDA" (pszDevice As LPSTR) As MCIDEVICEID
     1688Declare Function mciGetErrorString Lib "winmm" Alias "mciGetErrorStringA" (mcierr As MCIERROR, pszText As LPSTR, cchText As DWord) As BOOL
     1689#endif
     1690
    16311691Declare Function mciSetYieldProc Lib "winmm" (mciId As MCIDEVICEID, fpYieldProc As YIELDPROC, dwYieldData As DWord) As BOOL
    16321692Declare Function mciGetCreatorTask Lib "winmm" (mciId As MCIDEVICEID) As HTASK
     
    19422002TypeDef LPMCI_GENERIC_PARMS = *MCI_GENERIC_PARMS
    19432003
    1944 Type MCI_OPEN_PARMSW
     2004Type MCI_OPEN_PARMS
    19452005    dwCallback As DWord
    19462006    wDeviceID As DWord
    1947     lpstrDeviceType As LPCWSTR
    1948     lpstrElementName As LPCWSTR
    1949     lpstrAlias As LPCWSTR
    1950 End Type
    1951 TypeDef PMCI_OPEN_PARMSW = *MCI_OPEN_PARMSW
    1952 TypeDef LPMCI_OPEN_PARMSW = *MCI_OPEN_PARMSW
    1953 Type MCI_OPEN_PARMSA
    1954     dwCallback As DWord
    1955     wDeviceID As DWord
    1956     lpstrDeviceType As LPCSTR
    1957     lpstrElementName As LPCSTR
    1958     lpstrAlias As LPCSTR
    1959 End Type
    1960 TypeDef PMCI_OPEN_PARMSA = *MCI_OPEN_PARMSA
    1961 TypeDef LPMCI_OPEN_PARMSA = *MCI_OPEN_PARMSA
    1962 #ifdef UNICODE
    1963 TypeDef MCI_OPEN_PARMS = MCI_OPEN_PARMSW
    1964 #else
    1965 TypeDef MCI_OPEN_PARMS = MCI_OPEN_PARMSA
    1966 #endif
     2007    lpstrDeviceType As LPSTR
     2008    lpstrElementName As LPSTR
     2009    lpstrAlias As LPSTR
     2010End Type
    19672011TypeDef PMCI_OPEN_PARMS = *MCI_OPEN_PARMS
    19682012TypeDef LPMCI_OPEN_PARMS = *MCI_OPEN_PARMS
     
    19992043TypeDef PMCI_INFO_PARMSW = *MCI_INFO_PARMSW
    20002044TypeDef LPMCI_INFO_PARMSW = *MCI_INFO_PARMSW
     2045
    20012046Type MCI_INFO_PARMSA
    20022047    dwCallback As DWord
     
    20062051TypeDef PMCI_INFO_PARMSA = *MCI_INFO_PARMSA
    20072052TypeDef LPMCI_INFO_PARMSA = *MCI_INFO_PARMSA
     2053
    20082054#ifdef UNICODE
    20092055TypeDef MCI_INFO_PARMS = MCI_INFO_PARMSW
     2056TypeDef PMCI_INFO_PARMS = PMCI_INFO_PARMSW
     2057TypeDef LPMCI_INFO_PARMS = LPMCI_INFO_PARMSW
    20102058#else
    20112059TypeDef MCI_INFO_PARMS = MCI_INFO_PARMSA
    2012 #endif
    2013 TypeDef PMCI_INFO_PARMS = *MCI_INFO_PARMS
    2014 TypeDef LPMCI_INFO_PARMS = *MCI_INFO_PARMS
     2060TypeDef PMCI_INFO_PARMS = PMCI_INFO_PARMSA
     2061TypeDef LPMCI_INFO_PARMS = LPMCI_INFO_PARMSA
     2062#endif
    20152063
    20162064Type MCI_GETDEVCAPS_PARMS
     
    20312079TypeDef PMCI_SYSINFO_PARMSW = *MCI_SYSINFO_PARMSW
    20322080TypeDef LPMCI_SYSINFO_PARMSW = *MCI_SYSINFO_PARMSW
     2081
    20332082Type MCI_SYSINFO_PARMSA
    20342083    dwCallback As DWord
     
    20402089TypeDef PMCI_SYSINFO_PARMSA = *MCI_SYSINFO_PARMSA
    20412090TypeDef LPMCI_SYSINFO_PARMSA = *MCI_SYSINFO_PARMSA
    2042 #ifdef UNICODE
     2091
     2092#ifdef UNICODE
     2093TypeDef MCI_SYSINFO_PARMS = MCI_SYSINFO_PARMSW
     2094TypeDef PMCI_SYSINFO_PARMS = PMCI_SYSINFO_PARMSW
     2095TypeDef LPMCI_SYSINFO_PARMS = LPMCI_SYSINFO_PARMSW
     2096#else
    20432097TypeDef MCI_SYSINFO_PARMS = MCI_SYSINFO_PARMSA
    2044 #else
    2045 TypeDef MCI_SYSINFO_PARMS = MCI_SYSINFO_PARMSW
    2046 #endif
    2047 TypeDef PMCI_SYSINFO_PARMS = *MCI_SYSINFO_PARMS
    2048 TypeDef LPMCI_SYSINFO_PARMS = *MCI_SYSINFO_PARMS
     2098TypeDef PMCI_SYSINFO_PARMS = PMCI_SYSINFO_PARMSA
     2099TypeDef LPMCI_SYSINFO_PARMS = LPMCI_SYSINFO_PARMSA
     2100#endif
    20492101
    20502102Type MCI_SET_PARMS
     
    20662118Type MCI_SAVE_PARMSW
    20672119    dwCallback As DWord
    2068     lpfilename As LPCWSTR
     2120    lpfilename As LPWSTR
    20692121End Type
    20702122TypeDef PMCI_SAVE_PARMSW = *MCI_SAVE_PARMSW
    20712123TypeDef LPMCI_SAVE_PARMSW = *MCI_SAVE_PARMSW
     2124
    20722125Type MCI_SAVE_PARMSA
    20732126    dwCallback As DWord
    2074     lpfilename As LPCSTR
     2127    lpfilename As LPSTR
    20752128End Type
    20762129TypeDef PMCI_SAVE_PARMSA = *MCI_SAVE_PARMSA
    20772130TypeDef LPMCI_SAVE_PARMSA = *MCI_SAVE_PARMSA
     2131
    20782132#ifdef UNICODE
    20792133TypeDef MCI_SAVE_PARMS = MCI_SAVE_PARMSW
     2134TypeDef PMCI_SAVE_PARMS = PMCI_SAVE_PARMSW
     2135TypeDef LPMCI_SAVE_PARMS = LPMCI_SAVE_PARMSW
    20802136#else
    20812137TypeDef MCI_SAVE_PARMS = MCI_SAVE_PARMSA
    2082 #endif
    2083 TypeDef PMCI_SAVE_PARMS = *MCI_SAVE_PARMS
    2084 TypeDef LPMCI_SAVE_PARMS = *MCI_SAVE_PARMS
     2138TypeDef PMCI_SAVE_PARMS = PMCI_SAVE_PARMSA
     2139TypeDef LPMCI_SAVE_PARMS = LPMCI_SAVE_PARMSA
     2140#endif
    20852141
    20862142Type MCI_LOAD_PARMSW
    20872143    dwCallback As DWord
    2088     lpfilename As LPCWSTR
     2144    lpfilename As LPWSTR
    20892145End Type
    20902146TypeDef PMCI_LOAD_PARMSW = *MCI_LOAD_PARMSW
    20912147TypeDef LPMCI_LOAD_PARMSW = *MCI_LOAD_PARMSW
     2148
    20922149Type MCI_LOAD_PARMSA
    20932150    dwCallback As DWord
    2094     lpfilename As LPCSTR
     2151    lpfilename As LPSTR
    20952152End Type
    20962153TypeDef PMCI_LOAD_PARMSA = *MCI_LOAD_PARMSA
    20972154TypeDef LPMCI_LOAD_PARMSA = *MCI_LOAD_PARMSA
     2155
    20982156#ifdef UNICODE
    20992157TypeDef MCI_LOAD_PARMS = MCI_LOAD_PARMSW
     2158TypeDef PMCI_LOAD_PARMS = PMCI_LOAD_PARMSW
     2159TypeDef LPMCI_LOAD_PARMS = LPMCI_LOAD_PARMSW
    21002160#else
    21012161TypeDef MCI_LOAD_PARMS = MCI_LOAD_PARMSA
    2102 #endif
    2103 TypeDef PMCI_LOAD_PARMS = *MCI_LOAD_PARMS
    2104 TypeDef LPMCI_LOAD_PARMS = *MCI_LOAD_PARMS
     2162TypeDef PMCI_LOAD_PARMS = PMCI_LOAD_PARMSA
     2163TypeDef LPMCI_LOAD_PARMS = LPMCI_LOAD_PARMSA
     2164#endif
    21052165
    21062166Type MCI_RECORD_PARMS
     
    21592219Type MCI_VD_ESCAPE_PARMSW
    21602220    dwCallback As DWord
    2161     lpstrCommand As LPCWSTR
     2221    lpstrCommand As LPWSTR
    21622222End Type
    21632223TypeDef PMCI_VD_ESCAPE_PARMSW = *MCI_VD_ESCAPE_PARMSW
    21642224TypeDef LPMCI_VD_ESCAPE_PARMSW = *MCI_VD_ESCAPE_PARMSW
     2225
    21652226Type MCI_VD_ESCAPE_PARMSA
    21662227    dwCallback As DWord
    2167     lpstrCommand As LPCSTR
     2228    lpstrCommand As LPSTR
    21682229End Type
    21692230TypeDef PMCI_VD_ESCAPE_PARMSA = *MCI_VD_ESCAPE_PARMSA
    21702231TypeDef LPMCI_VD_ESCAPE_PARMSA = *MCI_VD_ESCAPE_PARMSA
     2232
    21712233#ifdef UNICODE
    21722234TypeDef MCI_VD_ESCAPE_PARMS = MCI_VD_ESCAPE_PARMSW
     2235TypeDef PMCI_VD_ESCAPE_PARMS = PMCI_VD_ESCAPE_PARMSW
     2236TypeDef LPMCI_VD_ESCAPE_PARMS = LPMCI_VD_ESCAPE_PARMSW
    21732237#else
    21742238TypeDef MCI_VD_ESCAPE_PARMS = MCI_VD_ESCAPE_PARMSA
    2175 #endif
    2176 TypeDef PMCI_VD_ESCAPE_PARMS = *MCI_VD_ESCAPE_PARMS
    2177 TypeDef LPMCI_VD_ESCAPE_PARMS = *MCI_VD_ESCAPE_PARMS
     2239TypeDef PMCI_VD_ESCAPE_PARMS = PMCI_VD_ESCAPE_PARMSA
     2240TypeDef LPMCI_VD_ESCAPE_PARMS = LPMCI_VD_ESCAPE_PARMSA
     2241#endif
    21782242
    21792243' MCI extensions for CD audio devices
     
    22092273    dwCallback As DWord
    22102274    wDeviceID As MCIDEVICEID
    2211     lpstrDeviceType As LPCWSTR
    2212     lpstrElementName As LPCWSTR
    2213     lpstrAlias As LPCWSTR
     2275    lpstrDeviceType As LPWSTR
     2276    lpstrElementName As LPWSTR
     2277    lpstrAlias As LPWSTR
    22142278    dwBufferSeconds As DWord
    22152279End Type
    22162280TypeDef PMCI_WAVE_OPEN_PARMSW = *MCI_WAVE_OPEN_PARMSW
    22172281TypeDef LPMCI_WAVE_OPEN_PARMSW = *MCI_WAVE_OPEN_PARMSW
     2282
    22182283Type MCI_WAVE_OPEN_PARMSA
    22192284    dwCallback As DWord
    22202285    wDeviceID As MCIDEVICEID
    2221     lpstrDeviceType As LPCSTR
    2222     lpstrElementName As LPCSTR
    2223     lpstrAlias As LPCSTR
     2286    lpstrDeviceType As LPSTR
     2287    lpstrElementName As LPSTR
     2288    lpstrAlias As LPSTR
    22242289    dwBufferSeconds As DWord
    22252290End Type
    22262291TypeDef PMCI_WAVE_OPEN_PARMSA = *MCI_WAVE_OPEN_PARMSA
    22272292TypeDef LPMCI_WAVE_OPEN_PARMSA = *MCI_WAVE_OPEN_PARMSA
     2293
    22282294#ifdef UNICODE
    22292295TypeDef MCI_WAVE_OPEN_PARMS = MCI_WAVE_OPEN_PARMSW
     2296TypeDef PMCI_WAVE_OPEN_PARMS = PMCI_WAVE_OPEN_PARMSW
     2297TypeDef LPMCI_WAVE_OPEN_PARMS = LPMCI_WAVE_OPEN_PARMSW
    22302298#else
    22312299TypeDef MCI_WAVE_OPEN_PARMS = MCI_WAVE_OPEN_PARMSA
    2232 #endif
    2233 TypeDef PMCI_WAVE_OPEN_PARMS = *MCI_WAVE_OPEN_PARMS
    2234 TypeDef LPMCI_WAVE_OPEN_PARMS = *MCI_WAVE_OPEN_PARMS
     2300TypeDef PMCI_WAVE_OPEN_PARMS = PMCI_WAVE_OPEN_PARMSA
     2301TypeDef LPMCI_WAVE_OPEN_PARMS = LPMCI_WAVE_OPEN_PARMSA
     2302#endif
    22352303
    22362304Type MCI_WAVE_DELETE_PARMS
     
    23432411    dwCallback As DWord
    23442412    wDeviceID As MCIDEVICEID
    2345     lpstrDeviceType As LPCWSTR
    2346     lpstrElementName As LPCWSTR
    2347     lpstrAlias As LPCWSTR
     2413    lpstrDeviceType As LPWSTR
     2414    lpstrElementName As LPWSTR
     2415    lpstrAlias As LPWSTR
    23482416    dwStyle As DWord
    23492417    hWndParent As HWND
     
    23512419TypeDef PMCI_ANIM_OPEN_PARMSW = *MCI_ANIM_OPEN_PARMSW
    23522420TypeDef LPMCI_ANIM_OPEN_PARMSW = *MCI_ANIM_OPEN_PARMSW
     2421
    23532422Type MCI_ANIM_OPEN_PARMSA
    23542423    dwCallback As DWord
    23552424    wDeviceID As MCIDEVICEID
    2356     lpstrDeviceType As LPCSTR
    2357     lpstrElementName As LPCSTR
    2358     lpstrAlias As LPCSTR
     2425    lpstrDeviceType As LPSTR
     2426    lpstrElementName As LPSTR
     2427    lpstrAlias As LPSTR
    23592428    dwStyle As DWord
    23602429    hWndParent As HWND
     
    23622431TypeDef PMCI_ANIM_OPEN_PARMSA = *MCI_ANIM_OPEN_PARMSA
    23632432TypeDef LPMCI_ANIM_OPEN_PARMSA = *MCI_ANIM_OPEN_PARMSA
     2433
    23642434#ifdef UNICODE
    23652435TypeDef MCI_ANIM_OPEN_PARMS = MCI_ANIM_OPEN_PARMSW
     2436TypeDef PMCI_ANIM_OPEN_PARMS = PMCI_ANIM_OPEN_PARMSW
     2437TypeDef LPMCI_ANIM_OPEN_PARMS = LPMCI_ANIM_OPEN_PARMSW
    23662438#else
    23672439TypeDef MCI_ANIM_OPEN_PARMS = MCI_ANIM_OPEN_PARMSA
    2368 #endif
    2369 TypeDef PMCI_ANIM_OPEN_PARMS = *MCI_ANIM_OPEN_PARMS
    2370 TypeDef LPMCI_ANIM_OPEN_PARMS = *MCI_ANIM_OPEN_PARMS
     2440TypeDef PMCI_ANIM_OPEN_PARMS = PMCI_ANIM_OPEN_PARMSA
     2441TypeDef LPMCI_ANIM_OPEN_PARMS = LPMCI_ANIM_OPEN_PARMSA
     2442#endif
    23712443
    23722444Type MCI_ANIM_PLAY_PARMS
     
    23862458TypeDef LPMCI_ANIM_STEP_PARMS = *MCI_ANIM_STEP_PARMS
    23872459
    2388 Type MCI_ANIM_WINDOW_PARMSW
     2460Type MCI_ANIM_WINDOW_PARMSA
    23892461    dwCallback As DWord
    23902462    hWnd As HWND
    23912463    nCmdShow As DWord
    2392     lpstrText As LPCWSTR
    2393 End Type
    2394 TypeDef PMCI_ANIM_WINDOW_PARMSW = *MCI_ANIM_WINDOW_PARMSW
    2395 TypeDef LPMCI_ANIM_WINDOW_PARMSW = *MCI_ANIM_WINDOW_PARMSW
    2396 Type MCI_ANIM_WINDOW_PARMSA
    2397     dwCallback As DWord
    2398     hWnd As HWND
    2399     nCmdShow As DWord
    2400     lpstrText As LPCSTR
     2464    lpstrText As LPSTR
    24012465End Type
    24022466TypeDef PMCI_ANIM_WINDOW_PARMSA = *MCI_ANIM_WINDOW_PARMSA
    24032467TypeDef LPMCI_ANIM_WINDOW_PARMSA = *MCI_ANIM_WINDOW_PARMSA
    2404 #ifdef UNICODE
    2405 TypeDef MCI_ANIM_WINDOW_PARMS = MCI_ANIM_WINDOW_PARMSW
    2406 #else
    24072468TypeDef MCI_ANIM_WINDOW_PARMS = MCI_ANIM_WINDOW_PARMSA
    2408 #endif
    2409 TypeDef PMCI_ANIM_WINDOW_PARMS = *MCI_ANIM_WINDOW_PARMS
    2410 TypeDef LPMCI_ANIM_WINDOW_PARMS = *MCI_ANIM_WINDOW_PARMS
     2469TypeDef PMCI_ANIM_WINDOW_PARMS = PMCI_ANIM_WINDOW_PARMSA
     2470TypeDef LPMCI_ANIM_WINDOW_PARMS = LPMCI_ANIM_WINDOW_PARMSA
    24112471
    24122472Type MCI_ANIM_RECT_PARMS
     
    24502510Const MCI_OVLY_WHERE_VIDEO =            &H00100000
    24512511
    2452 Type MCI_OVLY_OPEN_PARMSAW
     2512Type MCI_OVLY_OPEN_PARMSW
    24532513    dwCallback As DWord
    24542514    wDeviceID As MCIDEVICEID
    2455     lpstrDeviceType As LPCWSTR
    2456     lpstrElementName As LPCWSTR
    2457     lpstrAlias As LPCWSTR
     2515    lpstrDeviceType As LPWSTR
     2516    lpstrElementName As LPWSTR
     2517    lpstrAlias As LPWSTR
    24582518    dwStyle As DWord
    24592519    hWndParent As HWND
     
    24612521TypeDef PMCI_OVLY_OPEN_PARMSW = *MCI_OVLY_OPEN_PARMSW
    24622522TypeDef LPMCI_OVLY_OPEN_PARMSW = *MCI_OVLY_OPEN_PARMSW
     2523
    24632524Type MCI_OVLY_OPEN_PARMSA
    24642525    dwCallback As DWord
    24652526    wDeviceID As MCIDEVICEID
    2466     lpstrDeviceType As LPCSTR
    2467     lpstrElementName As LPCSTR
    2468     lpstrAlias As LPCSTR
     2527    lpstrDeviceType As LPSTR
     2528    lpstrElementName As LPSTR
     2529    lpstrAlias As LPSTR
    24692530    dwStyle As DWord
    24702531    hWndParent As HWND
     
    24722533TypeDef PMCI_OVLY_OPEN_PARMSA = *MCI_OVLY_OPEN_PARMSA
    24732534TypeDef LPMCI_OVLY_OPEN_PARMSA = *MCI_OVLY_OPEN_PARMSA
     2535
    24742536#ifdef UNICODE
    24752537TypeDef MCI_OVLY_OPEN_PARMS = MCI_OVLY_OPEN_PARMSW
     2538TypeDef PMCI_OVLY_OPEN_PARMS = PMCI_OVLY_OPEN_PARMSW
     2539TypeDef LPMCI_OVLY_OPEN_PARMS = LPMCI_OVLY_OPEN_PARMSW
    24762540#else
    24772541TypeDef MCI_OVLY_OPEN_PARMS = MCI_OVLY_OPEN_PARMSA
    2478 #endif
    2479 TypeDef PMCI_OVLY_OPEN_PARMS = *MCI_OVLY_OPEN_PARMS
    2480 TypeDef LPMCI_OVLY_OPEN_PARMS = *MCI_OVLY_OPEN_PARMS
     2542TypeDef PMCI_OVLY_OPEN_PARMS = PMCI_OVLY_OPEN_PARMSA
     2543TypeDef LPMCI_OVLY_OPEN_PARMS = LPMCI_OVLY_OPEN_PARMSA
     2544#endif
    24812545
    24822546Type MCI_OVLY_WINDOW_PARMSW
     
    24842548    hWnd As HWND
    24852549    nCmdShow As DWord
    2486     lpstrText As LPCWSTR
     2550    lpstrText As LPWSTR
    24872551End Type
    24882552TypeDef PMCI_OVLY_WINDOW_PARMSW = *MCI_OVLY_WINDOW_PARMSW
    24892553TypeDef LPMCI_OVLY_WINDOW_PARMSW = *MCI_OVLY_WINDOW_PARMSW
    2490 Type MCI_OVLY_WINDOW_PARMSA
    2491     dwCallback As DWord
    2492     hWnd As HWND
    2493     nCmdShow As DWord
    2494     lpstrText As LPCSTR
    2495 End Type
    2496 TypeDef PMCI_OVLY_WINDOW_PARMSA = *MCI_OVLY_WINDOW_PARMSA
    2497 TypeDef LPMCI_OVLY_WINDOW_PARMSA = *MCI_OVLY_WINDOW_PARMSA
     2554
    24982555#ifdef UNICODE
    24992556TypeDef MCI_OVLY_WINDOW_PARMS = MCI_OVLY_WINDOW_PARMSW
     2557TypeDef PMCI_OVLY_WINDOW_PARMS = PMCI_OVLY_WINDOW_PARMSW
     2558TypeDef LPMCI_OVLY_WINDOW_PARMS = LPMCI_OVLY_WINDOW_PARMSW
    25002559#else
    25012560TypeDef MCI_OVLY_WINDOW_PARMS = MCI_OVLY_WINDOW_PARMSA
    2502 #endif
    2503 TypeDef PMCI_OVLY_WINDOW_PARMS = *MCI_OVLY_WINDOW_PARMS
    2504 TypeDef LPMCI_OVLY_WINDOW_PARMS = *MCI_OVLY_WINDOW_PARMS
     2561TypeDef PMCI_OVLY_WINDOW_PARMS = PMCI_OVLY_WINDOW_PARMSA
     2562TypeDef LPMCI_OVLY_WINDOW_PARMS = LPMCI_OVLY_WINDOW_PARMSA
     2563#endif
    25052564
    25062565Type MCI_OVLY_RECT_PARMS
     
    25132572Type MCI_OVLY_SAVE_PARMSW
    25142573    dwCallback As DWord
    2515     lpfilename As LPCWSTR
     2574    lpfilename As LPWSTR
    25162575    rc As RECT
    25172576End Type
    25182577TypeDef PMCI_OVLY_SAVE_PARMSW = *MCI_OVLY_SAVE_PARMSW
    25192578TypeDef LPMCI_OVLY_SAVE_PARMSW = *MCI_OVLY_SAVE_PARMSW
     2579
    25202580Type MCI_OVLY_SAVE_PARMSA
    25212581    dwCallback As DWord
    2522     lpfilename As LPCSTR
     2582    lpfilename As LPSTR
    25232583    rc As RECT
    25242584End Type
    25252585TypeDef PMCI_OVLY_SAVE_PARMSA = *MCI_OVLY_SAVE_PARMSA
    25262586TypeDef LPMCI_OVLY_SAVE_PARMSA = *MCI_OVLY_SAVE_PARMSA
     2587
    25272588#ifdef UNICODE
    25282589TypeDef MCI_OVLY_SAVE_PARMS = MCI_OVLY_SAVE_PARMSW
     2590TypeDef PMCI_OVLY_SAVE_PARMS = PMCI_OVLY_SAVE_PARMSW
     2591TypeDef LPMCI_OVLY_SAVE_PARMS = LPMCI_OVLY_SAVE_PARMSW
    25292592#else
    25302593TypeDef MCI_OVLY_SAVE_PARMS = MCI_OVLY_SAVE_PARMSA
    2531 #endif
    2532 TypeDef PMCI_OVLY_SAVE_PARMS = *MCI_OVLY_SAVE_PARMS
    2533 TypeDef LPMCI_OVLY_SAVE_PARMS = *MCI_OVLY_SAVE_PARMS
     2594TypeDef PMCI_OVLY_SAVE_PARMS = PMCI_OVLY_SAVE_PARMSA
     2595TypeDef LPMCI_OVLY_SAVE_PARMS = LPMCI_OVLY_SAVE_PARMSA
     2596#endif
     2597
     2598Type MCI_OVLY_LOAD_PARMSW
     2599    dwCallback As DWord
     2600    lpfilename As LPWSTR
     2601    rc As RECT
     2602End Type
     2603TypeDef PMCI_OVLY_LOAD_PARMSW = *MCI_OVLY_LOAD_PARMSW
     2604TypeDef LPMCI_OVLY_LOAD_PARMSW = *MCI_OVLY_LOAD_PARMSW
    25342605
    25352606Type MCI_OVLY_LOAD_PARMSA
     
    25402611TypeDef PMCI_OVLY_LOAD_PARMSA = *MCI_OVLY_LOAD_PARMSA
    25412612TypeDef LPMCI_OVLY_LOAD_PARMSA = *MCI_OVLY_LOAD_PARMSA
     2613
     2614#ifdef UNICODE
     2615TypeDef MCI_OVLY_LOAD_PARMS = MCI_OVLY_LOAD_PARMSW
     2616TypeDef PMCI_OVLY_LOAD_PARMS = PMCI_OVLY_LOAD_PARMSW
     2617TypeDef LPMCI_OVLY_LOAD_PARMS = LPMCI_OVLY_LOAD_PARMSW
     2618#else
    25422619TypeDef MCI_OVLY_LOAD_PARMS = MCI_OVLY_LOAD_PARMSA
    25432620TypeDef PMCI_OVLY_LOAD_PARMS = PMCI_OVLY_LOAD_PARMSA
    25442621TypeDef LPMCI_OVLY_LOAD_PARMS = LPMCI_OVLY_LOAD_PARMSA
     2622#endif
    25452623
    25462624' DISPLAY Driver extensions
     
    25502628' DIB Driver extensions
    25512629Const SELECTDIB = 41
    2552 Const DIBINDEX(n) = MAKELONG(n, &H10FF)
     2630Const DIBINDEX(n) = MAKELONG(n,&H10FF)
    25532631
    25542632#endif '_INC_MMSYS
Note: See TracChangeset for help on using the changeset viewer.