kostenloser Webspace werbefrei: lima-city

mpg in picturebox abspielen

lima-city → Forum → Programmiersprachen → Basic

1. Autor dieses Themas

   k*********l

   12:57, 22.6.2005

   moin moin!
   
   also folgendes:
   ich m?chte ein mpg in einer picturebox in der selben form abspielen.
   ich habe gesucht und bin f?ndig geworden:
   
   

   Option Explicit
   
   ' Ben?tigte Objektvariablen
   Private VideoW As IVideoWindow
   Private Filgraph As FilgraphManager
   
   Private Sub Form_Load()
     ' FilgraphManager instanzieren
     Set Filgraph = New FilgraphManager
   End Sub
   
   Private Sub Command1_Click()
     Dim sPath As String
     
     ' Pfad zur Datei, die abgespielt werden soll
     sPath = "c:\windows\clock.avi"
     
     ' File laden
     Filgraph.RenderFile sPath
     
     ' Eigenschaften des Ausgabefenster
     Set VideoW = Filgraph
     With VideoW
       .Caption = "Fenstertitel"
       .Left = 0
       .Top = 0
       .FullScreenMode = False
       ' ...
     End With
   
     ' Abspielvorgang starten
     Filgraph.Run
   
     ' Objekt zerst?ren
     Set VideoW = Nothing
   End Sub
   
   Private Sub Command2_Click()
     ' Abspielvorgang stoppen
     Filgraph.Stop
   End Sub

   
   
   sch?n und gut, der kann sogar mpg's abspielen.
   aber wie kriege ich es hin, dass er das video in einer picturebox anzeigt und nicht in einem neuen fenster???

2. Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!

   lima-city: Gratis werbefreier Webspace für deine eigene Homepage

3. funkdoobiest

   funkdoobiest hat kostenlosen Webspace.

   13:15, 22.6.2005

   Unter C++ kannst das mit denn Befehlen machen:
   HWND MCIWndCreate(
   HWND hwndParent, //Hier der Handler von der PictureBox
   HINSTANCE hInstance,
   DWORD dwStyle, //MCIWNDF_NOMENU|MCIWNDF_NOOPEN
   LPSTR szFile //Dateienname
   );
   LONG MCIWndPlay(
   hwnd //Hier der Handler von der PictureBox
   );
   D?rfte auch unter VB funzen musst gucken oder mal die VB-Hilfe durchgucken. So und noch nen Beispiel wie dat geht.
   
   HWND hWnd = MCIWndCreate(PictureBox1->Handle, HInstance, MCIWNDF_NOMENU|MCIWNDF_NOOPEN, "vidoe.mpg");
   MCIWndPlay(hWnd);
   
   Also so w?rde es unter C++ gehn. Wie gesagt musst schaun was draus machst :D
4. Autor dieses Themas

   k*********l

   13:20, 22.6.2005

   danke f?r den tipp ich werds mal versuchen.
   
   edit:
   
   so, hab's geschafft.
   
   wei?t du zuf?llig wie ich das video auf die gr??e der picturebox skaliere?

5. b*********t

   18:07, 26.6.2005

   Vielleicht die Stretch-eigenschaft der pb auf True?
   Kannst du mir sagen, wo du den quellie oben herhast?

6. funkdoobiest

   funkdoobiest hat kostenlosen Webspace.

   19:53, 26.6.2005

   Wenn das jetzt mit der MCIWnd Funktion gemacht hast geht das ganz einfach: (is aber immer noch c++ code :D ma sehn ob dir was bringt)
   HWND hWnd = MCIWndCreate(PictureBox1->Handle, HInstance, MCIWNDF_NOMENU|MCIWNDF_NOOPEN|MCIWNDF_NOPLAYBAR, "d:\\MOV0.MPG");
   ShowWindow(hWnd, SW_MAXIMIZE); //<--hier wird das Video am Fenster angepasst
   MCIWndPlay(hWnd);
7. Autor dieses Themas

   k*********l

   14:57, 27.6.2005

   
   Vielleicht die Stretch-eigenschaft der pb auf True?
   Kannst du mir sagen, wo du den quellie oben herhast?
   

   
   
   die hatte ich zuerst als avi-player bei vb-archiv.de gefunden, hab dann etwas abge?ndert so dass es mpegs kann.

8. Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!

   lima-city: Gratis werbefreier Webspace für deine eigene Homepage

Dir gefällt dieses Thema?