Prüfen ob auf iTunes oder WMP Musik abgespielt wird

  • VB.NET

    Prüfen ob auf iTunes oder WMP Musik abgespielt wird

    Guten Abend zusammen,
    möchte gerne ein kleines Tool schreiben welches erkennt ob iTunes grade ein Lied abspielt... Das wäre das Primäre Ziel. Sekundär wäre auch noch interessant die selbe Funktion für den WMP auf zu stellen.
    Ich bräuchte quasie den Play/Pause Status...

    Alternativ könnte ich natürlich auch eine Funktion brauchen die ausließt ob allgemein auf dem Rechner grade Sounddateien abgespielt werden...

    Danke für eure hilfe :thumbsup:


    Habe mein Wunsch jetzt mit dem Pegel vom Mikrofon erreicht:

    VB.NET-Quellcode

    1. Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal Command As String, Optional ByVal ReturnString As String = " ", Optional ByVal ReturnLength As Integer = 0, Optional ByVal Callback As Integer = 0) As Integer
    3. Dim rs As String ' Returnstring
    4. Dim SoundLevel, Mode As New String(" ", 20)
    6. Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    7. Call mciSendString("Open New Type waveaudio Alias MySound", rs, 128, 0)
    8. Call mciSendString("record MySound", rs, 128, 0)
    9. Call mciSendString("Stop MySound", rs, 128, 0)
    10. Timer1.Enabled = True
    11. End Sub
    13. Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    14. Dim cb As Integer = 0
    15. Call mciSendString("status MySound level", SoundLevel, 20, cb)
    16. Label2.Text = Val(SoundLevel)
    17. ProgressBar1.Value = Val(SoundLevel)
    19. End Sub


    Genau so soll es jetzt mit dem Pegel der Soundkarte realisiert werden (Für Leute die kein Mikrofon haben wäre meine Lösung ja auch eher Suboptimal!!)
    ALSO BITTEE... HELFT MIR :(

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „DrVisualBasic“ ()

Facebook
Telefonspende