Changeset 141 for Include/api_mmsys.sbp
- Timestamp:
- Mar 8, 2007, 10:42:50 AM (17 years ago)
- File:
-
- 1 edited
-
Include/api_mmsys.sbp (modified) (47 diffs)
Legend:
- Unmodified
- Added
- Removed
-
Include/api_mmsys.sbp
r95 r141 6 6 #define _INC_MMSYS 7 7 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 8 59 9 60 ' general constants … … 261 312 ' Sound support 262 313 263 Declare Function sndPlaySound Lib "winmm" Alias "sndPlaySoundA" (pszSound As PCSTR, fuSound As DWord) As BOOL314 Declare Function sndPlaySound Lib "winmm" Alias _FuncName_sndPlaySound (pszSound As PCTSTR, fuSound As DWord) As BOOL 264 315 265 316 Const SND_SYNC = &H0000 … … 289 340 Const SND_ALIAS_SYSTEMDEFAULT = sndAlias(&H53, &H44) 290 341 291 Declare Function PlaySound Lib "winmm" Alias "PlaySoundA" (pszSound As PCSTR, hmod As HMODULE, fdwSound As DWord) As BOOL342 Declare Function PlaySound Lib "winmm" Alias _FuncName_PlaySound (pszSound As PCTSTR, hmod As HMODULE, fdwSound As DWord) As BOOL 292 343 293 344 … … 353 404 354 405 ' waveform output device capabilities structure 406 Type WAVEOUTCAPSW 407 wMid As Word 408 wPid As Word 409 vDriverVersion As MMVERSION 410 szPname[ELM(MAXPNAMELEN)] As WCHAR 411 dwFormats As DWord 412 wChannels As Word 413 wReserved1 As Word 414 dwSupport As DWord 415 End Type 416 TypeDef PWAVEOUTCAPSW = *WAVEOUTCAPSW 417 TypeDef LPWAVEOUTCAPSW = *WAVEOUTCAPSW 355 418 Type WAVEOUTCAPSA 356 419 wMid As Word 357 420 wPid As Word 358 421 vDriverVersion As MMVERSION 359 szPname[ELM(MAXPNAMELEN)] As Char422 szPname[ELM(MAXPNAMELEN)] As SByte 360 423 dwFormats As DWord 361 424 wChannels As Word … … 365 428 TypeDef PWAVEOUTCAPSA = *WAVEOUTCAPSA 366 429 TypeDef LPWAVEOUTCAPSA = *WAVEOUTCAPSA 367 430 #ifdef UNICODE 431 TypeDef WAVEOUTCAPS = WAVEOUTCAPSW 432 #else 368 433 TypeDef WAVEOUTCAPS = WAVEOUTCAPSA 369 TypeDef PWAVEOUTCAPS = PWAVEOUTCAPSA 370 TypeDef LPWAVEOUTCAPS = LPWAVEOUTCAPSA 434 #endif 435 TypeDef PWAVEOUTCAPS = *WAVEOUTCAPS 436 TypeDef LPWAVEOUTCAPS = *WAVEOUTCAPS 371 437 372 438 ' flags for dwSupport field of WAVEOUTCAPS … … 380 446 381 447 ' waveform input device capabilities structure 448 Type WAVEINCAPSW 449 wMid As Word 450 wPid As Word 451 vDriverVersion As MMVERSION 452 szPname[ELM(MAXPNAMELEN)] As WCHAR 453 dwFormats As DWord 454 wChannels As Word 455 wReserved1 As Word 456 End Type 457 TypeDef PWAVEINCAPSW = *WAVEINCAPSW 458 TypeDef LPWAVEINCAPSW = *WAVEINCAPSW 382 459 Type WAVEINCAPSA 383 460 wMid As Word 384 461 wPid As Word 385 462 vDriverVersion As MMVERSION 386 szPname[ELM(MAXPNAMELEN)] As Char463 szPname[ELM(MAXPNAMELEN)] As SByte 387 464 dwFormats As DWord 388 465 wChannels As Word … … 391 468 TypeDef PWAVEINCAPSA = *WAVEINCAPSA 392 469 TypeDef LPWAVEINCAPSA = *WAVEINCAPSA 393 470 #ifdef UNICODE 471 TypeDef WAVEINCAPS = WAVEINCAPSW 472 #else 394 473 TypeDef WAVEINCAPS = WAVEINCAPSA 395 TypeDef PWAVEINCAPS = PWAVEINCAPSA 396 TypeDef LPWAVEINCAPS = LPWAVEINCAPSA 474 #endif 475 TypeDef PWAVEINCAPS = *WAVEINCAPS 476 TypeDef LPWAVEINCAPS = *WAVEINCAPS 397 477 398 478 ' defines for dwFormat field of WAVEINCAPS and WAVEOUTCAPS 399 479 Const WAVE_INVALIDFORMAT = &H00000000 ' invalid format 400 Const WAVE_FORMAT_1M08 = &H00000001 ' 11.025 kHz, Mono, 8-bit 401 Const WAVE_FORMAT_1S08 = &H00000002 ' 11.025 kHz, Stereo, 8-bit 480 Const WAVE_FORMAT_1M08 = &H00000001 ' 11.025 kHz, Mono, 8-bit 481 Const WAVE_FORMAT_1S08 = &H00000002 ' 11.025 kHz, Stereo, 8-bit 402 482 Const WAVE_FORMAT_1M16 = &H00000004 ' 11.025 kHz, Mono, 16-bit 403 483 Const WAVE_FORMAT_1S16 = &H00000008 ' 11.025 kHz, Stereo, 16-bit 404 Const WAVE_FORMAT_2M08 = &H00000010 ' 22.05 kHz, Mono, 8-bit 405 Const WAVE_FORMAT_2S08 = &H00000020 ' 22.05 kHz, Stereo, 8-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 406 486 Const WAVE_FORMAT_2M16 = &H00000040 ' 22.05 kHz, Mono, 16-bit 407 487 Const WAVE_FORMAT_2S16 = &H00000080 ' 22.05 kHz, Stereo, 16-bit 408 Const WAVE_FORMAT_4M08 = &H00000100 ' 44.1 kHz, Mono, 8-bit 409 Const WAVE_FORMAT_4S08 = &H00000200 ' 44.1 kHz, Stereo, 8-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 410 490 Const WAVE_FORMAT_4M16 = &H00000400 ' 44.1 kHz, Mono, 16-bit 411 491 Const WAVE_FORMAT_4S16 = &H00000800 ' 44.1 kHz, Stereo, 16-bit … … 448 528 ' waveform audio function prototypes 449 529 Declare Function waveOutGetNumDevs Lib "winmm" () As DWord 450 Declare Function waveOutGetDevCaps Lib "winmm" Alias "waveOutGetDevCapsA" (uDeviceID As DWord, ByRef pwoc As WAVEOUTCAPS, cbwoc As DWord) As MMRESULT530 Declare Function waveOutGetDevCaps Lib "winmm" Alias _FuncName_waveOutGetDevCaps (uDeviceID As DWord, ByRef woc As WAVEOUTCAPS, cbwoc As DWord) As MMRESULT 451 531 Declare Function waveOutGetVolume Lib "winmm" (hwo As HWAVEOUT, ByRef pdwVolume As DWord) As MMRESULT 452 532 Declare Function waveOutSetVolume Lib "winmm" (hwo As HWAVEOUT, dwVolume As DWord) As MMRESULT 453 Declare Function waveOutGetErrorText Lib "winmm" Alias "waveOutGetErrorTextA" (mmrError As MMRESULT, pszText As LPSTR, cchText As DWord) As MMRESULT533 Declare Function waveOutGetErrorText Lib "winmm" Alias _FuncName_waveOutGetErrorText (mmrError As MMRESULT, pszText As LPTSTR, cchText As DWord) As MMRESULT 454 534 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 455 535 Declare Function waveOutClose Lib "winmm" (hwo As HWAVEOUT) As MMRESULT … … 470 550 471 551 Declare Function waveInGetNumDevs Lib "winmm" () As DWord 472 Declare Function waveInGetDevCaps Lib "winmm" Alias "waveInGetDevCapsA"(uDeviceID As DWord, ByRef pwic As WAVEINCAPS, cbwic As DWord) As MMRESULT473 Declare Function waveInGetErrorText Lib "winmm" Alias "waveInGetErrorTextA" (mmrError As MMRESULT, pszText As LPSTR, cchText As DWord) As MMRESULT552 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 474 554 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 475 555 Declare Function waveInClose Lib "winmm" (hwi As HWAVEIN) As MMRESULT … … 544 624 545 625 ' MIDI output device capabilities structure 546 Type MIDIOUTCAPS A626 Type MIDIOUTCAPSW 547 627 wMid As Word 548 628 wPid As Word 549 629 vDriverVersion As MMVERSION 550 szPname[ELM(MAXPNAMELEN)] As Char630 szPname[ELM(MAXPNAMELEN)] As WCHAR 551 631 wTechnology As Word 552 632 wVoices As Word … … 555 635 dwSupport As DWord 556 636 End Type 637 TypeDef PMIDIOUTCAPSW = *MIDIOUTCAPSW 638 TypeDef LPMIDIOUTCAPSW = *MIDIOUTCAPSW 639 Type MIDIOUTCAPSA 640 wMid As Word 641 wPid As Word 642 vDriverVersion As MMVERSION 643 szPname[ELM(MAXPNAMELEN)] As SByte 644 wTechnology As Word 645 wVoices As Word 646 wNotes As Word 647 wChannelMask As Word 648 dwSupport As DWord 649 End Type 557 650 TypeDef PMIDIOUTCAPSA = *MIDIOUTCAPSA 558 651 TypeDef LPMIDIOUTCAPSA = *MIDIOUTCAPSA 559 652 653 #ifdef UNICODE 654 TypeDef MIDIOUTCAPS = MIDIOUTCAPSW 655 #else 560 656 TypeDef MIDIOUTCAPS = MIDIOUTCAPSA 561 TypeDef PMIDIOUTCAPS = PMIDIOUTCAPSA 562 TypeDef LPMIDIOUTCAPS = LPMIDIOUTCAPSA 657 #endif 658 TypeDef PMIDIOUTCAPS = *MIDIOUTCAPS 659 TypeDef LPMIDIOUTCAPS = *MIDIOUTCAPS 563 660 564 661 ' flags for wTechnology field of MIDIOUTCAPS structure … … 576 673 577 674 ' MIDI input device capabilities structure 675 Type MIDIINCAPSW 676 wMid As Word 677 wPid As Word 678 vDriverVersion As MMVERSION 679 szPname[ELM(MAXPNAMELEN)] As WCHAR 680 dwSupport As DWord 681 End Type 682 TypeDef PMIDIINCAPSW = *MIDIINCAPSW 683 TypeDef LPMIDIINCAPSW = *MIDIINCAPSW 578 684 Type MIDIINCAPSA 579 685 wMid As Word 580 686 wPid As Word 581 687 vDriverVersion As MMVERSION 582 szPname[ELM(MAXPNAMELEN)] As Char688 szPname[ELM(MAXPNAMELEN)] As SByte 583 689 dwSupport As DWord 584 690 End Type 585 691 TypeDef PMIDIINCAPSA = *MIDIINCAPSA 586 692 TypeDef LPMIDIINCAPSA = *MIDIINCAPSA 587 693 #ifdef UNICODE 694 TypeDef MIDIINCAPS = MIDIINCAPSW 695 #else 588 696 TypeDef MIDIINCAPS = MIDIINCAPSA 589 TypeDef PMIDIINCAPS = PMIDIINCAPSA 590 TypeDef LPMIDIINCAPS = LPMIDIINCAPSA 697 #endif 698 TypeDef PMIDIINCAPS = *MIDIINCAPS 699 TypeDef LPMIDIINCAPS = *MIDIINCAPS 591 700 592 701 ' MIDI data block header … … 670 779 Declare Function midiConnect Lib "winmm" (hmi As HMIDI, hmo As HMIDIOUT, pReserved As VoidPtr) As MMRESULT 671 780 Declare Function midiDisconnect Lib "winmm" (hmi As HMIDI, hmo As HMIDIOUT, pReserved As VoidPtr) As MMRESULT 672 Declare Function midiOutGetDevCaps Lib "winmm" Alias "midiOutGetDevCapsA" (uDeviceID As DWord, ByRef pmocAs MIDIOUTCAPS, cbmoc As DWord) As MMRESULT781 Declare Function midiOutGetDevCaps Lib "winmm" Alias _FuncName_midiOutGetDevCaps (uDeviceID As DWord, ByRef moc As MIDIOUTCAPS, cbmoc As DWord) As MMRESULT 673 782 Declare Function midiOutGetVolume Lib "winmm" (hmo As HMIDIOUT, ByRef pdwVolume As DWord) As MMRESULT 674 783 Declare Function midiOutSetVolume Lib "winmm" (hmo As HMIDIOUT, dwVolume As DWord) As MMRESULT 675 Declare Function midiOutGetErrorText Lib "winmm" Alias "midiOutGetErrorTextA" (mmrError As MMRESULT, pszText As LPSTR, cchText As DWord) As MMRESULT784 Declare Function midiOutGetErrorText Lib "winmm" Alias _FuncName_midiOutGetErrorText (mmrError As MMRESULT, pszText As LPTSTR, cchText As DWord) As MMRESULT 676 785 Declare Function midiOutOpen Lib "winmm" (ByRef phmo As HMIDIOUT, uDeviceID As DWord, dwCallback As DWord, dwInstance As DWord, fdwOpen As DWord) As MMRESULT 677 786 Declare Function midiOutClose Lib "winmm" (hmo As HMIDIOUT) As MMRESULT … … 687 796 688 797 Declare Function midiInGetNumDevs Lib "winmm" () As DWord 689 Declare Function midiInGetDevCaps Lib "winmm" Alias "midiInGetDevCapsA"(uDeviceID As DWord, ByRef pmic As MIDIINCAPS, cbmic As DWord) As MMRESULT690 Declare Function midiInGetErrorText Lib "winmm" Alias "midiInGetErrorTextA" (mmrError As MMRESULT, pszText As LPSTR, cchText As DWord) As MMRESULT798 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 691 800 Declare Function midiInOpen Lib "winmm" (ByRef phmi As HMIDIIN, uDeviceID As DWord, dwCallback As DWord, dwInstance As DWord, fdwOpen As DWord) As MMRESULT 692 801 Declare Function midiInClose Lib "winmm" (hmi As HMIDIIN) As MMRESULT … … 708 817 709 818 ' Auxiliary audio device capabilities structure 819 Type AUXCAPSW 820 wMid As Word 821 wPid As Word 822 vDriverVersion As MMVERSION 823 szPname[ELM(MAXPNAMELEN)] As WCHAR 824 wTechnology As Word 825 wReserved1 As Word 826 dwSupport As DWord 827 End Type 828 TypeDef PAUXCAPSW = *AUXCAPSW 829 TypeDef NPAUXCAPSW = *AUXCAPSW 830 TypeDef LPAUXCAPSW = *AUXCAPSW 710 831 Type AUXCAPSA 711 832 wMid As Word 712 833 wPid As Word 713 834 vDriverVersion As MMVERSION 714 szPname[ELM(MAXPNAMELEN)] As Char835 szPname[ELM(MAXPNAMELEN)] As SByte 715 836 wTechnology As Word 716 837 wReserved1 As Word … … 720 841 TypeDef NPAUXCAPSA = *AUXCAPSA 721 842 TypeDef LPAUXCAPSA = *AUXCAPSA 722 843 #ifdef UNICODE 723 844 TypeDef AUXCAPS = AUXCAPSA 724 TypeDef PAUXCAPS = PAUXCAPSA 725 TypeDef NPAUXCAPS = NPAUXCAPSA 726 TypeDef LPAUXCAPS = LPAUXCAPSA 845 #else 846 TypeDef AUXCAPS = AUXCAPSA 847 #endif 848 TypeDef PAUXCAPS = *AUXCAPS 849 TypeDef NPAUXCAPS = *AUXCAPS 850 TypeDef LPAUXCAPS = *AUXCAPS 727 851 728 852 Const AUXCAPS_CDAUDIO = 1 … … 734 858 ' auxiliary audio function prototypes 735 859 Declare Function auxGetNumDevs Lib "winmm" () As DWord 736 Declare Function auxGetDevCaps Lib "winmm" Alias "auxGetDevCapsA"(uDeviceID As DWord, pac As *AUXCAPS, cbac As DWord) As MMRESULT860 Declare Function auxGetDevCaps Lib "winmm" Alias _FuncName_auxGetDevCaps (uDeviceID As DWord, pac As *AUXCAPS, cbac As DWord) As MMRESULT 737 861 Declare Function auxSetVolume Lib "winmm" (uDeviceID As DWord, dwVolume As DWord) As MMRESULT 738 862 Declare Function auxGetVolume Lib "winmm" (uDeviceID As DWord, pdwVolume As *DWord) As MMRESULT … … 771 895 Declare Function mixerGetNumDevs Lib "winmm" () As DWord 772 896 897 Type MIXERCAPSW 898 wMid As Word 899 wPid As Word 900 vDriverVersion As MMVERSION 901 szPname[ELM(MAXPNAMELEN)] As WCHAR 902 fdwSupport As DWord 903 cDestinations As DWord 904 End Type 905 TypeDef PMIXERCAPSW = *MIXERCAPSW 906 TypeDef LPMIXERCAPSW = *MIXERCAPSW 773 907 Type MIXERCAPSA 774 908 wMid As Word … … 781 915 TypeDef PMIXERCAPSA = *MIXERCAPSA 782 916 TypeDef LPMIXERCAPSA = *MIXERCAPSA 783 917 #ifdef UNICODE 918 TypeDef MIXERCAPS = MIXERCAPSW 919 #else 784 920 TypeDef MIXERCAPS = MIXERCAPSA 785 TypeDef PMIXERCAPS = PMIXERCAPSA 786 TypeDef LPMIXERCAPS = LPMIXERCAPSA 787 788 Declare Function mixerGetDevCaps Lib "winmm" Alias "mixerGetDevCapsA" (uMxId As DWord, pmxcaps As *MIXERCAPS, cbmxcaps As DWord) As MMRESULT 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 789 926 Declare Function mixerOpen Lib "winmm" (phmx As *HMIXER, uMxId As DWord, dwCallback As DWord, dwInstance As DWord, fdwOpen As DWord) As MMRESULT 790 927 Declare Function mixerClose Lib "winmm" (hmx As HMIXER) As MMRESULT 791 928 Declare Function mixerMessage Lib "winmm" (hmx As HMIXER, uMsg As DWord, dwParam1 As DWord, dwParam2 As DWord) As DWord 792 929 793 Type TARGET930 Type _MMSYSTEM_TARGETW 794 931 dwType As DWord 795 932 dwDeviceID As DWord … … 797 934 wPid As Word 798 935 vDriverVersion As MMVERSION 799 szPname[ELM(MAXPNAMELEN)] As Char 936 szPname[ELM(MAXPNAMELEN)] As WCHAR 937 End Type 938 939 Type MIXERLINEW 940 cbStruct As DWord 941 dwDestination As DWord 942 dwSource As DWord 943 dwLineID As DWord 944 fdwLine As DWord 945 dwUser As DWord 946 dwComponentType As DWord 947 cChannels As DWord 948 cConnections As DWord 949 cControls As DWord 950 szShortName[ELM(MIXER_SHORT_NAME_CHARS)] As WCHAR 951 szName[ELM(MIXER_LONG_NAME_CHARS)] As WCHAR 952 Target As _MMSYSTEM_TARGETW 953 End Type 954 TypeDef PMIXERLINEW = *MIXERLINEW 955 TypeDef 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 800 964 End Type 801 965 … … 811 975 cConnections As DWord 812 976 cControls As DWord 813 szShortName[ELM(MIXER_SHORT_NAME_CHARS)] As Char814 szName[ELM(MIXER_LONG_NAME_CHARS)] As Char815 Target As TARGET977 szShortName[ELM(MIXER_SHORT_NAME_CHARS)] As SByte 978 szName[ELM(MIXER_LONG_NAME_CHARS)] As SByte 979 Target As _MMSYSTEM_TARGETA 816 980 End Type 817 981 TypeDef PMIXERLINEA = *MIXERLINEA 818 982 TypeDef LPMIXERLINEA = *MIXERLINEA 819 983 #ifdef UNICODE 984 TypeDef MIXERLINE = MIXERLINEW 985 #else 820 986 TypeDef MIXERLINE = MIXERLINEA 821 TypeDef PMIXERLINE = PMIXERLINEA 822 TypeDef LPMIXERLINE = LPMIXERLINEA 987 #endif 988 TypeDef PMIXERLINE = *MIXERLINE 989 TypeDef LPMIXERLINE = *MIXERLINE 823 990 824 991 ' MIXERLINE.fdwLine … … 862 1029 Const MIXERLINE_TARGETTYPE_AUX = 5 863 1030 864 Declare Function mixerGetLineInfo Lib "winmm" Alias "mixerGetLineInfoA"(hmxobj As HMIXEROBJ, pmxl As *MIXERLINE, fdwInfo As DWord) As MMRESULT1031 Declare Function mixerGetLineInfo Lib "winmm" Alias _FuncName_mixerGetLineInfo (hmxobj As HMIXEROBJ, pmxl As *MIXERLINE, fdwInfo As DWord) As MMRESULT 865 1032 866 1033 Const MIXER_GETLINEINFOF_DESTINATION = &H00000000 … … 873 1040 Declare Function mixerGetID Lib "winmm" (hmxobj As HMIXEROBJ, puMxId As *DWord, fdwId As DWord) As MMRESULT 874 1041 1042 Type MIXERCONTROLW 1043 cbStruct As DWord 1044 dwControlID As DWord 1045 dwControlType As DWord 1046 fdwControl As DWord 1047 cMultipleItems As DWord 1048 szShortName[ELM(MIXER_SHORT_NAME_CHARS)] As WCHAR 1049 szName[ELM(MIXER_LONG_NAME_CHARS)] As WCHAR 1050 Bounds[ELM(6)] As DWord 1051 Metrics[ELM(6)] As DWord 1052 End Type 1053 TypeDef PMIXERCONTROLW = *MIXERCONTROLW 1054 TypeDef LPMIXERCONTROLW = *MIXERCONTROLW 875 1055 Type MIXERCONTROLA 876 1056 cbStruct As DWord … … 879 1059 fdwControl As DWord 880 1060 cMultipleItems As DWord 881 szShortName[ELM(MIXER_SHORT_NAME_CHARS)] As Char882 szName[ELM(MIXER_LONG_NAME_CHARS)] As Char1061 szShortName[ELM(MIXER_SHORT_NAME_CHARS)] As SByte 1062 szName[ELM(MIXER_LONG_NAME_CHARS)] As SByte 883 1063 Bounds[ELM(6)] As DWord 884 1064 Metrics[ELM(6)] As DWord … … 886 1066 TypeDef PMIXERCONTROLA = *MIXERCONTROLA 887 1067 TypeDef LPMIXERCONTROLA = *MIXERCONTROLA 888 1068 #ifdef UNICODE 1069 TypeDef MIXERCONTROL = MIXERCONTROLW 1070 #else 889 1071 TypeDef MIXERCONTROL = MIXERCONTROLA 890 TypeDef PMIXERCONTROL = PMIXERCONTROLA 891 TypeDef LPMIXERCONTROL = LPMIXERCONTROLA 1072 #endif 1073 TypeDef PMIXERCONTROL = *MIXERCONTROL 1074 TypeDef LPMIXERCONTROL = *MIXERCONTROL 892 1075 893 1076 ' MIXERCONTROL.fdwControl … … 954 1137 Const MIXERCONTROL_CONTROLTYPE_MILLITIME = (MIXERCONTROL_CT_CLASS_TIME OR MIXERCONTROL_CT_SC_TIME_MILLISECS OR MIXERCONTROL_CT_UNITS_UNSIGNED) 955 1138 1139 Type MIXERLINECONTROLSW 1140 cbStruct As DWord 1141 dwLineID As DWord 1142 dwControl_ID_Type As DWord 1143 cControls As DWord 1144 cbmxctrl As DWord 1145 pamxctrl As *MIXERCONTROLW 1146 End Type 1147 TypeDef PMIXERLINECONTROLSW = *MIXERLINECONTROLSW 1148 TypeDef LPMIXERLINECONTROLSW = *MIXERLINECONTROLSW 956 1149 Type MIXERLINECONTROLSA 957 1150 cbStruct As DWord … … 960 1153 cControls As DWord 961 1154 cbmxctrl As DWord 962 pamxctrl As *MIXERCONTROL 1155 pamxctrl As *MIXERCONTROLA 963 1156 End Type 964 1157 TypeDef PMIXERLINECONTROLSA = *MIXERLINECONTROLSA 965 1158 TypeDef LPMIXERLINECONTROLSA = *MIXERLINECONTROLSA 966 1159 #ifdef UNICODE 967 1160 TypeDef MIXERLINECONTROLS = MIXERLINECONTROLSA 968 TypeDef PMIXERLINECONTROLS = PMIXERLINECONTROLSA 969 TypeDef LPMIXERLINECONTROLS = LPMIXERLINECONTROLSA 970 971 Declare Function mixerGetLineControls Lib "winmm" Alias "mixerGetLineControlsA" (hmxobj As HMIXEROBJ, pmxlc As *MIXERLINECONTROLS, fdwControls As DWord) As MMRESULT 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 972 1168 973 1169 Const MIXER_GETLINECONTROLSF_ALL = &H00000000 … … 987 1183 TypeDef LPMIXERCONTROLDETAILS = *MIXERCONTROLDETAILS 988 1184 1185 Type MIXERCONTROLDETAILS_LISTTEXTW 1186 dwParam1 As DWord 1187 dwParam2 As DWord 1188 szName[ELM(MIXER_LONG_NAME_CHARS)] As WCHAR 1189 End Type 1190 TypeDef PMIXERCONTROLDETAILS_LISTTEXTW = *MIXERCONTROLDETAILS_LISTTEXTW 1191 TypeDef LPMIXERCONTROLDETAILS_LISTTEXTW = *MIXERCONTROLDETAILS_LISTTEXTW 989 1192 Type MIXERCONTROLDETAILS_LISTTEXTA 990 1193 dwParam1 As DWord 991 1194 dwParam2 As DWord 992 szName[ELM(MIXER_LONG_NAME_CHARS)] As Char1195 szName[ELM(MIXER_LONG_NAME_CHARS)] As SByte 993 1196 End Type 994 1197 TypeDef PMIXERCONTROLDETAILS_LISTTEXTA = *MIXERCONTROLDETAILS_LISTTEXTA 995 1198 TypeDef LPMIXERCONTROLDETAILS_LISTTEXTA = *MIXERCONTROLDETAILS_LISTTEXTA 996 1199 #ifdef UNICODE 1200 TypeDef MIXERCONTROLDETAILS_LISTTEXT = MIXERCONTROLDETAILS_LISTTEXTW 1201 #else 997 1202 TypeDef MIXERCONTROLDETAILS_LISTTEXT = MIXERCONTROLDETAILS_LISTTEXTA 998 TypeDef PMIXERCONTROLDETAILS_LISTTEXT = PMIXERCONTROLDETAILS_LISTTEXTA 999 TypeDef LPMIXERCONTROLDETAILS_LISTTEXT = LPMIXERCONTROLDETAILS_LISTTEXTA 1203 #endif 1204 TypeDef PMIXERCONTROLDETAILS_LISTTEXT = *MIXERCONTROLDETAILS_LISTTEXT 1205 TypeDef LPMIXERCONTROLDETAILS_LISTTEXT = *MIXERCONTROLDETAILS_LISTTEXT 1000 1206 1001 1207 Type MIXERCONTROLDETAILS_BOOLEAN … … 1019 1225 Declare Function mixerGetControlDetailsA Lib "winmm" (hmxobj As HMIXEROBJ, pmxcd As *MIXERCONTROLDETAILS, fdwDetails As DWord) As MMRESULT 1020 1226 Declare Function mixerGetControlDetailsW Lib "winmm" (hmxobj As HMIXEROBJ, pmxcd As *MIXERCONTROLDETAILS, fdwDetails As DWord) As MMRESULT 1021 Declare Function mixerGetControlDetails Lib "winmm" Alias "mixerGetControlDetailsA"(hmxobj As HMIXEROBJ, pmxcd As *MIXERCONTROLDETAILS, fdwDetails As DWord) As MMRESULT1227 Declare Function mixerGetControlDetails Lib "winmm" Alias _FuncName_mixerGetControlDetails (hmxobj As HMIXEROBJ, pmxcd As *MIXERCONTROLDETAILS, fdwDetails As DWord) As MMRESULT 1022 1228 1023 1229 Const MIXER_GETCONTROLDETAILSF_VALUE = &H00000000 … … 1163 1369 Const JOYCAPS_POVCTS = &H0040 1164 1370 1165 Type JOYCAPS A1371 Type JOYCAPSW 1166 1372 wMid As Word 1167 1373 wPid As Word 1168 szPname[ELM(MAXPNAMELEN)] As Char1374 szPname[ELM(MAXPNAMELEN)] As WCHAR 1169 1375 wXmin As DWord 1170 1376 wXmax As DWord … … 1186 1392 wNumAxes As DWord 1187 1393 wMaxButtons As DWord 1188 szRegKey[ELM(MAXPNAMELEN)] As Char 1189 szOEMVxD[ELM(MAX_JOYSTICKOEMVXDNAME)] As Char 1394 szRegKey[ELM(MAXPNAMELEN)] As WCHAR 1395 szOEMVxD[ELM(MAX_JOYSTICKOEMVXDNAME)] As WCHAR 1396 End Type 1397 TypeDef PJOYCAPSW = *JOYCAPSW 1398 TypeDef NPJOYCAPSW = *JOYCAPSW 1399 TypeDef LPJOYCAPSW = *JOYCAPSW 1400 Type JOYCAPSA 1401 wMid As Word 1402 wPid As Word 1403 szPname[ELM(MAXPNAMELEN)] As SByte 1404 wXmin As DWord 1405 wXmax As DWord 1406 wYmin As DWord 1407 wYmax As DWord 1408 wZmin As DWord 1409 wZmax As DWord 1410 wNumButtons As DWord 1411 wPeriodMin As DWord 1412 wPeriodMax As DWord 1413 wRmin As DWord 1414 wRmax As DWord 1415 wUmin As DWord 1416 wUmax As DWord 1417 wVmin As DWord 1418 wVmax As DWord 1419 wCaps As DWord 1420 wMaxAxes As DWord 1421 wNumAxes As DWord 1422 wMaxButtons As DWord 1423 szRegKey[ELM(MAXPNAMELEN)] As SByte 1424 szOEMVxD[ELM(MAX_JOYSTICKOEMVXDNAME)] As SByte 1190 1425 End Type 1191 1426 TypeDef PJOYCAPSA = *JOYCAPSA 1192 1427 TypeDef NPJOYCAPSA = *JOYCAPSA 1193 1428 TypeDef LPJOYCAPSA = *JOYCAPSA 1194 1429 #ifdef UNICODE 1430 TypeDef JOYCAPS = JOYCAPSW 1431 #else 1195 1432 TypeDef JOYCAPS = JOYCAPSA 1433 #endif 1196 1434 TypeDef PJOYCAPS = PJOYCAPSA 1197 1435 TypeDef NPJOYCAPS = NPJOYCAPSA … … 1229 1467 ' joystick function prototypes 1230 1468 Declare Function joyGetNumDevs Lib "winmm" () As DWord 1231 Declare Function joyGetDevCaps Lib "winmm" Alias "joyGetDevCapsA"(uJoyID As DWord, pjc As *JOYCAPS, cbjc As DWord) As MMRESULT1469 Declare Function joyGetDevCaps Lib "winmm" Alias _FuncName_joyGetDevCaps (uJoyID As DWord, pjc As *JOYCAPS, cbjc As DWord) As MMRESULT 1232 1470 Declare Function joyGetPos Lib "winmm" (uJoyID As DWord, pji As *JOYINFO) As MMRESULT 1233 1471 Declare Function joyGetPosEx Lib "winmm" (uJoyID As DWord, pji As *JOYINFOEX) As MMRESULT … … 1359 1597 1360 1598 ' MMIO function prototypes 1361 Declare Function mmioStringToFOURCC Lib "winmm" Alias "mmioStringToFOURCCA" (sz As LPSTR, uFlags As DWord) As FOURCC1362 Declare Function mmioInstallIOProc Lib "winmm" Alias "mmioInstallIOProcA"(fccIOProc As FOURCC, pIOProc As LPMMIOPROC, dwFlags As DWord) As LPMMIOPROC1363 Declare Function mmioOpen Lib "winmm" Alias "mmioOpenA" (pszFileName As LPSTR, pmmioinfo As *MMIOINFO, fdwOpen As DWord) As HMMIO1364 Declare Function mmioRename Lib "winmm" Alias "mmioRenameA" (pszFileName As LPSTR, pszNewFileName As LPSTR, pmmioinfo As *MMIOINFO, fdwRename As DWord) As MMRESULT1599 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 1365 1603 Declare Function mmioClose Lib "winmm" (hmmio As HMMIO, fuClose As DWord) As MMRESULT 1366 1604 Declare Function mmioRead Lib "winmm" (hmmio As HMMIO, pch As HPSTR, cch As Long) As Long … … 1386 1624 1387 1625 ' MCI Functions 1388 Declare Function mciSendCommand Lib "winmm" Alias "mciSendCommandA" (mciId As MCIDEVICEID, uMsg As DWord, dwParam1 As DWord, ByRef dwParam2 As Any) As MCIERROR1389 Declare Function mciSendString Lib "winmm" Alias "mciSendStringA" (lpstrCommand As LPSTR, lpstrReturnString As LPSTR, uReturnLength As DWord, hwndCallback As HWND) As MCIERROR1390 Declare Function mciGetDeviceID Lib "winmm" Alias "mciGetDeviceIDA" (pszDevice As LPSTR) As MCIDEVICEID1391 1392 Declare Function mciGetErrorString Lib "winmm" Alias "mciGetErrorStringA"(mcierr As MCIERROR, pszText As LPSTR, cchText As DWord) As BOOL1626 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 1393 1631 Declare Function mciSetYieldProc Lib "winmm" (mciId As MCIDEVICEID, fpYieldProc As YIELDPROC, dwYieldData As DWord) As BOOL 1394 1632 Declare Function mciGetCreatorTask Lib "winmm" (mciId As MCIDEVICEID) As HTASK … … 1704 1942 TypeDef LPMCI_GENERIC_PARMS = *MCI_GENERIC_PARMS 1705 1943 1706 Type MCI_OPEN_PARMS 1944 Type MCI_OPEN_PARMSW 1707 1945 dwCallback As DWord 1708 1946 wDeviceID As DWord 1709 lpstrDeviceType As LPSTR 1710 lpstrElementName As LPSTR 1711 lpstrAlias As LPSTR 1712 End Type 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 1713 1967 TypeDef PMCI_OPEN_PARMS = *MCI_OPEN_PARMS 1714 1968 TypeDef LPMCI_OPEN_PARMS = *MCI_OPEN_PARMS … … 1738 1992 TypeDef LPMCI_STATUS_PARMS = *MCI_STATUS_PARMS 1739 1993 1994 Type MCI_INFO_PARMSW 1995 dwCallback As DWord 1996 lpstrReturn As LPWSTR 1997 dwRetSize As DWord 1998 End Type 1999 TypeDef PMCI_INFO_PARMSW = *MCI_INFO_PARMSW 2000 TypeDef LPMCI_INFO_PARMSW = *MCI_INFO_PARMSW 1740 2001 Type MCI_INFO_PARMSA 1741 2002 dwCallback As DWord … … 1745 2006 TypeDef PMCI_INFO_PARMSA = *MCI_INFO_PARMSA 1746 2007 TypeDef LPMCI_INFO_PARMSA = *MCI_INFO_PARMSA 2008 #ifdef UNICODE 2009 TypeDef MCI_INFO_PARMS = MCI_INFO_PARMSW 2010 #else 1747 2011 TypeDef MCI_INFO_PARMS = MCI_INFO_PARMSA 1748 TypeDef PMCI_INFO_PARMS = PMCI_INFO_PARMSA 1749 TypeDef LPMCI_INFO_PARMS = LPMCI_INFO_PARMSA 2012 #endif 2013 TypeDef PMCI_INFO_PARMS = *MCI_INFO_PARMS 2014 TypeDef LPMCI_INFO_PARMS = *MCI_INFO_PARMS 1750 2015 1751 2016 Type MCI_GETDEVCAPS_PARMS … … 1757 2022 TypeDef LPMCI_GETDEVCAPS_PARMS = *MCI_GETDEVCAPS_PARMS 1758 2023 2024 Type MCI_SYSINFO_PARMSW 2025 dwCallback As DWord 2026 lpstrReturn As LPWSTR 2027 dwRetSize As DWord 2028 dwNumber As DWord 2029 wDeviceType As DWord 2030 End Type 2031 TypeDef PMCI_SYSINFO_PARMSW = *MCI_SYSINFO_PARMSW 2032 TypeDef LPMCI_SYSINFO_PARMSW = *MCI_SYSINFO_PARMSW 1759 2033 Type MCI_SYSINFO_PARMSA 1760 2034 dwCallback As DWord … … 1766 2040 TypeDef PMCI_SYSINFO_PARMSA = *MCI_SYSINFO_PARMSA 1767 2041 TypeDef LPMCI_SYSINFO_PARMSA = *MCI_SYSINFO_PARMSA 2042 #ifdef UNICODE 1768 2043 TypeDef MCI_SYSINFO_PARMS = MCI_SYSINFO_PARMSA 1769 TypeDef PMCI_SYSINFO_PARMS = PMCI_SYSINFO_PARMSA 1770 TypeDef LPMCI_SYSINFO_PARMS = LPMCI_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 1771 2049 1772 2050 Type MCI_SET_PARMS … … 1786 2064 TypeDef LPMCI_BREAK_PARMS = *MCI_BREAK_PARMS 1787 2065 2066 Type MCI_SAVE_PARMSW 2067 dwCallback As DWord 2068 lpfilename As LPCWSTR 2069 End Type 2070 TypeDef PMCI_SAVE_PARMSW = *MCI_SAVE_PARMSW 2071 TypeDef LPMCI_SAVE_PARMSW = *MCI_SAVE_PARMSW 1788 2072 Type MCI_SAVE_PARMSA 1789 2073 dwCallback As DWord 1790 lpfilename As LP STR2074 lpfilename As LPCSTR 1791 2075 End Type 1792 2076 TypeDef PMCI_SAVE_PARMSA = *MCI_SAVE_PARMSA 1793 2077 TypeDef LPMCI_SAVE_PARMSA = *MCI_SAVE_PARMSA 2078 #ifdef UNICODE 2079 TypeDef MCI_SAVE_PARMS = MCI_SAVE_PARMSW 2080 #else 1794 2081 TypeDef MCI_SAVE_PARMS = MCI_SAVE_PARMSA 1795 TypeDef PMCI_SAVE_PARMS = PMCI_SAVE_PARMSA 1796 TypeDef LPMCI_SAVE_PARMS = LPMCI_SAVE_PARMSA 1797 2082 #endif 2083 TypeDef PMCI_SAVE_PARMS = *MCI_SAVE_PARMS 2084 TypeDef LPMCI_SAVE_PARMS = *MCI_SAVE_PARMS 2085 2086 Type MCI_LOAD_PARMSW 2087 dwCallback As DWord 2088 lpfilename As LPCWSTR 2089 End Type 2090 TypeDef PMCI_LOAD_PARMSW = *MCI_LOAD_PARMSW 2091 TypeDef LPMCI_LOAD_PARMSW = *MCI_LOAD_PARMSW 1798 2092 Type MCI_LOAD_PARMSA 1799 2093 dwCallback As DWord 1800 lpfilename As LP STR2094 lpfilename As LPCSTR 1801 2095 End Type 1802 2096 TypeDef PMCI_LOAD_PARMSA = *MCI_LOAD_PARMSA 1803 2097 TypeDef LPMCI_LOAD_PARMSA = *MCI_LOAD_PARMSA 2098 #ifdef UNICODE 2099 TypeDef MCI_LOAD_PARMS = MCI_LOAD_PARMSW 2100 #else 1804 2101 TypeDef MCI_LOAD_PARMS = MCI_LOAD_PARMSA 1805 TypeDef PMCI_LOAD_PARMS = PMCI_LOAD_PARMSA 1806 TypeDef LPMCI_LOAD_PARMS = LPMCI_LOAD_PARMSA 2102 #endif 2103 TypeDef PMCI_LOAD_PARMS = *MCI_LOAD_PARMS 2104 TypeDef LPMCI_LOAD_PARMS = *MCI_LOAD_PARMS 1807 2105 1808 2106 Type MCI_RECORD_PARMS … … 1859 2157 TypeDef LPMCI_VD_STEP_PARMS = *MCI_VD_STEP_PARMS 1860 2158 2159 Type MCI_VD_ESCAPE_PARMSW 2160 dwCallback As DWord 2161 lpstrCommand As LPCWSTR 2162 End Type 2163 TypeDef PMCI_VD_ESCAPE_PARMSW = *MCI_VD_ESCAPE_PARMSW 2164 TypeDef LPMCI_VD_ESCAPE_PARMSW = *MCI_VD_ESCAPE_PARMSW 1861 2165 Type MCI_VD_ESCAPE_PARMSA 1862 2166 dwCallback As DWord 1863 lpstrCommand As LP STR2167 lpstrCommand As LPCSTR 1864 2168 End Type 1865 2169 TypeDef PMCI_VD_ESCAPE_PARMSA = *MCI_VD_ESCAPE_PARMSA 1866 2170 TypeDef LPMCI_VD_ESCAPE_PARMSA = *MCI_VD_ESCAPE_PARMSA 2171 #ifdef UNICODE 2172 TypeDef MCI_VD_ESCAPE_PARMS = MCI_VD_ESCAPE_PARMSW 2173 #else 1867 2174 TypeDef MCI_VD_ESCAPE_PARMS = MCI_VD_ESCAPE_PARMSA 1868 TypeDef PMCI_VD_ESCAPE_PARMS = PMCI_VD_ESCAPE_PARMSA 1869 TypeDef LPMCI_VD_ESCAPE_PARMS = LPMCI_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 1870 2178 1871 2179 ' MCI extensions for CD audio devices … … 1898 2206 Const MCI_WAVE_GETDEVCAPS_OUTPUTS = &H00004002 1899 2207 2208 Type MCI_WAVE_OPEN_PARMSW 2209 dwCallback As DWord 2210 wDeviceID As MCIDEVICEID 2211 lpstrDeviceType As LPCWSTR 2212 lpstrElementName As LPCWSTR 2213 lpstrAlias As LPCWSTR 2214 dwBufferSeconds As DWord 2215 End Type 2216 TypeDef PMCI_WAVE_OPEN_PARMSW = *MCI_WAVE_OPEN_PARMSW 2217 TypeDef LPMCI_WAVE_OPEN_PARMSW = *MCI_WAVE_OPEN_PARMSW 1900 2218 Type MCI_WAVE_OPEN_PARMSA 1901 2219 dwCallback As DWord 1902 2220 wDeviceID As MCIDEVICEID 1903 lpstrDeviceType As LP STR1904 lpstrElementName As LP STR1905 lpstrAlias As LP STR2221 lpstrDeviceType As LPCSTR 2222 lpstrElementName As LPCSTR 2223 lpstrAlias As LPCSTR 1906 2224 dwBufferSeconds As DWord 1907 2225 End Type 1908 2226 TypeDef PMCI_WAVE_OPEN_PARMSA = *MCI_WAVE_OPEN_PARMSA 1909 2227 TypeDef LPMCI_WAVE_OPEN_PARMSA = *MCI_WAVE_OPEN_PARMSA 2228 #ifdef UNICODE 2229 TypeDef MCI_WAVE_OPEN_PARMS = MCI_WAVE_OPEN_PARMSW 2230 #else 1910 2231 TypeDef MCI_WAVE_OPEN_PARMS = MCI_WAVE_OPEN_PARMSA 1911 TypeDef PMCI_WAVE_OPEN_PARMS = PMCI_WAVE_OPEN_PARMSA 1912 TypeDef LPMCI_WAVE_OPEN_PARMS = LPMCI_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 1913 2235 1914 2236 Type MCI_WAVE_DELETE_PARMS … … 2018 2340 Const MCI_ANIM_UPDATE_HDC = &H00020000 2019 2341 2020 Type MCI_ANIM_OPEN_PARMS A2342 Type MCI_ANIM_OPEN_PARMSW 2021 2343 dwCallback As DWord 2022 2344 wDeviceID As MCIDEVICEID 2023 lpstrDeviceType As LP STR2024 lpstrElementName As LP STR2025 lpstrAlias As LP STR2345 lpstrDeviceType As LPCWSTR 2346 lpstrElementName As LPCWSTR 2347 lpstrAlias As LPCWSTR 2026 2348 dwStyle As DWord 2027 2349 hWndParent As HWND 2028 2350 End Type 2351 TypeDef PMCI_ANIM_OPEN_PARMSW = *MCI_ANIM_OPEN_PARMSW 2352 TypeDef LPMCI_ANIM_OPEN_PARMSW = *MCI_ANIM_OPEN_PARMSW 2353 Type MCI_ANIM_OPEN_PARMSA 2354 dwCallback As DWord 2355 wDeviceID As MCIDEVICEID 2356 lpstrDeviceType As LPCSTR 2357 lpstrElementName As LPCSTR 2358 lpstrAlias As LPCSTR 2359 dwStyle As DWord 2360 hWndParent As HWND 2361 End Type 2029 2362 TypeDef PMCI_ANIM_OPEN_PARMSA = *MCI_ANIM_OPEN_PARMSA 2030 2363 TypeDef LPMCI_ANIM_OPEN_PARMSA = *MCI_ANIM_OPEN_PARMSA 2364 #ifdef UNICODE 2365 TypeDef MCI_ANIM_OPEN_PARMS = MCI_ANIM_OPEN_PARMSW 2366 #else 2031 2367 TypeDef MCI_ANIM_OPEN_PARMS = MCI_ANIM_OPEN_PARMSA 2032 TypeDef PMCI_ANIM_OPEN_PARMS = PMCI_ANIM_OPEN_PARMSA 2033 TypeDef LPMCI_ANIM_OPEN_PARMS = LPMCI_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 2034 2371 2035 2372 Type MCI_ANIM_PLAY_PARMS … … 2049 2386 TypeDef LPMCI_ANIM_STEP_PARMS = *MCI_ANIM_STEP_PARMS 2050 2387 2051 Type MCI_ANIM_WINDOW_PARMS A2388 Type MCI_ANIM_WINDOW_PARMSW 2052 2389 dwCallback As DWord 2053 2390 hWnd As HWND 2054 2391 nCmdShow As DWord 2055 lpstrText As LPSTR 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 2056 2401 End Type 2057 2402 TypeDef PMCI_ANIM_WINDOW_PARMSA = *MCI_ANIM_WINDOW_PARMSA 2058 2403 TypeDef LPMCI_ANIM_WINDOW_PARMSA = *MCI_ANIM_WINDOW_PARMSA 2404 #ifdef UNICODE 2405 TypeDef MCI_ANIM_WINDOW_PARMS = MCI_ANIM_WINDOW_PARMSW 2406 #else 2059 2407 TypeDef MCI_ANIM_WINDOW_PARMS = MCI_ANIM_WINDOW_PARMSA 2060 TypeDef PMCI_ANIM_WINDOW_PARMS = PMCI_ANIM_WINDOW_PARMSA 2061 TypeDef LPMCI_ANIM_WINDOW_PARMS = LPMCI_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 2062 2411 2063 2412 Type MCI_ANIM_RECT_PARMS … … 2101 2450 Const MCI_OVLY_WHERE_VIDEO = &H00100000 2102 2451 2103 Type MCI_OVLY_OPEN_PARMSA 2452 Type MCI_OVLY_OPEN_PARMSAW 2104 2453 dwCallback As DWord 2105 2454 wDeviceID As MCIDEVICEID 2106 lpstrDeviceType As LP STR2107 lpstrElementName As LP STR2108 lpstrAlias As LP STR2455 lpstrDeviceType As LPCWSTR 2456 lpstrElementName As LPCWSTR 2457 lpstrAlias As LPCWSTR 2109 2458 dwStyle As DWord 2110 2459 hWndParent As HWND 2111 2460 End Type 2461 TypeDef PMCI_OVLY_OPEN_PARMSW = *MCI_OVLY_OPEN_PARMSW 2462 TypeDef LPMCI_OVLY_OPEN_PARMSW = *MCI_OVLY_OPEN_PARMSW 2463 Type MCI_OVLY_OPEN_PARMSA 2464 dwCallback As DWord 2465 wDeviceID As MCIDEVICEID 2466 lpstrDeviceType As LPCSTR 2467 lpstrElementName As LPCSTR 2468 lpstrAlias As LPCSTR 2469 dwStyle As DWord 2470 hWndParent As HWND 2471 End Type 2112 2472 TypeDef PMCI_OVLY_OPEN_PARMSA = *MCI_OVLY_OPEN_PARMSA 2113 2473 TypeDef LPMCI_OVLY_OPEN_PARMSA = *MCI_OVLY_OPEN_PARMSA 2474 #ifdef UNICODE 2475 TypeDef MCI_OVLY_OPEN_PARMS = MCI_OVLY_OPEN_PARMSW 2476 #else 2114 2477 TypeDef MCI_OVLY_OPEN_PARMS = MCI_OVLY_OPEN_PARMSA 2115 TypeDef PMCI_OVLY_OPEN_PARMS = PMCI_OVLY_OPEN_PARMSA 2116 TypeDef LPMCI_OVLY_OPEN_PARMS = LPMCI_OVLY_OPEN_PARMSA 2117 2118 Type MCI_OVLY_WINDOW_PARMSA 2478 #endif 2479 TypeDef PMCI_OVLY_OPEN_PARMS = *MCI_OVLY_OPEN_PARMS 2480 TypeDef LPMCI_OVLY_OPEN_PARMS = *MCI_OVLY_OPEN_PARMS 2481 2482 Type MCI_OVLY_WINDOW_PARMSW 2119 2483 dwCallback As DWord 2120 2484 hWnd As HWND 2121 2485 nCmdShow As DWord 2122 lpstrText As LPSTR 2486 lpstrText As LPCWSTR 2487 End Type 2488 TypeDef PMCI_OVLY_WINDOW_PARMSW = *MCI_OVLY_WINDOW_PARMSW 2489 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 2123 2495 End Type 2124 2496 TypeDef PMCI_OVLY_WINDOW_PARMSA = *MCI_OVLY_WINDOW_PARMSA 2125 2497 TypeDef LPMCI_OVLY_WINDOW_PARMSA = *MCI_OVLY_WINDOW_PARMSA 2498 #ifdef UNICODE 2499 TypeDef MCI_OVLY_WINDOW_PARMS = MCI_OVLY_WINDOW_PARMSW 2500 #else 2126 2501 TypeDef MCI_OVLY_WINDOW_PARMS = MCI_OVLY_WINDOW_PARMSA 2127 TypeDef PMCI_OVLY_WINDOW_PARMS = PMCI_OVLY_WINDOW_PARMSA 2128 TypeDef LPMCI_OVLY_WINDOW_PARMS = LPMCI_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 2129 2505 2130 2506 Type MCI_OVLY_RECT_PARMS … … 2135 2511 TypeDef LPMCI_OVLY_RECT_PARMS = *MCI_OVLY_RECT_PARMS 2136 2512 2513 Type MCI_OVLY_SAVE_PARMSW 2514 dwCallback As DWord 2515 lpfilename As LPCWSTR 2516 rc As RECT 2517 End Type 2518 TypeDef PMCI_OVLY_SAVE_PARMSW = *MCI_OVLY_SAVE_PARMSW 2519 TypeDef LPMCI_OVLY_SAVE_PARMSW = *MCI_OVLY_SAVE_PARMSW 2137 2520 Type MCI_OVLY_SAVE_PARMSA 2138 2521 dwCallback As DWord 2139 lpfilename As LP STR2522 lpfilename As LPCSTR 2140 2523 rc As RECT 2141 2524 End Type 2142 2525 TypeDef PMCI_OVLY_SAVE_PARMSA = *MCI_OVLY_SAVE_PARMSA 2143 2526 TypeDef LPMCI_OVLY_SAVE_PARMSA = *MCI_OVLY_SAVE_PARMSA 2527 #ifdef UNICODE 2528 TypeDef MCI_OVLY_SAVE_PARMS = MCI_OVLY_SAVE_PARMSW 2529 #else 2144 2530 TypeDef MCI_OVLY_SAVE_PARMS = MCI_OVLY_SAVE_PARMSA 2145 TypeDef PMCI_OVLY_SAVE_PARMS = PMCI_OVLY_SAVE_PARMSA 2146 TypeDef LPMCI_OVLY_SAVE_PARMS = LPMCI_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 2147 2534 2148 2535 Type MCI_OVLY_LOAD_PARMSA … … 2163 2550 ' DIB Driver extensions 2164 2551 Const SELECTDIB = 41 2165 Const DIBINDEX(n) = MAKELONG(n, &H10FF)2552 Const DIBINDEX(n) = MAKELONG(n, &H10FF) 2166 2553 2167 2554 #endif '_INC_MMSYS
Note:
See TracChangeset
for help on using the changeset viewer.
