Changeset 158 for Include/api_mmsys.sbp
- Timestamp:
- Mar 12, 2007, 8:36:24 PM (18 years ago)
- File:
-
- 1 edited
-
Include/api_mmsys.sbp (modified) (54 diffs)
Legend:
- Unmodified
- Added
- Removed
-
Include/api_mmsys.sbp
r141 r158 6 6 #define _INC_MMSYS 7 7 8 #ifdef UNICODE9 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 #else34 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 #endif59 8 60 9 ' general constants … … 312 261 ' Sound support 313 262 314 Declare Function sndPlaySound Lib "winmm" Alias _FuncName_sndPlaySound (pszSound As PCTSTR, fuSound As DWord) As BOOL 263 #ifdef UNICODE 264 Declare Function sndPlaySound Lib "winmm" Alias "sndPlaySoundW" (pszSound As PCWSTR, fuSound As DWord) As BOOL 265 #else 266 Declare Function sndPlaySound Lib "winmm" Alias "sndPlaySoundA" (pszSound As PCSTR, fuSound As DWord) As BOOL 267 #endif 315 268 316 269 Const SND_SYNC = &H0000 … … 340 293 Const SND_ALIAS_SYSTEMDEFAULT = sndAlias(&H53, &H44) 341 294 342 Declare Function PlaySound Lib "winmm" Alias _FuncName_PlaySound (pszSound As PCTSTR, hmod As HMODULE, fdwSound As DWord) As BOOL 295 #ifdef UNICODE 296 Declare Function PlaySound Lib "winmm" Alias "PlaySoundW" (pszSound As PCWSTR, hmod As HMODULE, fdwSound As DWord) As BOOL 297 #else 298 Declare Function PlaySound Lib "winmm" Alias "PlaySoundA" (pszSound As PCSTR, hmod As HMODULE, fdwSound As DWord) As BOOL 299 #endif 343 300 344 301 … … 416 373 TypeDef PWAVEOUTCAPSW = *WAVEOUTCAPSW 417 374 TypeDef LPWAVEOUTCAPSW = *WAVEOUTCAPSW 375 418 376 Type WAVEOUTCAPSA 419 377 wMid As Word … … 428 386 TypeDef PWAVEOUTCAPSA = *WAVEOUTCAPSA 429 387 TypeDef LPWAVEOUTCAPSA = *WAVEOUTCAPSA 388 430 389 #ifdef UNICODE 431 390 TypeDef WAVEOUTCAPS = WAVEOUTCAPSW 391 TypeDef PWAVEOUTCAPS = PWAVEOUTCAPSW 392 TypeDef LPWAVEOUTCAPS = LPWAVEOUTCAPSW 432 393 #else 433 394 TypeDef WAVEOUTCAPS = WAVEOUTCAPSA 434 #endif 435 TypeDef PWAVEOUTCAPS = *WAVEOUTCAPS436 TypeDef LPWAVEOUTCAPS = *WAVEOUTCAPS 395 TypeDef PWAVEOUTCAPS = PWAVEOUTCAPSA 396 TypeDef LPWAVEOUTCAPS = LPWAVEOUTCAPSA 397 #endif 437 398 438 399 ' flags for dwSupport field of WAVEOUTCAPS … … 457 418 TypeDef PWAVEINCAPSW = *WAVEINCAPSW 458 419 TypeDef LPWAVEINCAPSW = *WAVEINCAPSW 420 459 421 Type WAVEINCAPSA 460 422 wMid As Word … … 468 430 TypeDef PWAVEINCAPSA = *WAVEINCAPSA 469 431 TypeDef LPWAVEINCAPSA = *WAVEINCAPSA 432 470 433 #ifdef UNICODE 471 434 TypeDef WAVEINCAPS = WAVEINCAPSW 435 TypeDef PWAVEINCAPS = PWAVEINCAPSW 436 TypeDef LPWAVEINCAPS = LPWAVEINCAPSW 472 437 #else 473 438 TypeDef WAVEINCAPS = WAVEINCAPSA 474 #endif 475 TypeDef PWAVEINCAPS = *WAVEINCAPS476 TypeDef LPWAVEINCAPS = *WAVEINCAPS 439 TypeDef PWAVEINCAPS = PWAVEINCAPSA 440 TypeDef LPWAVEINCAPS = LPWAVEINCAPSA 441 #endif 477 442 478 443 ' defines for dwFormat field of WAVEINCAPS and WAVEOUTCAPS 479 444 Const 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 445 Const WAVE_FORMAT_1M08 = &H00000001 ' 11.025 kHz, Mono, 8-bit 446 Const WAVE_FORMAT_1S08 = &H00000002 ' 11.025 kHz, Stereo, 8-bit 482 447 Const WAVE_FORMAT_1M16 = &H00000004 ' 11.025 kHz, Mono, 16-bit 483 448 Const 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 449 Const WAVE_FORMAT_2M08 = &H00000010 ' 22.05 kHz, Mono, 8-bit 450 Const WAVE_FORMAT_2S08 = &H00000020 ' 22.05 kHz, Stereo, 8-bit 486 451 Const WAVE_FORMAT_2M16 = &H00000040 ' 22.05 kHz, Mono, 16-bit 487 452 Const 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 453 Const WAVE_FORMAT_4M08 = &H00000100 ' 44.1 kHz, Mono, 8-bit 454 Const WAVE_FORMAT_4S08 = &H00000200 ' 44.1 kHz, Stereo, 8-bit 490 455 Const WAVE_FORMAT_4M16 = &H00000400 ' 44.1 kHz, Mono, 16-bit 491 456 Const WAVE_FORMAT_4S16 = &H00000800 ' 44.1 kHz, Stereo, 16-bit … … 528 493 ' waveform audio function prototypes 529 494 Declare 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 496 Declare Function waveOutGetDevCaps Lib "winmm" Alias "waveOutGetDevCapsW" (uDeviceID As DWord, ByRef pwoc As WAVEOUTCAPSW, cbwoc As DWord) As MMRESULT 497 #else 498 Declare Function waveOutGetDevCaps Lib "winmm" Alias "waveOutGetDevCapsA" (uDeviceID As DWord, ByRef pwoc As WAVEOUTCAPS, cbwoc As DWord) As MMRESULT 499 #endif 531 500 Declare Function waveOutGetVolume Lib "winmm" (hwo As HWAVEOUT, ByRef pdwVolume As DWord) As MMRESULT 532 501 Declare 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 503 Declare Function waveOutGetErrorText Lib "winmm" Alias "waveOutGetErrorTextW" (mmrError As MMRESULT, pszText As LPWSTR, cchText As DWord) As MMRESULT 504 #else 505 Declare Function waveOutGetErrorText Lib "winmm" Alias "waveOutGetErrorTextA" (mmrError As MMRESULT, pszText As LPSTR, cchText As DWord) As MMRESULT 506 #endif 534 507 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 535 508 Declare Function waveOutClose Lib "winmm" (hwo As HWAVEOUT) As MMRESULT … … 550 523 551 524 Declare 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 526 Declare Function waveInGetDevCaps Lib "winmm" Alias "waveInGetDevCapsW" (uDeviceID As DWord, ByRef pwic As WAVEINCAPSW, cbwic As DWord) As MMRESULT 527 Declare Function waveInGetErrorText Lib "winmm" Alias "waveInGetErrorTextW" (mmrError As MMRESULT, pszText As LPWSTR, cchText As DWord) As MMRESULT 528 #else 529 Declare Function waveInGetDevCaps Lib "winmm" Alias "waveInGetDevCapsA" (uDeviceID As DWord, ByRef pwic As WAVEINCAPS, cbwic As DWord) As MMRESULT 530 Declare Function waveInGetErrorText Lib "winmm" Alias "waveInGetErrorTextA" (mmrError As MMRESULT, pszText As LPSTR, cchText As DWord) As MMRESULT 531 #endif 554 532 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 555 533 Declare Function waveInClose Lib "winmm" (hwi As HWAVEIN) As MMRESULT … … 637 615 TypeDef PMIDIOUTCAPSW = *MIDIOUTCAPSW 638 616 TypeDef LPMIDIOUTCAPSW = *MIDIOUTCAPSW 617 639 618 Type MIDIOUTCAPSA 640 619 wMid As Word … … 653 632 #ifdef UNICODE 654 633 TypeDef MIDIOUTCAPS = MIDIOUTCAPSW 634 TypeDef PMIDIOUTCAPS = PMIDIOUTCAPSW 635 TypeDef LPMIDIOUTCAPS = LPMIDIOUTCAPSW 655 636 #else 656 637 TypeDef MIDIOUTCAPS = MIDIOUTCAPSA 657 #endif 658 TypeDef PMIDIOUTCAPS = *MIDIOUTCAPS659 TypeDef LPMIDIOUTCAPS = *MIDIOUTCAPS 638 TypeDef PMIDIOUTCAPS = PMIDIOUTCAPSA 639 TypeDef LPMIDIOUTCAPS = LPMIDIOUTCAPSA 640 #endif 660 641 661 642 ' flags for wTechnology field of MIDIOUTCAPS structure … … 677 658 wPid As Word 678 659 vDriverVersion As MMVERSION 679 szPname[ELM(MAXPNAMELEN)] As WCHAR660 szPname[ELM(MAXPNAMELEN)] As Char 680 661 dwSupport As DWord 681 662 End Type 682 663 TypeDef PMIDIINCAPSW = *MIDIINCAPSW 683 664 TypeDef LPMIDIINCAPSW = *MIDIINCAPSW 665 684 666 Type MIDIINCAPSA 685 667 wMid As Word 686 668 wPid As Word 687 669 vDriverVersion As MMVERSION 688 szPname[ELM(MAXPNAMELEN)] As SByte670 szPname[ELM(MAXPNAMELEN)] As Char 689 671 dwSupport As DWord 690 672 End Type 691 673 TypeDef PMIDIINCAPSA = *MIDIINCAPSA 692 674 TypeDef LPMIDIINCAPSA = *MIDIINCAPSA 675 693 676 #ifdef UNICODE 694 677 TypeDef MIDIINCAPS = MIDIINCAPSW 678 TypeDef PMIDIINCAPS = PMIDIINCAPSW 679 TypeDef LPMIDIINCAPS = LPMIDIINCAPSW 695 680 #else 696 681 TypeDef MIDIINCAPS = MIDIINCAPSA 697 #endif 698 TypeDef PMIDIINCAPS = *MIDIINCAPS699 TypeDef LPMIDIINCAPS = *MIDIINCAPS 682 TypeDef PMIDIINCAPS = PMIDIINCAPSA 683 TypeDef LPMIDIINCAPS = LPMIDIINCAPSA 684 #endif 700 685 701 686 ' MIDI data block header … … 779 764 Declare Function midiConnect Lib "winmm" (hmi As HMIDI, hmo As HMIDIOUT, pReserved As VoidPtr) As MMRESULT 780 765 Declare 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 767 Declare Function midiOutGetDevCaps Lib "winmm" Alias "midiOutGetDevCapsW" (uDeviceID As DWord, ByRef pmoc As MIDIOUTCAPSW, cbmoc As DWord) As MMRESULT 768 #else 769 Declare Function midiOutGetDevCaps Lib "winmm" Alias "midiOutGetDevCapsA" (uDeviceID As DWord, ByRef pmoc As MIDIOUTCAPS, cbmoc As DWord) As MMRESULT 770 #endif 782 771 Declare Function midiOutGetVolume Lib "winmm" (hmo As HMIDIOUT, ByRef pdwVolume As DWord) As MMRESULT 783 772 Declare 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 774 Declare Function midiOutGetErrorText Lib "winmm" Alias "midiOutGetErrorTextW" (mmrError As MMRESULT, pszText As LPWSTR, cchText As DWord) As MMRESULT 775 #else 776 Declare Function midiOutGetErrorText Lib "winmm" Alias "midiOutGetErrorTextA" (mmrError As MMRESULT, pszText As LPSTR, cchText As DWord) As MMRESULT 777 #endif 785 778 Declare Function midiOutOpen Lib "winmm" (ByRef phmo As HMIDIOUT, uDeviceID As DWord, dwCallback As DWord, dwInstance As DWord, fdwOpen As DWord) As MMRESULT 786 779 Declare Function midiOutClose Lib "winmm" (hmo As HMIDIOUT) As MMRESULT … … 796 789 797 790 Declare 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 792 Declare Function midiInGetDevCaps Lib "winmm" Alias "midiInGetDevCapsW" (uDeviceID As DWord, ByRef pmic As MIDIINCAPSW, cbmic As DWord) As MMRESULT 793 Declare Function midiInGetErrorText Lib "winmm" Alias "midiInGetErrorTextW" (mmrError As MMRESULT, pszText As LPWSTR, cchText As DWord) As MMRESULT 794 #else 795 Declare Function midiInGetDevCaps Lib "winmm" Alias "midiInGetDevCapsA" (uDeviceID As DWord, ByRef pmic As MIDIINCAPS, cbmic As DWord) As MMRESULT 796 Declare Function midiInGetErrorText Lib "winmm" Alias "midiInGetErrorTextA" (mmrError As MMRESULT, pszText As LPSTR, cchText As DWord) As MMRESULT 797 #endif 800 798 Declare Function midiInOpen Lib "winmm" (ByRef phmi As HMIDIIN, uDeviceID As DWord, dwCallback As DWord, dwInstance As DWord, fdwOpen As DWord) As MMRESULT 801 799 Declare Function midiInClose Lib "winmm" (hmi As HMIDIIN) As MMRESULT … … 829 827 TypeDef NPAUXCAPSW = *AUXCAPSW 830 828 TypeDef LPAUXCAPSW = *AUXCAPSW 829 831 830 Type AUXCAPSA 832 831 wMid As Word … … 841 840 TypeDef NPAUXCAPSA = *AUXCAPSA 842 841 TypeDef LPAUXCAPSA = *AUXCAPSA 843 #ifdef UNICODE 842 843 #ifdef UNICODE 844 TypeDef AUXCAPS = AUXCAPSW 845 TypeDef PAUXCAPS = PAUXCAPSW 846 TypeDef NPAUXCAPS = NPAUXCAPSW 847 TypeDef LPAUXCAPS = LPAUXCAPSW 848 #else 844 849 TypeDef AUXCAPS = AUXCAPSA 845 #else 846 TypeDef AUXCAPS = AUXCAPSA 847 #endif 848 TypeDef PAUXCAPS = *AUXCAPS 849 TypeDef NPAUXCAPS = *AUXCAPS 850 TypeDef LPAUXCAPS = *AUXCAPS 850 TypeDef PAUXCAPS = PAUXCAPSA 851 TypeDef NPAUXCAPS = NPAUXCAPSA 852 TypeDef LPAUXCAPS = LPAUXCAPSA 853 #endif 851 854 852 855 Const AUXCAPS_CDAUDIO = 1 … … 858 861 ' auxiliary audio function prototypes 859 862 Declare 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 864 Declare Function auxGetDevCaps Lib "winmm" Alias "auxGetDevCapsW" (uDeviceID As DWord, pac As *AUXCAPSW, cbac As DWord) As MMRESULT 865 #else 866 Declare Function auxGetDevCaps Lib "winmm" Alias "auxGetDevCapsA" (uDeviceID As DWord, pac As *AUXCAPS, cbac As DWord) As MMRESULT 867 #endif 861 868 Declare Function auxSetVolume Lib "winmm" (uDeviceID As DWord, dwVolume As DWord) As MMRESULT 862 869 Declare Function auxGetVolume Lib "winmm" (uDeviceID As DWord, pdwVolume As *DWord) As MMRESULT … … 905 912 TypeDef PMIXERCAPSW = *MIXERCAPSW 906 913 TypeDef LPMIXERCAPSW = *MIXERCAPSW 914 907 915 Type MIXERCAPSA 908 916 wMid As Word 909 917 wPid As Word 910 918 vDriverVersion As MMVERSION 911 szPname[ELM(MAXPNAMELEN)] As Char919 szPname[ELM(MAXPNAMELEN)] As SByte 912 920 fdwSupport As DWord 913 921 cDestinations As DWord … … 915 923 TypeDef PMIXERCAPSA = *MIXERCAPSA 916 924 TypeDef LPMIXERCAPSA = *MIXERCAPSA 925 917 926 #ifdef UNICODE 918 927 TypeDef MIXERCAPS = MIXERCAPSW 928 TypeDef PMIXERCAPS = PMIXERCAPSW 929 TypeDef LPMIXERCAPS = LPMIXERCAPSW 930 Declare Function mixerGetDevCaps Lib "winmm" Alias "mixerGetDevCapsW" (uMxId As DWord, pmxcaps As *MIXERCAPSW, cbmxcaps As DWord) As MMRESULT 919 931 #else 920 932 TypeDef MIXERCAPS = MIXERCAPSA 921 #endif 922 TypeDef PMIXERCAPS = *MIXERCAPS923 TypeDef LPMIXERCAPS = *MIXERCAPS 924 925 Declare Function mixerGetDevCaps Lib "winmm" Alias _FuncName_mixerGetDevCaps (uMxId As DWord, pmxcaps As *MIXERCAPS, cbmxcaps As DWord) As MMRESULT 933 TypeDef PMIXERCAPS = PMIXERCAPSA 934 TypeDef LPMIXERCAPS = LPMIXERCAPSA 935 Declare Function mixerGetDevCaps Lib "winmm" Alias "mixerGetDevCapsA" (uMxId As DWord, pmxcaps As *MIXERCAPS, cbmxcaps As DWord) As MMRESULT 936 #endif 937 926 938 Declare Function mixerOpen Lib "winmm" (phmx As *HMIXER, uMxId As DWord, dwCallback As DWord, dwInstance As DWord, fdwOpen As DWord) As MMRESULT 927 939 Declare Function mixerClose Lib "winmm" (hmx As HMIXER) As MMRESULT 928 940 Declare Function mixerMessage Lib "winmm" (hmx As HMIXER, uMsg As DWord, dwParam1 As DWord, dwParam2 As DWord) As DWord 929 941 930 Type _MMSYSTEM_TARGETW 942 #ifdef UNICODE 943 Type TARGET 931 944 dwType As DWord 932 945 dwDeviceID As DWord … … 936 949 szPname[ELM(MAXPNAMELEN)] As WCHAR 937 950 End Type 951 #else 952 Type 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 959 End Type 960 #endif 938 961 939 962 Type MIXERLINEW … … 950 973 szShortName[ELM(MIXER_SHORT_NAME_CHARS)] As WCHAR 951 974 szName[ELM(MIXER_LONG_NAME_CHARS)] As WCHAR 952 Target As _MMSYSTEM_TARGETW975 Target As TARGET 953 976 End Type 954 977 TypeDef PMIXERLINEW = *MIXERLINEW 955 978 TypeDef LPMIXERLINEW = *MIXERLINEW 956 957 Type _MMSYSTEM_TARGETA958 dwType As DWord959 dwDeviceID As DWord960 wMid As Word961 wPid As Word962 vDriverVersion As MMVERSION963 szPname[ELM(MAXPNAMELEN)] As SByte964 End Type965 979 966 980 Type MIXERLINEA … … 977 991 szShortName[ELM(MIXER_SHORT_NAME_CHARS)] As SByte 978 992 szName[ELM(MIXER_LONG_NAME_CHARS)] As SByte 979 Target As _MMSYSTEM_TARGETA993 Target As TARGET 980 994 End Type 981 995 TypeDef PMIXERLINEA = *MIXERLINEA 982 996 TypeDef LPMIXERLINEA = *MIXERLINEA 983 #ifdef UNICODE 997 998 #ifdef UNICODE 999 TypeDef MIXERLINE = MIXERLINEA 1000 TypeDef PMIXERLINE = PMIXERLINEA 1001 TypeDef LPMIXERLINE = LPMIXERLINEA 1002 #else 984 1003 TypeDef MIXERLINE = MIXERLINEW 985 #else 986 TypeDef MIXERLINE = MIXERLINEA 987 #endif 988 TypeDef PMIXERLINE = *MIXERLINE 989 TypeDef LPMIXERLINE = *MIXERLINE 1004 TypeDef PMIXERLINE = PMIXERLINEW 1005 TypeDef LPMIXERLINE = LPMIXERLINEW 1006 #endif 990 1007 991 1008 ' MIXERLINE.fdwLine … … 1029 1046 Const MIXERLINE_TARGETTYPE_AUX = 5 1030 1047 1031 Declare Function mixerGetLineInfo Lib "winmm" Alias _FuncName_mixerGetLineInfo (hmxobj As HMIXEROBJ, pmxl As *MIXERLINE, fdwInfo As DWord) As MMRESULT 1048 #ifdef UNICODE 1049 Declare Function mixerGetLineInfo Lib "winmm" Alias "mixerGetLineInfoW" (hmxobj As HMIXEROBJ, pmxl As *MIXERLINEW, fdwInfo As DWord) As MMRESULT 1050 #else 1051 Declare Function mixerGetLineInfo Lib "winmm" Alias "mixerGetLineInfoA" (hmxobj As HMIXEROBJ, pmxl As *MIXERLINE, fdwInfo As DWord) As MMRESULT 1052 #endif 1032 1053 1033 1054 Const MIXER_GETLINEINFOF_DESTINATION = &H00000000 … … 1053 1074 TypeDef PMIXERCONTROLW = *MIXERCONTROLW 1054 1075 TypeDef LPMIXERCONTROLW = *MIXERCONTROLW 1076 1055 1077 Type MIXERCONTROLA 1056 1078 cbStruct As DWord … … 1066 1088 TypeDef PMIXERCONTROLA = *MIXERCONTROLA 1067 1089 TypeDef LPMIXERCONTROLA = *MIXERCONTROLA 1090 1068 1091 #ifdef UNICODE 1069 1092 TypeDef MIXERCONTROL = MIXERCONTROLW 1093 TypeDef PMIXERCONTROL = PMIXERCONTROLW 1094 TypeDef LPMIXERCONTROL = LPMIXERCONTROLW 1070 1095 #else 1071 1096 TypeDef MIXERCONTROL = MIXERCONTROLA 1072 #endif 1073 TypeDef PMIXERCONTROL = *MIXERCONTROL1074 TypeDef LPMIXERCONTROL = *MIXERCONTROL 1097 TypeDef PMIXERCONTROL = PMIXERCONTROLA 1098 TypeDef LPMIXERCONTROL = LPMIXERCONTROLA 1099 #endif 1075 1100 1076 1101 ' MIXERCONTROL.fdwControl … … 1147 1172 TypeDef PMIXERLINECONTROLSW = *MIXERLINECONTROLSW 1148 1173 TypeDef LPMIXERLINECONTROLSW = *MIXERLINECONTROLSW 1174 1149 1175 Type MIXERLINECONTROLSA 1150 1176 cbStruct As DWord … … 1153 1179 cControls As DWord 1154 1180 cbmxctrl As DWord 1155 pamxctrl As *MIXERCONTROL A1181 pamxctrl As *MIXERCONTROL 1156 1182 End Type 1157 1183 TypeDef PMIXERLINECONTROLSA = *MIXERLINECONTROLSA 1158 1184 TypeDef LPMIXERLINECONTROLSA = *MIXERLINECONTROLSA 1159 #ifdef UNICODE 1185 1186 #ifdef UNICODE 1187 TypeDef MIXERLINECONTROLS = MIXERLINECONTROLSW 1188 TypeDef PMIXERLINECONTROLS = PMIXERLINECONTROLSW 1189 TypeDef LPMIXERLINECONTROLS = LPMIXERLINECONTROLSW 1190 Declare Function mixerGetLineControls Lib "winmm" Alias "mixerGetLineControlsA" (hmxobj As HMIXEROBJ, pmxlc As *MIXERLINECONTROLSW, fdwControls As DWord) As MMRESULT 1191 #else 1160 1192 TypeDef 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 1193 TypeDef PMIXERLINECONTROLS = PMIXERLINECONTROLSA 1194 TypeDef LPMIXERLINECONTROLS = LPMIXERLINECONTROLSA 1195 Declare Function mixerGetLineControls Lib "winmm" Alias "mixerGetLineControlsA" (hmxobj As HMIXEROBJ, pmxlc As *MIXERLINECONTROLS, fdwControls As DWord) As MMRESULT 1196 #endif 1168 1197 1169 1198 Const MIXER_GETLINECONTROLSF_ALL = &H00000000 … … 1190 1219 TypeDef PMIXERCONTROLDETAILS_LISTTEXTW = *MIXERCONTROLDETAILS_LISTTEXTW 1191 1220 TypeDef LPMIXERCONTROLDETAILS_LISTTEXTW = *MIXERCONTROLDETAILS_LISTTEXTW 1221 1192 1222 Type MIXERCONTROLDETAILS_LISTTEXTA 1193 1223 dwParam1 As DWord … … 1197 1227 TypeDef PMIXERCONTROLDETAILS_LISTTEXTA = *MIXERCONTROLDETAILS_LISTTEXTA 1198 1228 TypeDef LPMIXERCONTROLDETAILS_LISTTEXTA = *MIXERCONTROLDETAILS_LISTTEXTA 1229 1199 1230 #ifdef UNICODE 1200 1231 TypeDef MIXERCONTROLDETAILS_LISTTEXT = MIXERCONTROLDETAILS_LISTTEXTW 1232 TypeDef PMIXERCONTROLDETAILS_LISTTEXT = PMIXERCONTROLDETAILS_LISTTEXTW 1233 TypeDef LPMIXERCONTROLDETAILS_LISTTEXT = LPMIXERCONTROLDETAILS_LISTTEXTW 1201 1234 #else 1202 1235 TypeDef MIXERCONTROLDETAILS_LISTTEXT = MIXERCONTROLDETAILS_LISTTEXTA 1203 #endif 1204 TypeDef PMIXERCONTROLDETAILS_LISTTEXT = *MIXERCONTROLDETAILS_LISTTEXT1205 TypeDef LPMIXERCONTROLDETAILS_LISTTEXT = *MIXERCONTROLDETAILS_LISTTEXT 1236 TypeDef PMIXERCONTROLDETAILS_LISTTEXT = PMIXERCONTROLDETAILS_LISTTEXTA 1237 TypeDef LPMIXERCONTROLDETAILS_LISTTEXT = LPMIXERCONTROLDETAILS_LISTTEXTA 1238 #endif 1206 1239 1207 1240 Type MIXERCONTROLDETAILS_BOOLEAN … … 1225 1258 Declare Function mixerGetControlDetailsA Lib "winmm" (hmxobj As HMIXEROBJ, pmxcd As *MIXERCONTROLDETAILS, fdwDetails As DWord) As MMRESULT 1226 1259 Declare 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 1261 Declare Function mixerGetControlDetails Lib "winmm" Alias "mixerGetControlDetailsW" (hmxobj As HMIXEROBJ, pmxcd As *MIXERCONTROLDETAILS, fdwDetails As DWord) As MMRESULT 1262 #else 1263 Declare Function mixerGetControlDetails Lib "winmm" Alias "mixerGetControlDetailsA" (hmxobj As HMIXEROBJ, pmxcd As *MIXERCONTROLDETAILS, fdwDetails As DWord) As MMRESULT 1264 #endif 1228 1265 1229 1266 Const MIXER_GETCONTROLDETAILSF_VALUE = &H00000000 … … 1398 1435 TypeDef NPJOYCAPSW = *JOYCAPSW 1399 1436 TypeDef LPJOYCAPSW = *JOYCAPSW 1437 1400 1438 Type JOYCAPSA 1401 1439 wMid As Word … … 1427 1465 TypeDef NPJOYCAPSA = *JOYCAPSA 1428 1466 TypeDef LPJOYCAPSA = *JOYCAPSA 1467 1429 1468 #ifdef UNICODE 1430 1469 TypeDef JOYCAPS = JOYCAPSW 1470 TypeDef PJOYCAPS = PJOYCAPSW 1471 TypeDef NPJOYCAPS = NPJOYCAPSW 1472 TypeDef LPJOYCAPS = LPJOYCAPSW 1431 1473 #else 1432 1474 TypeDef JOYCAPS = JOYCAPSA 1433 #endif1434 1475 TypeDef PJOYCAPS = PJOYCAPSA 1435 1476 TypeDef NPJOYCAPS = NPJOYCAPSA 1436 1477 TypeDef LPJOYCAPS = LPJOYCAPSA 1478 #endif 1437 1479 1438 1480 Type JOYINFO … … 1467 1509 ' joystick function prototypes 1468 1510 Declare 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 1512 Declare Function joyGetDevCaps Lib "winmm" Alias "joyGetDevCapsW" (uJoyID As DWord, pjc As *JOYCAPSW, cbjc As DWord) As MMRESULT 1513 #else 1514 Declare Function joyGetDevCaps Lib "winmm" Alias "joyGetDevCapsA" (uJoyID As DWord, pjc As *JOYCAPS, cbjc As DWord) As MMRESULT 1515 #endif 1470 1516 Declare Function joyGetPos Lib "winmm" (uJoyID As DWord, pji As *JOYINFO) As MMRESULT 1471 1517 Declare Function joyGetPosEx Lib "winmm" (uJoyID As DWord, pji As *JOYINFOEX) As MMRESULT … … 1597 1643 1598 1644 ' 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 1646 Declare Function mmioStringToFOURCC Lib "winmm" Alias "mmioStringToFOURCCW" (sz As LPWSTR, uFlags As DWord) As FOURCC 1647 Declare Function mmioInstallIOProc Lib "winmm" Alias "mmioInstallIOProcW" (fccIOProc As FOURCC, pIOProc As LPMMIOPROC, dwFlags As DWord) As LPMMIOPROC 1648 Declare Function mmioOpen Lib "winmm" Alias "mmioOpenW" (pszFileName As LPWSTR, pmmioinfo As *MMIOINFO, fdwOpen As DWord) As HMMIO 1649 Declare Function mmioRename Lib "winmm" Alias "mmioRenameW" (pszFileName As LPSTR, pszNewFileName As LPWSTR, pmmioinfo As *MMIOINFO, fdwRename As DWord) As MMRESULT 1650 #else 1651 Declare Function mmioStringToFOURCC Lib "winmm" Alias "mmioStringToFOURCCA" (sz As LPSTR, uFlags As DWord) As FOURCC 1652 Declare Function mmioInstallIOProc Lib "winmm" Alias "mmioInstallIOProcA" (fccIOProc As FOURCC, pIOProc As LPMMIOPROC, dwFlags As DWord) As LPMMIOPROC 1653 Declare Function mmioOpen Lib "winmm" Alias "mmioOpenA" (pszFileName As LPSTR, pmmioinfo As *MMIOINFO, fdwOpen As DWord) As HMMIO 1654 Declare Function mmioRename Lib "winmm" Alias "mmioRenameA" (pszFileName As LPSTR, pszNewFileName As LPSTR, pmmioinfo As *MMIOINFO, fdwRename As DWord) As MMRESULT 1655 #endif 1603 1656 Declare Function mmioClose Lib "winmm" (hmmio As HMMIO, fuClose As DWord) As MMRESULT 1604 1657 Declare Function mmioRead Lib "winmm" (hmmio As HMMIO, pch As HPSTR, cch As Long) As Long … … 1624 1677 1625 1678 ' 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 1680 Declare Function mciSendCommand Lib "winmm" Alias "mciSendCommandW" (mciId As MCIDEVICEID, uMsg As DWord, dwParam1 As DWord, ByRef dwParam2 As Any) As MCIERROR 1681 Declare Function mciSendString Lib "winmm" Alias "mciSendStringW" (lpstrCommand As LPWSTR, lpstrReturnString As LPWSTR, uReturnLength As DWord, hwndCallback As HWND) As MCIERROR 1682 Declare Function mciGetDeviceID Lib "winmm" Alias "mciGetDeviceIDW" (pszDevice As LPWSTR) As MCIDEVICEID 1683 Declare Function mciGetErrorString Lib "winmm" Alias "mciGetErrorStringA" (mcierr As MCIERROR, pszText As LPWSTR, cchText As DWord) As BOOL 1684 #else 1685 Declare Function mciSendCommand Lib "winmm" Alias "mciSendCommandA" (mciId As MCIDEVICEID, uMsg As DWord, dwParam1 As DWord, ByRef dwParam2 As Any) As MCIERROR 1686 Declare Function mciSendString Lib "winmm" Alias "mciSendStringA" (lpstrCommand As LPSTR, lpstrReturnString As LPSTR, uReturnLength As DWord, hwndCallback As HWND) As MCIERROR 1687 Declare Function mciGetDeviceID Lib "winmm" Alias "mciGetDeviceIDA" (pszDevice As LPSTR) As MCIDEVICEID 1688 Declare Function mciGetErrorString Lib "winmm" Alias "mciGetErrorStringA" (mcierr As MCIERROR, pszText As LPSTR, cchText As DWord) As BOOL 1689 #endif 1690 1631 1691 Declare Function mciSetYieldProc Lib "winmm" (mciId As MCIDEVICEID, fpYieldProc As YIELDPROC, dwYieldData As DWord) As BOOL 1632 1692 Declare Function mciGetCreatorTask Lib "winmm" (mciId As MCIDEVICEID) As HTASK … … 1942 2002 TypeDef LPMCI_GENERIC_PARMS = *MCI_GENERIC_PARMS 1943 2003 1944 Type MCI_OPEN_PARMS W2004 Type MCI_OPEN_PARMS 1945 2005 dwCallback As DWord 1946 2006 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 2010 End Type 1967 2011 TypeDef PMCI_OPEN_PARMS = *MCI_OPEN_PARMS 1968 2012 TypeDef LPMCI_OPEN_PARMS = *MCI_OPEN_PARMS … … 1999 2043 TypeDef PMCI_INFO_PARMSW = *MCI_INFO_PARMSW 2000 2044 TypeDef LPMCI_INFO_PARMSW = *MCI_INFO_PARMSW 2045 2001 2046 Type MCI_INFO_PARMSA 2002 2047 dwCallback As DWord … … 2006 2051 TypeDef PMCI_INFO_PARMSA = *MCI_INFO_PARMSA 2007 2052 TypeDef LPMCI_INFO_PARMSA = *MCI_INFO_PARMSA 2053 2008 2054 #ifdef UNICODE 2009 2055 TypeDef MCI_INFO_PARMS = MCI_INFO_PARMSW 2056 TypeDef PMCI_INFO_PARMS = PMCI_INFO_PARMSW 2057 TypeDef LPMCI_INFO_PARMS = LPMCI_INFO_PARMSW 2010 2058 #else 2011 2059 TypeDef MCI_INFO_PARMS = MCI_INFO_PARMSA 2012 #endif 2013 TypeDef PMCI_INFO_PARMS = *MCI_INFO_PARMS2014 TypeDef LPMCI_INFO_PARMS = *MCI_INFO_PARMS 2060 TypeDef PMCI_INFO_PARMS = PMCI_INFO_PARMSA 2061 TypeDef LPMCI_INFO_PARMS = LPMCI_INFO_PARMSA 2062 #endif 2015 2063 2016 2064 Type MCI_GETDEVCAPS_PARMS … … 2031 2079 TypeDef PMCI_SYSINFO_PARMSW = *MCI_SYSINFO_PARMSW 2032 2080 TypeDef LPMCI_SYSINFO_PARMSW = *MCI_SYSINFO_PARMSW 2081 2033 2082 Type MCI_SYSINFO_PARMSA 2034 2083 dwCallback As DWord … … 2040 2089 TypeDef PMCI_SYSINFO_PARMSA = *MCI_SYSINFO_PARMSA 2041 2090 TypeDef LPMCI_SYSINFO_PARMSA = *MCI_SYSINFO_PARMSA 2042 #ifdef UNICODE 2091 2092 #ifdef UNICODE 2093 TypeDef MCI_SYSINFO_PARMS = MCI_SYSINFO_PARMSW 2094 TypeDef PMCI_SYSINFO_PARMS = PMCI_SYSINFO_PARMSW 2095 TypeDef LPMCI_SYSINFO_PARMS = LPMCI_SYSINFO_PARMSW 2096 #else 2043 2097 TypeDef 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 2098 TypeDef PMCI_SYSINFO_PARMS = PMCI_SYSINFO_PARMSA 2099 TypeDef LPMCI_SYSINFO_PARMS = LPMCI_SYSINFO_PARMSA 2100 #endif 2049 2101 2050 2102 Type MCI_SET_PARMS … … 2066 2118 Type MCI_SAVE_PARMSW 2067 2119 dwCallback As DWord 2068 lpfilename As LP CWSTR2120 lpfilename As LPWSTR 2069 2121 End Type 2070 2122 TypeDef PMCI_SAVE_PARMSW = *MCI_SAVE_PARMSW 2071 2123 TypeDef LPMCI_SAVE_PARMSW = *MCI_SAVE_PARMSW 2124 2072 2125 Type MCI_SAVE_PARMSA 2073 2126 dwCallback As DWord 2074 lpfilename As LP CSTR2127 lpfilename As LPSTR 2075 2128 End Type 2076 2129 TypeDef PMCI_SAVE_PARMSA = *MCI_SAVE_PARMSA 2077 2130 TypeDef LPMCI_SAVE_PARMSA = *MCI_SAVE_PARMSA 2131 2078 2132 #ifdef UNICODE 2079 2133 TypeDef MCI_SAVE_PARMS = MCI_SAVE_PARMSW 2134 TypeDef PMCI_SAVE_PARMS = PMCI_SAVE_PARMSW 2135 TypeDef LPMCI_SAVE_PARMS = LPMCI_SAVE_PARMSW 2080 2136 #else 2081 2137 TypeDef MCI_SAVE_PARMS = MCI_SAVE_PARMSA 2082 #endif 2083 TypeDef PMCI_SAVE_PARMS = *MCI_SAVE_PARMS2084 TypeDef LPMCI_SAVE_PARMS = *MCI_SAVE_PARMS 2138 TypeDef PMCI_SAVE_PARMS = PMCI_SAVE_PARMSA 2139 TypeDef LPMCI_SAVE_PARMS = LPMCI_SAVE_PARMSA 2140 #endif 2085 2141 2086 2142 Type MCI_LOAD_PARMSW 2087 2143 dwCallback As DWord 2088 lpfilename As LP CWSTR2144 lpfilename As LPWSTR 2089 2145 End Type 2090 2146 TypeDef PMCI_LOAD_PARMSW = *MCI_LOAD_PARMSW 2091 2147 TypeDef LPMCI_LOAD_PARMSW = *MCI_LOAD_PARMSW 2148 2092 2149 Type MCI_LOAD_PARMSA 2093 2150 dwCallback As DWord 2094 lpfilename As LP CSTR2151 lpfilename As LPSTR 2095 2152 End Type 2096 2153 TypeDef PMCI_LOAD_PARMSA = *MCI_LOAD_PARMSA 2097 2154 TypeDef LPMCI_LOAD_PARMSA = *MCI_LOAD_PARMSA 2155 2098 2156 #ifdef UNICODE 2099 2157 TypeDef MCI_LOAD_PARMS = MCI_LOAD_PARMSW 2158 TypeDef PMCI_LOAD_PARMS = PMCI_LOAD_PARMSW 2159 TypeDef LPMCI_LOAD_PARMS = LPMCI_LOAD_PARMSW 2100 2160 #else 2101 2161 TypeDef MCI_LOAD_PARMS = MCI_LOAD_PARMSA 2102 #endif 2103 TypeDef PMCI_LOAD_PARMS = *MCI_LOAD_PARMS2104 TypeDef LPMCI_LOAD_PARMS = *MCI_LOAD_PARMS 2162 TypeDef PMCI_LOAD_PARMS = PMCI_LOAD_PARMSA 2163 TypeDef LPMCI_LOAD_PARMS = LPMCI_LOAD_PARMSA 2164 #endif 2105 2165 2106 2166 Type MCI_RECORD_PARMS … … 2159 2219 Type MCI_VD_ESCAPE_PARMSW 2160 2220 dwCallback As DWord 2161 lpstrCommand As LP CWSTR2221 lpstrCommand As LPWSTR 2162 2222 End Type 2163 2223 TypeDef PMCI_VD_ESCAPE_PARMSW = *MCI_VD_ESCAPE_PARMSW 2164 2224 TypeDef LPMCI_VD_ESCAPE_PARMSW = *MCI_VD_ESCAPE_PARMSW 2225 2165 2226 Type MCI_VD_ESCAPE_PARMSA 2166 2227 dwCallback As DWord 2167 lpstrCommand As LP CSTR2228 lpstrCommand As LPSTR 2168 2229 End Type 2169 2230 TypeDef PMCI_VD_ESCAPE_PARMSA = *MCI_VD_ESCAPE_PARMSA 2170 2231 TypeDef LPMCI_VD_ESCAPE_PARMSA = *MCI_VD_ESCAPE_PARMSA 2232 2171 2233 #ifdef UNICODE 2172 2234 TypeDef MCI_VD_ESCAPE_PARMS = MCI_VD_ESCAPE_PARMSW 2235 TypeDef PMCI_VD_ESCAPE_PARMS = PMCI_VD_ESCAPE_PARMSW 2236 TypeDef LPMCI_VD_ESCAPE_PARMS = LPMCI_VD_ESCAPE_PARMSW 2173 2237 #else 2174 2238 TypeDef MCI_VD_ESCAPE_PARMS = MCI_VD_ESCAPE_PARMSA 2175 #endif 2176 TypeDef PMCI_VD_ESCAPE_PARMS = *MCI_VD_ESCAPE_PARMS2177 TypeDef LPMCI_VD_ESCAPE_PARMS = *MCI_VD_ESCAPE_PARMS 2239 TypeDef PMCI_VD_ESCAPE_PARMS = PMCI_VD_ESCAPE_PARMSA 2240 TypeDef LPMCI_VD_ESCAPE_PARMS = LPMCI_VD_ESCAPE_PARMSA 2241 #endif 2178 2242 2179 2243 ' MCI extensions for CD audio devices … … 2209 2273 dwCallback As DWord 2210 2274 wDeviceID As MCIDEVICEID 2211 lpstrDeviceType As LP CWSTR2212 lpstrElementName As LP CWSTR2213 lpstrAlias As LP CWSTR2275 lpstrDeviceType As LPWSTR 2276 lpstrElementName As LPWSTR 2277 lpstrAlias As LPWSTR 2214 2278 dwBufferSeconds As DWord 2215 2279 End Type 2216 2280 TypeDef PMCI_WAVE_OPEN_PARMSW = *MCI_WAVE_OPEN_PARMSW 2217 2281 TypeDef LPMCI_WAVE_OPEN_PARMSW = *MCI_WAVE_OPEN_PARMSW 2282 2218 2283 Type MCI_WAVE_OPEN_PARMSA 2219 2284 dwCallback As DWord 2220 2285 wDeviceID As MCIDEVICEID 2221 lpstrDeviceType As LP CSTR2222 lpstrElementName As LP CSTR2223 lpstrAlias As LP CSTR2286 lpstrDeviceType As LPSTR 2287 lpstrElementName As LPSTR 2288 lpstrAlias As LPSTR 2224 2289 dwBufferSeconds As DWord 2225 2290 End Type 2226 2291 TypeDef PMCI_WAVE_OPEN_PARMSA = *MCI_WAVE_OPEN_PARMSA 2227 2292 TypeDef LPMCI_WAVE_OPEN_PARMSA = *MCI_WAVE_OPEN_PARMSA 2293 2228 2294 #ifdef UNICODE 2229 2295 TypeDef MCI_WAVE_OPEN_PARMS = MCI_WAVE_OPEN_PARMSW 2296 TypeDef PMCI_WAVE_OPEN_PARMS = PMCI_WAVE_OPEN_PARMSW 2297 TypeDef LPMCI_WAVE_OPEN_PARMS = LPMCI_WAVE_OPEN_PARMSW 2230 2298 #else 2231 2299 TypeDef MCI_WAVE_OPEN_PARMS = MCI_WAVE_OPEN_PARMSA 2232 #endif 2233 TypeDef PMCI_WAVE_OPEN_PARMS = *MCI_WAVE_OPEN_PARMS2234 TypeDef LPMCI_WAVE_OPEN_PARMS = *MCI_WAVE_OPEN_PARMS 2300 TypeDef PMCI_WAVE_OPEN_PARMS = PMCI_WAVE_OPEN_PARMSA 2301 TypeDef LPMCI_WAVE_OPEN_PARMS = LPMCI_WAVE_OPEN_PARMSA 2302 #endif 2235 2303 2236 2304 Type MCI_WAVE_DELETE_PARMS … … 2343 2411 dwCallback As DWord 2344 2412 wDeviceID As MCIDEVICEID 2345 lpstrDeviceType As LP CWSTR2346 lpstrElementName As LP CWSTR2347 lpstrAlias As LP CWSTR2413 lpstrDeviceType As LPWSTR 2414 lpstrElementName As LPWSTR 2415 lpstrAlias As LPWSTR 2348 2416 dwStyle As DWord 2349 2417 hWndParent As HWND … … 2351 2419 TypeDef PMCI_ANIM_OPEN_PARMSW = *MCI_ANIM_OPEN_PARMSW 2352 2420 TypeDef LPMCI_ANIM_OPEN_PARMSW = *MCI_ANIM_OPEN_PARMSW 2421 2353 2422 Type MCI_ANIM_OPEN_PARMSA 2354 2423 dwCallback As DWord 2355 2424 wDeviceID As MCIDEVICEID 2356 lpstrDeviceType As LP CSTR2357 lpstrElementName As LP CSTR2358 lpstrAlias As LP CSTR2425 lpstrDeviceType As LPSTR 2426 lpstrElementName As LPSTR 2427 lpstrAlias As LPSTR 2359 2428 dwStyle As DWord 2360 2429 hWndParent As HWND … … 2362 2431 TypeDef PMCI_ANIM_OPEN_PARMSA = *MCI_ANIM_OPEN_PARMSA 2363 2432 TypeDef LPMCI_ANIM_OPEN_PARMSA = *MCI_ANIM_OPEN_PARMSA 2433 2364 2434 #ifdef UNICODE 2365 2435 TypeDef MCI_ANIM_OPEN_PARMS = MCI_ANIM_OPEN_PARMSW 2436 TypeDef PMCI_ANIM_OPEN_PARMS = PMCI_ANIM_OPEN_PARMSW 2437 TypeDef LPMCI_ANIM_OPEN_PARMS = LPMCI_ANIM_OPEN_PARMSW 2366 2438 #else 2367 2439 TypeDef MCI_ANIM_OPEN_PARMS = MCI_ANIM_OPEN_PARMSA 2368 #endif 2369 TypeDef PMCI_ANIM_OPEN_PARMS = *MCI_ANIM_OPEN_PARMS2370 TypeDef LPMCI_ANIM_OPEN_PARMS = *MCI_ANIM_OPEN_PARMS 2440 TypeDef PMCI_ANIM_OPEN_PARMS = PMCI_ANIM_OPEN_PARMSA 2441 TypeDef LPMCI_ANIM_OPEN_PARMS = LPMCI_ANIM_OPEN_PARMSA 2442 #endif 2371 2443 2372 2444 Type MCI_ANIM_PLAY_PARMS … … 2386 2458 TypeDef LPMCI_ANIM_STEP_PARMS = *MCI_ANIM_STEP_PARMS 2387 2459 2388 Type MCI_ANIM_WINDOW_PARMS W2460 Type MCI_ANIM_WINDOW_PARMSA 2389 2461 dwCallback As DWord 2390 2462 hWnd As HWND 2391 2463 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 2401 2465 End Type 2402 2466 TypeDef PMCI_ANIM_WINDOW_PARMSA = *MCI_ANIM_WINDOW_PARMSA 2403 2467 TypeDef LPMCI_ANIM_WINDOW_PARMSA = *MCI_ANIM_WINDOW_PARMSA 2404 #ifdef UNICODE2405 TypeDef MCI_ANIM_WINDOW_PARMS = MCI_ANIM_WINDOW_PARMSW2406 #else2407 2468 TypeDef 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 2469 TypeDef PMCI_ANIM_WINDOW_PARMS = PMCI_ANIM_WINDOW_PARMSA 2470 TypeDef LPMCI_ANIM_WINDOW_PARMS = LPMCI_ANIM_WINDOW_PARMSA 2411 2471 2412 2472 Type MCI_ANIM_RECT_PARMS … … 2450 2510 Const MCI_OVLY_WHERE_VIDEO = &H00100000 2451 2511 2452 Type MCI_OVLY_OPEN_PARMS AW2512 Type MCI_OVLY_OPEN_PARMSW 2453 2513 dwCallback As DWord 2454 2514 wDeviceID As MCIDEVICEID 2455 lpstrDeviceType As LP CWSTR2456 lpstrElementName As LP CWSTR2457 lpstrAlias As LP CWSTR2515 lpstrDeviceType As LPWSTR 2516 lpstrElementName As LPWSTR 2517 lpstrAlias As LPWSTR 2458 2518 dwStyle As DWord 2459 2519 hWndParent As HWND … … 2461 2521 TypeDef PMCI_OVLY_OPEN_PARMSW = *MCI_OVLY_OPEN_PARMSW 2462 2522 TypeDef LPMCI_OVLY_OPEN_PARMSW = *MCI_OVLY_OPEN_PARMSW 2523 2463 2524 Type MCI_OVLY_OPEN_PARMSA 2464 2525 dwCallback As DWord 2465 2526 wDeviceID As MCIDEVICEID 2466 lpstrDeviceType As LP CSTR2467 lpstrElementName As LP CSTR2468 lpstrAlias As LP CSTR2527 lpstrDeviceType As LPSTR 2528 lpstrElementName As LPSTR 2529 lpstrAlias As LPSTR 2469 2530 dwStyle As DWord 2470 2531 hWndParent As HWND … … 2472 2533 TypeDef PMCI_OVLY_OPEN_PARMSA = *MCI_OVLY_OPEN_PARMSA 2473 2534 TypeDef LPMCI_OVLY_OPEN_PARMSA = *MCI_OVLY_OPEN_PARMSA 2535 2474 2536 #ifdef UNICODE 2475 2537 TypeDef MCI_OVLY_OPEN_PARMS = MCI_OVLY_OPEN_PARMSW 2538 TypeDef PMCI_OVLY_OPEN_PARMS = PMCI_OVLY_OPEN_PARMSW 2539 TypeDef LPMCI_OVLY_OPEN_PARMS = LPMCI_OVLY_OPEN_PARMSW 2476 2540 #else 2477 2541 TypeDef MCI_OVLY_OPEN_PARMS = MCI_OVLY_OPEN_PARMSA 2478 #endif 2479 TypeDef PMCI_OVLY_OPEN_PARMS = *MCI_OVLY_OPEN_PARMS2480 TypeDef LPMCI_OVLY_OPEN_PARMS = *MCI_OVLY_OPEN_PARMS 2542 TypeDef PMCI_OVLY_OPEN_PARMS = PMCI_OVLY_OPEN_PARMSA 2543 TypeDef LPMCI_OVLY_OPEN_PARMS = LPMCI_OVLY_OPEN_PARMSA 2544 #endif 2481 2545 2482 2546 Type MCI_OVLY_WINDOW_PARMSW … … 2484 2548 hWnd As HWND 2485 2549 nCmdShow As DWord 2486 lpstrText As LP CWSTR2550 lpstrText As LPWSTR 2487 2551 End Type 2488 2552 TypeDef PMCI_OVLY_WINDOW_PARMSW = *MCI_OVLY_WINDOW_PARMSW 2489 2553 TypeDef 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 2498 2555 #ifdef UNICODE 2499 2556 TypeDef MCI_OVLY_WINDOW_PARMS = MCI_OVLY_WINDOW_PARMSW 2557 TypeDef PMCI_OVLY_WINDOW_PARMS = PMCI_OVLY_WINDOW_PARMSW 2558 TypeDef LPMCI_OVLY_WINDOW_PARMS = LPMCI_OVLY_WINDOW_PARMSW 2500 2559 #else 2501 2560 TypeDef MCI_OVLY_WINDOW_PARMS = MCI_OVLY_WINDOW_PARMSA 2502 #endif 2503 TypeDef PMCI_OVLY_WINDOW_PARMS = *MCI_OVLY_WINDOW_PARMS2504 TypeDef LPMCI_OVLY_WINDOW_PARMS = *MCI_OVLY_WINDOW_PARMS 2561 TypeDef PMCI_OVLY_WINDOW_PARMS = PMCI_OVLY_WINDOW_PARMSA 2562 TypeDef LPMCI_OVLY_WINDOW_PARMS = LPMCI_OVLY_WINDOW_PARMSA 2563 #endif 2505 2564 2506 2565 Type MCI_OVLY_RECT_PARMS … … 2513 2572 Type MCI_OVLY_SAVE_PARMSW 2514 2573 dwCallback As DWord 2515 lpfilename As LP CWSTR2574 lpfilename As LPWSTR 2516 2575 rc As RECT 2517 2576 End Type 2518 2577 TypeDef PMCI_OVLY_SAVE_PARMSW = *MCI_OVLY_SAVE_PARMSW 2519 2578 TypeDef LPMCI_OVLY_SAVE_PARMSW = *MCI_OVLY_SAVE_PARMSW 2579 2520 2580 Type MCI_OVLY_SAVE_PARMSA 2521 2581 dwCallback As DWord 2522 lpfilename As LP CSTR2582 lpfilename As LPSTR 2523 2583 rc As RECT 2524 2584 End Type 2525 2585 TypeDef PMCI_OVLY_SAVE_PARMSA = *MCI_OVLY_SAVE_PARMSA 2526 2586 TypeDef LPMCI_OVLY_SAVE_PARMSA = *MCI_OVLY_SAVE_PARMSA 2587 2527 2588 #ifdef UNICODE 2528 2589 TypeDef MCI_OVLY_SAVE_PARMS = MCI_OVLY_SAVE_PARMSW 2590 TypeDef PMCI_OVLY_SAVE_PARMS = PMCI_OVLY_SAVE_PARMSW 2591 TypeDef LPMCI_OVLY_SAVE_PARMS = LPMCI_OVLY_SAVE_PARMSW 2529 2592 #else 2530 2593 TypeDef 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 2594 TypeDef PMCI_OVLY_SAVE_PARMS = PMCI_OVLY_SAVE_PARMSA 2595 TypeDef LPMCI_OVLY_SAVE_PARMS = LPMCI_OVLY_SAVE_PARMSA 2596 #endif 2597 2598 Type MCI_OVLY_LOAD_PARMSW 2599 dwCallback As DWord 2600 lpfilename As LPWSTR 2601 rc As RECT 2602 End Type 2603 TypeDef PMCI_OVLY_LOAD_PARMSW = *MCI_OVLY_LOAD_PARMSW 2604 TypeDef LPMCI_OVLY_LOAD_PARMSW = *MCI_OVLY_LOAD_PARMSW 2534 2605 2535 2606 Type MCI_OVLY_LOAD_PARMSA … … 2540 2611 TypeDef PMCI_OVLY_LOAD_PARMSA = *MCI_OVLY_LOAD_PARMSA 2541 2612 TypeDef LPMCI_OVLY_LOAD_PARMSA = *MCI_OVLY_LOAD_PARMSA 2613 2614 #ifdef UNICODE 2615 TypeDef MCI_OVLY_LOAD_PARMS = MCI_OVLY_LOAD_PARMSW 2616 TypeDef PMCI_OVLY_LOAD_PARMS = PMCI_OVLY_LOAD_PARMSW 2617 TypeDef LPMCI_OVLY_LOAD_PARMS = LPMCI_OVLY_LOAD_PARMSW 2618 #else 2542 2619 TypeDef MCI_OVLY_LOAD_PARMS = MCI_OVLY_LOAD_PARMSA 2543 2620 TypeDef PMCI_OVLY_LOAD_PARMS = PMCI_OVLY_LOAD_PARMSA 2544 2621 TypeDef LPMCI_OVLY_LOAD_PARMS = LPMCI_OVLY_LOAD_PARMSA 2622 #endif 2545 2623 2546 2624 ' DISPLAY Driver extensions … … 2550 2628 ' DIB Driver extensions 2551 2629 Const SELECTDIB = 41 2552 Const DIBINDEX(n) = MAKELONG(n, 2630 Const DIBINDEX(n) = MAKELONG(n,&H10FF) 2553 2631 2554 2632 #endif '_INC_MMSYS
Note:
See TracChangeset
for help on using the changeset viewer.
