Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 164
  • Last Modified:

The Multimedia control

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
bilcrete
Asked:
bilcrete
1 Solution
 
SPECIALISTCommented:
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

[Webinar] Database Backup and Recovery

Does your company store data on premises, off site, in the cloud, or a combination of these? If you answered “yes”, you need a data backup recovery plan that fits each and every platform. Watch now as as Percona teaches us how to build agile data backup recovery plan.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now