Results 1 to 2 of 2

Thread: Heres a tough one (multimedia api), etc

  1. #1

    Thread Starter
    Lively Member
    Join Date
    Apr 2001
    Location
    Dover, UK
    Posts
    70

    Exclamation Heres a tough one (multimedia api), etc

    I understand i may be able to play mp3 files using this API.(mcisendstring)
    Someone suggested i then might be able to adjust the pitch of the playback without the annoyong glitches that mediaplayer gives you if you adjust the "rate" during playback.

    I have several problems: I dont program apis too well yet

    : I can find nothing on the web on how to install the correct codec to make sure the mci can play mp3s
    (there are only vague refernces)

    So my question is does anybody have any sample code that i can use to open an mp3, play it and adjust the pitch.

    I will have other questions to ask later if i ever get to the bottom of this. I have looked everywhere and will be suicidal by teatime!!!

    Thanks for your time

  2. #2
    Junior Member
    Join Date
    Jun 2000
    Posts
    25

    mp3

    u don`t anything .. just make sure mci is installed



    Sub OpenFile(file As String)
    FileExt = UCase(Right(file, 3))

    'MCIhandler
    video = True
    Select Case FileExt
    Case "MP3"
    FileType = "MPEGvideo"
    End Select


    ReturnString = mciSendString("open " + GetShortPath(file) + " Type " + FileType + " Alias SoundFile wait", 0&, 0&, 0&)

    ReturnString = mciSendString("set SoundFile time format ms", 0&, 0&, 0&)
    End Sub

    'playing
    Public Sub PlayFile()
    ReturnString = mciSendString("play SoundFile", 0&, 0&, 0&)
    End Sub


    'that`s all u need
    'I`m not sure how to change pitch but u can check msdn`s mci reference ...
    give me the handle and I`ll give you the world
    Adam
    junior programmer

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width