home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / Basic / Visual Basic.60 / COMMON / TOOLS / VB / UNSUPPRT / VOICE / WAVESTRM / ACM_DEFS.BAS next >
Encoding:
BASIC Source File  |  1997-01-16  |  3.2 KB  |  61 lines
  1. Attribute VB_Name = "ACM_Defs"
  2. Option Explicit
  3. '== ACM API Constants ================================================
  4. Public Const ACMERR_BASE = 512
  5. Public Const ACMERR_NOTPOSSIBLE = (ACMERR_BASE + 0)
  6. Public Const ACMERR_BUSY = (ACMERR_BASE + 1)
  7. Public Const ACMERR_UNPREPARED = (ACMERR_BASE + 2)
  8. Public Const ACMERR_CANCELED = (ACMERR_BASE + 3)
  9.  
  10. ' AcmStreamSize Flags...
  11. Public Const ACM_STREAMSIZEF_SOURCE = &H0&
  12. Public Const ACM_STREAMSIZEF_DESTINATION = &H1&
  13. Public Const ACM_STREAMSIZEF_QUERYMASK = &HF&
  14.  
  15. ' acmStreamConvert Flags...
  16. Public Const ACM_STREAMCONVERTF_BLOCKALIGN = &H4&
  17. Public Const ACM_STREAMCONVERTF_START = &H10&
  18. Public Const ACM_STREAMCONVERTF_END = &H20&
  19.  
  20. ' Done Bits For ACMSTREAMHEADER.fdwStatus
  21. Public Const ACMSTREAMHEADER_STATUSF_DONE = &H10000
  22. Public Const ACMSTREAMHEADER_STATUSF_PREPARED = &H20000
  23. Public Const ACMSTREAMHEADER_STATUSF_INQUEUE = &H100000
  24.  
  25. ' Done Bits For acmStreamOpen Formats
  26. Public Const ACM_STREAMOPENF_QUERY = &H1&
  27. Public Const ACM_STREAMOPENF_ASYNC = &H2&
  28. Public Const ACM_STREAMOPENF_NONREALTIME = &H4&
  29.  
  30. '== ACM API Declarations ================================================
  31. Public Declare Function acmStreamOpen Lib "MSACM32" (hAS As Long, ByVal hADrv As Long, wfxSrc As WAVEFORMATEX, wfxDst As WAVEFORMATEX, ByVal wFltr As Long, ByVal dwCallback As Long, ByVal dwInstance As Long, ByVal fdwOpen As Long) As Long
  32. Public Declare Function acmStreamClose Lib "MSACM32" (ByVal hAS As Long, ByVal dwClose As Long) As Long
  33. Public Declare Function acmStreamPrepareHeader Lib "MSACM32" (ByVal hAS As Long, hASHdr As ACMSTREAMHEADER, ByVal dwPrepare As Long) As Long
  34. Public Declare Function acmStreamUnprepareHeader Lib "MSACM32" (ByVal hAS As Long, hASHdr As ACMSTREAMHEADER, ByVal dwUnPrepare As Long) As Long
  35. Public Declare Function acmStreamConvert Lib "MSACM32" (ByVal hAS As Long, hASHdr As ACMSTREAMHEADER, ByVal dwConvert As Long) As Long
  36. Public Declare Function acmStreamReset Lib "MSACM32" (ByVal hAS As Long, ByVal dwReset As Long) As Long
  37. Public Declare Function acmStreamSize Lib "MSACM32" (ByVal hAS As Long, ByVal cbInput As Long, dwOutBytes As Long, ByVal dwSize As Long) As Long
  38.  
  39. '== ACM User Defined Datatypes ================================================
  40. Type WAVEFILTER
  41.     cbStruct      As Long
  42.     dwFilterTag   As Long
  43.     fdwFilter     As Long
  44.     dwReserved(5) As Long
  45. End Type
  46.  
  47. Type ACMSTREAMHEADER            ' [ACM STREAM HEADER TYPE]
  48.     cbStruct As Long            ' Size of header in bytes
  49.     dwStatus As Long            ' Conversion status buffer
  50.     dwUser As Long              ' 32 bits of user data specified by application
  51.     pbSrc As Long               ' Source data buffer pointer
  52.     cbSrcLength As Long         ' Source data buffer size in bytes
  53.     cbSrcLengthUsed As Long     ' Source data buffer size used in bytes
  54.     dwSrcUser As Long           ' 32 bits of user data specified by application
  55.     cbDst As Long               ' Dest data buffer pointer
  56.     cbDstLength As Long         ' Dest data buffer size in bytes
  57.     cbDstLengthUsed As Long     ' Dest data buffer size used in bytes
  58.     dwDstUser As Long           ' 32 bits of user data specified by application
  59.     dwReservedDriver(9) As Long ' Reserved and should not be used
  60. End Type
  61.