Mungkin aplikasi yang anda bayangkan sudah seperti aplikasi pemutar musik yang sudah tenar sepertiwinamp, mp3 jet, dan lainnya, namun kali ini kita akan membahas dasar dalam cara memainkan musik dengan bahasa pemrograman delphi 7, yang mana nantinya apabila dasar sudah anda ketahui tentunya akan mudah untuk kedepannya.
Oke langsung saja, Cara membuat aplikasi pemutar music dengan delphi 7
1. Pertama-tama, silahkan anda buat form seperti dibawah ini :
Keterangan :
- Button : ambil dari tab Standar
- Mediaplayer : ambil dari tab System
- Opendialog : ambil dari tab Dialog
No
|
KOMPONEN
|
NAMA
|
CAPTION
|
1
2
3
4
5
6
|
Button
Button
Button
Opendialog
Mediaplayer
Edit Text
|
Button1
Button2
Button3
Opendialog1
Mediaplayer1
Edit1
|
Mainkan
Stop
Pilih Lagu
-
-
Edit1 (text) (biarkan saja atau kosongkan)
|
3. Dan apabila sudah kita masuk ke bagian program.
Klik 2x button 1 "Mainkan" dan masukkan program dibawah :
mediaplayer1.FileName:=opendialog1.Filename;
MediaPlayer1.open;
MediaPlayer1.play;
MediaPlayer1.open;
MediaPlayer1.play;
Klik 2x button 2 "Stop" dan masukkan program dibawah :
mediaplayer1.stop;
Klik 2x button 3 "Pilih Lagu" dan masukkan program dibawah :
Dan selesai, anda sudah bisa menikmati pemutar lagu anda sendiri, dan cara menjalankannya adalah dengan klik Run atau tekan tombol F9, Jika cara sederhana diatas sudah berhasil anda lakukan, selanjutnya kita akan belajar cara menambah volume dan playlist di artikel diberikutnya, selamat mencoba :)
opendialog1.Execute;
edit1.Text:=opendialog1.FileName;
edit1.Text:=opendialog1.FileName;

