Hallo Alex
Die Unterstellung stimmt und das mit dem Media-Control klingt echt gut.
Wie funktioniert das?
Also, bevor ich anfange: Wir reden hier über VB6.
Falls Du (wie ich) keine Ahnung von API hast und doch lieber mit dem Control arbeiten möchtest, kannst Du das so machen:
Öffne das Formular, auf dem das MM-Control gebraucht wird.
Klicke im Menü ‚Projekt‘ auf ‚Komponenten‘.
Suche in der Liste das ‚Microsoft Multimedia Control‘ und setze dort das Häkchen.
Beende den Dialog mit ‚Ok‘, dann steht Dir in Deiner Werkzeugsammlung das Control zur Verfügung.
Ziehe ein MM-Control auf Dein Formular.
Wechsle jetzt zum Code-Fenster des Formulares und schreibe folgenden Code ins ‚Form_Load‘-Ereignis:
MMControl1.DeviceType = "WaveAudio"
MMControl1.FileName = 'Pfad\Dateiname.wav
MMControl1.Command = "Open"
Danach folgenden Code in das ‚Done‘-Ereignis des MM-Controls schreiben:
MMControl1.Command = "Seek"
Danach folgenden Code in das ‚Form_QueryUnload‘-Ereignis schreiben:
MMControl1.Command = "Close"
Die Anweisung zu Abspielen der Sound-Datei lautet
MMControl1.Command = "Play"
Soweit erstmal. Dieses Beispiel ist für Wave-Dateien. Und wie gesagt, ich weiß nicht, ob mp3 unterstützt wird.
VG
Carsten