Tapi kalo kita bikin program emutar video itu sendiri gimana ya rasanya ??
Walaupun seadnya, tapi kan membanggakan tuh. Penasaran ??
Ikuti langkah-langkah ku ya kawan.
Langkah pertama, so pasti software Borland C++ Builder 6 (saya rekomendasikan) wajib dan kudu ter install di PC kamu. Abiz tu, bikin form baru pada Borland C++ Builder 6 tersebut
Tambahkan Properti : Button, OpenDialog, MediaPlayer, dan Panel seperti dibawah:
Pada Komponen OpenDialog, isikan properti “Filter” dengan parameter : File AVI (*.avi) | *.avi File DAT (*.dat) | *.dat. Dan pda Properti Panel, ganti properti Color dengan clBlack
Klik ganda pada event OnClick Button 1, dan isikan syntaks dibawah:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
if(OpenDialog1->Execute())
{
//memasukkan nama file yang terdapat pada OpenDialog
//ke Media Player
MediaPlayer1->FileName=OpenDialog1->FileName;
try
{
MediaPlayer1->Open();
}
catch(...)
{
MessageBox(0,"File tidak dapat dibuka","kesalahan",MB_ICONERROR|MB_OK);
}
}
}
//---------------------------------------------------------------------------
Kemudian pada komponen MediaPlayer, klik ganda pada event OnClick nya, isi syntax ini:
void __fastcall TForm1::MediaPlayer1Click(TObject *Sender,
TMPBtnType Button, bool &DoDefault)
{
if(Button==btPlay)
{
MediaPlayer1->DisplayRect=Rect(0,0,Panel1->Width,Panel1->Height);
}
else
{
DoDefault=true;
}
}
//---------------------------------------------------------------------------
Pada Event OnClick PANEL, isi syntaks ini:
void __fastcall TForm1::Panel1Click(TObject *Sender)
{
MediaPlayer1->Pause(); //untuk menghentikan film jika panel1 di klik
}
//---------------------------------------------------------------------------
Simpan Hasil kerja anda dan jalan kan (RUN) dengan menekan tombol F9.
Hasil jadinya seperti dibawah:
Selamat mencoba ya kawan, semoga bermanfaat dan lain kali akan saya posting hal-hal baru tentang dunia pemrograman
Kalo file Musik jg bisa ya ?
BalasHapus