Solved

The Multimedia control

Posted on 1998-07-26
1
156 Views
Last Modified: 2010-05-03
I'm using VB4.0-32 if that makes a difference.  I'm playing around with a cd player.  Everything is working beautifully, execpt, I can't find out what track is currently playing when the program is loaded, assuming that a music cd is currently playing and no other program has control of the cd rom.  I have the timeformat set to 10 (TMSF) and if I read the mmcontrol1.position, I get a number that appears to be random, say 6 to 10 digits.  Whatever it is, it's not in the TMSF format like the help file says it should be.  I'm assuming that I need to convert the number the position property is giving me.  Thanks in advance.
0
Comment
Question by:bilcrete
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
1 Comment
 
LVL 3

Accepted Solution

by:
SPECIALIST earned 100 total points
ID: 1466716
Try this


Sub MMControl1_StatusUpdate ()

        Debug.Print "Mode = "; MMControl1.Mode
        Select Case MMControl1.Mode
       Case MCI_MODE_OPEN
       '      'whatever...
       Case MCI_MODE_STOP
       '      'whatever...
       Case MCI_MODE_PLAY
        If giOldTrack  (MMControl1.Position And &HFF) Then
       giCurrentTrack = (MMControl1.Position And &HFF)

              If giKTELCD Then DisplayKTELFeaturedArtist(giCurrentTrack)
                     giOldTrack = giCurrentTrack
                     b3dPlay.Caption = "Sto&p"
                      End If
                      End Select
              End Sub


0

Featured Post

Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Introduction I needed to skip over some file processing within a For...Next loop in some old production code and wished that VB (classic) had a statement that would drop down to the end of the current iteration, bypassing the statements that were c…
When designing a form there are several BorderStyles to choose from, all of which can be classified as either 'Fixed' or 'Sizable' and I'd guess that 'Fixed Single' or one of the other fixed types is the most popular choice. I assume it's the most p…
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…

710 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question