Hallo ich habe folgendes Problem:
In meiner FieListBox wird bei jedem start derselbe Ordner aufgerufen.
Ich möchte mit einem Dbl. Click auf eine der Dateien die Datei (Alle Dateien in dem Ordner der angezeigt wird sind mp3’s) abspielen.
Schon im Vorraus Danke!
Hallo,
VB6 ist zu alt um selbst MP3s abspielen zu können.
Du wirst ein anderes Programm einbinden müssen, ich habe mal den WindowsMediaPlayer dazu genommen, den hat ja Jeder.
Du musst dazu in ‚Projekt‘ -> ‚Komponenten‘ den Mediaplayer zur Werkzeugleiste hinzufügen und den auf die Form legen.
Bei Bedarf kannst Du den auch unsichtbar schalten und über VB steuern.
Die Datei in der Filelistbox doppelt klicken und mit dem Mediaplayer abspielen kann so aussehen. Der Code ist getestet, funktioniert bei mir.
Gruß Rainer
Option Explicit
Private Sub File1\_DblClick()
Dim Pfd As String, Datei As String
Pfd = File1.Path
If Right(Pfd, 1) "\" Then
Pfd = Pfd & "\"
End If
Datei = Pfd + File1.List(File1.ListIndex)
WindowsMediaPlayer1.URL = Datei
End Sub
Private Sub Form\_Load()
File1.Path = "D:\"
End Sub
Vielen Lieben Dank!!
Endlich mal ein Forum wo Leute angemeldet sind die was davon verstehen
ich hab jetzt schon einige Foren gefunden die den WindowsMediaPlayer besprochen haben aber alle codes die dort eingestellt waren haben nicht Funktioniert
Können sie mir auch noch sagen wie man diese hässliche animation im player wegmachen kann?
Hallo,
Können sie mir auch noch sagen wie man diese hässliche
animation im player wegmachen kann?
Wieviel vom Mediaplayer zu sehen ist, bestimmt man doch schon, wenn man den auf die Form legt. Du kannst aber auch nachträglich noch die Eigenschaft ‚.Height‘ einstellen. Bei mir wird mit …
WindowsMediaPlayer1.Height = 675
… nur noch genau die Menüleiste gezeigt.
Gruß Rainer
Perfekt Danke
Jetzt leider noch eine letzte Frage
kann man aus der Datei die immoment abgespielt wird die bitrate auslesen?
ich hab das schon beim Mediaplayer RechteMaustaste\Eigenschaften gelesen
doch ich möchte es gerne in ein Textfenster schreiben lassen
Nochmal Danke
Hallo,
Jetzt leider noch eine letzte Frage
kann man aus der Datei die immoment abgespielt wird die
bitrate auslesen?
sorry, das weiß ich nicht. Das geht bestimmt, ich weiß aber noch nicht wie. Wenn ich’s noch finde, melde ich mich noch einmal.
Gruß Rainer
Hallo,
die Information über die Sampelrate steckt im Header der .mp3 Datei.
Den zu lesen und auszuwerten ist eine etwas kompliziertere Angelegenheit. Die Sampelrate steht nicht als Wert im Header, sondern als Schüssel. Die Bedeutung des Schlüssels ist aber abhängig vom Layer.
Sieh mal bei Wiki nach Mp3 Header, da wird es erklärt.
Ein Programm, das den Header liest habe ich bei AVB gefunden, das macht bei mir aber Probleme.
http://www.activevb.de/tipps/vb6tipps/tipp0487.html
Weitere Programme für den Zweck habe ich bei http://www.PlanetSourceCode.com gefunden, aber nicht getestet.
Nach MP3 Header suchen kannst Du dort ja selbst.
Der Aufwand ist recht hoch …
Gruß Rainer
Danke ich werde mich mal drann versuchen