AÇIKLAMA

C++ Builder 6 ile uyumludur.

Bu projemizde MediaPlayer nesnesi içerisinde video dosyalarının oynatılması sağlanmıştır. OpenDialog nesnesi yardımıyla seçeğiniz uygun formattaki video dosyasını (mpg,mpeg, bazi avi dosyaları) açabilirsiniz. Açılan video dosyasının üzerinde (video Panel bileşeni içerisinde oynamaktadır kodda Panel nesnesinin doubleclick olayına yazılmıştır) çift tıklayarak tam ekran moduna çift tıklayarak eski haline geçebilirsiniz. Burada yine codec sorunları karşımıza çıkmaktadır. Oynatabileceği bazı dosyalar belirtilmiş peki neden bazı aviler denilmiştir. Her avi dosyası aynı değildir. Farklı avi kodlama teknikleri (algoritmaları) bulunmaktadır. Bu sebeple bir mediaplayer dosyasının her avi dosyasını açmasını da bekleyemezsiniz. Bu yine içerisinde bulunan codeclerle alakalıdır. 

Programın Tamamını Aşağıdaki Linkten İndirebilirsiniz

Linki Görebilmeniz İçin Üye Olmanız Gerekmektedir...

Üye Kayıt

Program Kodu:

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
int formgenis,formyuksek,panelsol,panelyuk,panelwidht,panelheight;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
OpenDialog1->Filter=" AVI Dosyaları|*.avi| Tüm Dosyalar|*.*";
if(OpenDialog1->Execute())
{
formgenis=Form1->Width;
formyuksek=Form1->Height;
panelsol=Panel1->Left;
panelyuk=Panel1->Top;
panelwidht=Panel1->Width;
panelheight=Panel1->Height;
MediaPlayer1->FileName=OpenDialog1->FileName;
MediaPlayer1->Open();
MediaPlayer1->DisplayRect=Rect(0,0,Panel1->Width,Panel1->Height);
MediaPlayer1->Display=Panel1;
MediaPlayer1->Play();
}
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Panel1DblClick(TObject *Sender)
{
int static x=0;
x++;
if(x%2==1)
{
int nerde=MediaPlayer1->Position;
MediaPlayer1->Close();
Button1->Visible=false;
Form1->BorderStyle=bsNone;
Form1->WindowState=wsMaximized;
Panel1->Left=0;
Panel1->Top=0;
Panel1->Width=Form1->Width;
Panel1->Height=Form1->Height;
MediaPlayer1->Open();
MediaPlayer1->DisplayRect=Rect(0,0,Form1->Width,Form1->Height);
MediaPlayer1->Display=Panel1;
MediaPlayer1->Position=nerde;
MediaPlayer1->Play();
}
else
{
int nerde=MediaPlayer1->Position;
MediaPlayer1->Close();
Button1->Visible=true;
Form1->WindowState=wsNormal;
Form1->BorderStyle=bsSingle;
Form1->Width=formgenis;
Form1->Height=formyuksek;
Panel1->Left=panelsol;
Panel1->Top=panelyuk;
Panel1->Height=panelheight;
Panel1->Width=panelwidht;
MediaPlayer1->Open();
MediaPlayer1->DisplayRect=Rect(0,0,Panel1->Width,Panel1->Height);
MediaPlayer1->Display=Panel1;
MediaPlayer1->Position=nerde;
MediaPlayer1->Play();
 
}
}
//---------------------------------------------------------------------------