Seite 1 von 3 123 LetzteLetzte
Ergebnis 1 bis 10 von 27
  1. #1
    Crew mitglied der Code883 Avatar von sunny-boy3
    Registriert seit
    02.01.2009
    Beiträge
    162

    Standard Vb.net mp3 abspielen (als eingebundene Resource)

    Hallo weiß jemand von euch wie ich in vb.net eine als resource eingebundene mp3 als hintergrund musik laufen lassen kann???

    wie es bei wave geht weiß ich will es aber mit einer mp3 machen vielen dank schonmal in vorraus
    Geändert von sunny-boy3 (14.07.2009 um 14:59 Uhr)

  2. #2

    Registriert seit
    17.06.2009
    Beiträge
    559

    Standard

    Ich glaube, dass das ohne viele Umwege nicht so einfach möglich ist. (Ich lasse mich aber auch gerne eines Besseren belehren )

    Du tust gut daran, die Datei vor dem Abspielen kurz auf die HDD zu schreiben und dann später ggf. wieder zu löschen.
    Geändert von inout (14.07.2009 um 15:06 Uhr) Grund: typo ;)

  3. #3
    Crew mitglied der Code883 Avatar von sunny-boy3
    Registriert seit
    02.01.2009
    Beiträge
    162

    Standard

    Zitat Zitat von inout Beitrag anzeigen
    Ich glaube, dass das ohne viele Umwege nicht so einfach möglich ist. (Ich lasse mich aber auch gerne eines Besseren belehren )

    Du tust gut daran, die Datei vor dem abspielen kurz auf die HDD zu schreiben und dann später ggf. wieder zu löschen.

    Da bin ich noch nicht drauf gekommen natürlich wen es eine bessere lösung gibt dan wäre es natürlich nocht schöner

  4. #4
    CIH-Virus Avatar von krusty
    Registriert seit
    12.10.2008
    Beiträge
    445

    Standard

    es gibt auf youtube ein video, wie man mp3 per api abspielen kann =$ kannst ja mal schaun... ist gut erklärt.

  5. #5
    Anfänger
    Registriert seit
    24.11.2008
    Beiträge
    23

    Standard

    Dies sollte entweder über Directsound (Teil von DirectX) oder das WindowsMediaPlayer-Steuerelement realisierbar sein.

  6. #6
    Crew mitglied der Code883 Avatar von sunny-boy3
    Registriert seit
    02.01.2009
    Beiträge
    162

    Standard

    Habe jetzt das windows media Control eingesetzt und die mp3 als resource hinzugefügt habe diese code um das ganze zu kopieren In einen Pfad


    Dere media player funzt aber iwie nicht bei mir immer wen ich debug machenwill kommt diese fehlermeldung:


    Fehler beim Erstellen des Formulars. Weitere Informationen finden Sie in Exception.InnerException. Fehler: Klasse nicht registriert (Ausnahme von HRESULT: 0x80040154 (REGDB_E_CLASSNOTREG)).
    Geändert von sunny-boy3 (14.07.2009 um 15:55 Uhr)

  7. #7
    Da N!nja oder so :> Avatar von DarkFire
    Registriert seit
    23.09.2008
    Beiträge
    424

    Standard

    So hab ich das gemacht... =/

    Dim Pfad As String = Environment.GetFolderPath(Environment.SpecialFolde r.MyMusic)
    Dim Res() As Byte = My.Resources.SAW3
    IO.File.WriteAllBytes(Pfad & "\Music.mp3", Res)
    WMP.URL = Pfad & "\Saw.mp3"
    <o_O>wenn man einen bot mit .net schreibt, dann hat man automatisch ein bot.net
    Zitat Zitat von IRC
    <Freepler>weil du unter 1k posts hast
    <Freepler>und keinen rang
    <Freepler>deswegen hast du einen kleinen penis
    <Freepler>und ich steh nicht auf jungs mit kleinen penisen
    Armes Freepler.


  8. #8
    Crew mitglied der Code883 Avatar von sunny-boy3
    Registriert seit
    02.01.2009
    Beiträge
    162

    Standard

    Zitat Zitat von DarkFire Beitrag anzeigen
    So hab ich das gemacht... =/

    Leider kommt bei meinen media player immer eine Fehlermeldung

  9. #9
    Capt'n Crunch Avatar von hackerking
    Registriert seit
    08.11.2008
    Beiträge
    964

  10. #10

    Standard

    du musst die datei erst droppen und dann abspielen, siehe hier:
    Code:
    Option Explicit On
    Public Class Form1
        Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpszCommand As String, ByVal lpszReturnString As String, ByVal cchReturnLength As Long, ByVal hwndCallback As Long) As Long
        Private Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal cchBuffer As Long) As Long
    
        Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
            mciSendString("stop MyMP3", 0, 0, 0)
            mciSendString("close MyMP3", 0, 0, 0)
        End Sub
    
        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            IO.File.WriteAllBytes("test.mp3", My.Resources.Guns)
            If mciSendString("open " & "test.mp3" & " type MPEGVideo alias MyMP3", 0, 0, 0) = 0 Then
                mciSendString("play MyMP3 from 0", 0, 0, 0)
            End If
        End Sub
    End Class

  11. Folgende Benutzer haben sich für diesen Beitrag bedankt:

    Bl1zz4rD (29.05.2010)

Seite 1 von 3 123 LetzteLetzte

Stichworte

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • Anhänge hochladen: Nein
  • Beiträge bearbeiten: Nein
  •