[Vb 2008][How To]Audioplayer/Videoplayer

~~killeeer111~~ · 05/29/2010, 20:39

Hallo,

In diesem Tutorial möchte ich euch zeigen wie ihr einen Audio/Videoplayer programmiert, aber ohne Windows Media Player aus Toolbox!

1. Was brauchen wir?

2. Programm

Wir müssen 2 Verweise hinzufügen:

Microsoft.DirectX
Microsoft.DirectX.AudioVideoPlayback

jetzt müsst ihr die 2 importieren!

Code:

Imports Microsoft.DirectX ' Microsoft.DirectX importieren!
Imports Microsoft.DirectX.AudioVideoPlayback ' Microsoft.DirectX.AudioVideoPlayback importieren!

Jetzt solltet ihr eine Globale Variable anlegen:

Für Audio:

Code:

Private WithEvents Audio As Audio

Für Video:

Code:

Private WithEvents Video As Video

Zum Abspielen müsst ihr Audio oder Video definieren:

Für Audio:

Code:

Audio = New Audio("Pfad")    ' Das er weis welches lied er abspielen soll

Für Video:

Code:

Video = New Video("Pfad")   `Das er weis welche Musik er abspielen soll

Dann zum Abspielen:

Für Audio:

Code:

Audio.Play   'Musik abspielen

Für Video:

Code:

Video.Play  'Video abspielen

Beim Video Öffnet es normalerweise ein neues Fenster, aber wenn ihr wollt das es das im Panel abspielt braucht ihr den Code:

Code:

Video.Owner = Panel1        'Das das video im Panel 1 ist

Natürlich kann man auch Pausieren und Stoppen!
Audio:

Code:

Audio.Pause()  'Audio Pausieren
Audio.Stop()  'Audio Stoppen

Video:

Code:

Video.Pause() 'Video pausieren
Video.Stop()  'Video Stoppen

Lautstärke:

Für Audio:

Code:

Audio.Volume = 0    'Lautstärke einstellen, 0 ist das höchste, - 10000 das niedriegste

Für Video:

Code:

Video.Audio.Volume = 0    'Lautstärke einstellen, 0 ist das höchste, - 10000 das niedriegste

0 ist das Lauteste und -10000 das leisteste

Video:

Das Video wird noch verarbeitet, deswegen ist im Moment die Qualität noch nicht so gut.
BITTE ABBONIEREN! IN YOUTUBE!

BITTE THX DRÜCKEN!

ERGEBNIS:

Spoiler

mfg

Priince_D · 05/29/2010, 20:41

Ein Screen vom Ergebnis wäre nett :-)

~~killeeer111~~ · 05/29/2010, 20:45

Quote:

Originally Posted by xSuperherox3

Ein Screen vom Ergebnis wäre nett :-)

OK werde gleich screen reinstellen

Jay Niize · 05/29/2010, 20:53

sieht nice aus! Willst wohl dauerguides posten was? xD
Bekommst n Fettes THX

Auch wenn du wieder einmal die Sachen erklären könntest

#Added to List

wenn du es dort nicht haben willst -> PN

Greez Jusikid

~~killeeer111~~ · 05/29/2010, 21:02

#Update
Screen vom Ergebnis eingefügt

Jay Niize · 05/29/2010, 21:41

gut! kannst vll. noch ein bisschen mehr erklären?

~~killeeer111~~ · 05/29/2010, 21:44

Quote:

Originally Posted by Jusikid

gut! kannst vll. noch ein bisschen mehr erklären?

in den code kommentare einfügen?

amphetaminecoffee · 05/29/2010, 21:47

Wie man evt. das Design verbessert :>

Jay Niize · 05/29/2010, 21:52

Das solte man so schaffen

nein ich mein noch präzieser werden mit dem Code

Priince_D · 05/30/2010, 01:23

Vielleicht noch erwähnen, was man alles in die Form einfügen soll.. Wo welcher Code hingehört..

~~killeeer111~~ · 05/30/2010, 08:05

Quote:

Originally Posted by xSuperherox3

Vielleicht noch erwähnen, was man alles in die Form einfügen soll.. Wo welcher Code hingehört..

Das sollte eigentlich klar sein, dass zb. Audio.Play auf den Play button gehört

Achja,

EDIT

Kommentare im Code eingefügt

Jay Niize · 05/30/2010, 08:48

^Danke! sieht schon viel übersichtlicher und besser aus

antihackers · 06/04/2010, 19:01

ok nicq tut nur ich wüsste gerne wie man die lautstärke mit trackbar einstellt

~~killeeer111~~ · 06/04/2010, 19:42

dazu brauchst du nen timer namens timer1:

Bei Audio:

Code:

Audio.Volume = TrackBar1.Value

Bei Video:

Code:

Video.Audio.Volume = TrackBar1.Value

Achja, bei der trackbar muss maximale value 0 und minimale -10000 sein, die Value kannst dir ausuchen die beim start eingestellt ist, ich empfehle auf keinen fall was zwischen - 5000 und - 10000, das ist sehr leise

antihackers · 06/04/2010, 20:36

der code soll also in den timer
ich probier mal