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
Habe mein Wunsch jetzt mit dem Pegel vom Mikrofon erreicht:
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
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
Habe mein Wunsch jetzt mit dem Pegel vom Mikrofon erreicht:
VB.NET-Quellcode
- 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
- Dim rs As String ' Returnstring
- Dim SoundLevel, Mode As New String(" ", 20)
- Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- Call mciSendString("Open New Type waveaudio Alias MySound", rs, 128, 0)
- Call mciSendString("record MySound", rs, 128, 0)
- Call mciSendString("Stop MySound", rs, 128, 0)
- Timer1.Enabled = True
- End Sub
- Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
- Dim cb As Integer = 0
- Call mciSendString("status MySound level", SoundLevel, 20, cb)
- Label2.Text = Val(SoundLevel)
- ProgressBar1.Value = Val(SoundLevel)
- 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“ ()