pomoc oko MP3 player-a

pomoc oko MP3 player-a

offline
  • Pridružio: 18 Sep 2005
  • Poruke: 31
  • Gde živiš: Karavukovo

Poceo sam da pravim Mp3 player koristeci MMControl 6.0. Sve je ok radi kao sat, ali imam jedan problem. Ne znam kako da napravim progress bar i scroler kojim cu da ubrzavam pesme i da vidim koliko je od pesme proteklo. Da li neko mozda zna resenje ovog malog problema? Unapred HVALA!!!



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
offline
  • Nemanja
  • Web Designer and Developer
  • Pridružio: 24 Jan 2007
  • Poruke: 266

A kako si uspeo da napravis da preko MMControle pustas mp3 pesme.Ja sam uspeo samo da pustam avi,wma,wav i audio pesme.



offline
  • Pridružio: 06 Maj 2007
  • Poruke: 241
  • Gde živiš: Beograd

Evo

Option Explicit ' Play the MP3 file. Private Sub cmdPlay_Click()     If cmdPlay.Caption = "Play" Then         mmcAudio.FileName = txtFile.Text         mmcAudio.Command = "Open"         mmcAudio.Command = "Play"         cmdPlay.Caption = "Stop"     Else         mmcAudio.Command = "Stop"         mmcAudio.Command = "Close"     End If End Sub Private Sub Form_Load() Dim app_path As String     app_path = App.Path     If Right$(app_path, 1) <> "\" Then app_path = app_path & "\"     'txtFile.Text = app_path & "Alice_Cooper-Gimmie.mp3"     txtFile.Text = app_path & "demo.mp3"     ' Prepare the audio control.     mmcAudio.Notify = False     mmcAudio.Wait = True     mmcAudio.Shareable = False     mmcAudio.Command = "Close" End Sub Private Sub Form_Unload(Cancel As Integer)     ' Close the multimedia device.     mmcAudio.Command = "Close" End Sub ' Prepare the control to play again. Private Sub mmcAudio_Done(NotifyCode As Integer)     mmcAudio.Command = "Close"     lblAudio.Caption = ""     cmdPlay.Caption = "Play" End Sub Private Sub mmcAudio_StatusUpdate()     lblAudio.Caption = mmcAudio.Position & "/" & mmcAudio.Length End Sub
https://www.mycity.rs/must-login.png

Ko je trenutno na forumu
 

Ukupno su 1243 korisnika na forumu :: 36 registrovanih, 8 sakrivenih i 1199 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: airsuba, babaroga, Bickoooo, Bobrock1, bojanM84, branko7, Bubimir, CrazyDiablo, Dogma21, Dorcolac, DragoslavS, Georgius, GORDI, goxin, ivan1973, Krusarac, mikrimaus, milenko crazy north, MiroslavD, nemkea71, pedjolino76, Petar35, Pohovani_00, Prašinar, procesor, Romibrat, S-lash, SD izvidjac, shaja1, SR-3m, tmanda323, Toper, tubular, USSVoyager, vathra, wolverined4