• Skip to primary navigation
  • Skip to main content
  • Skip to primary sidebar

Jaranguda

Belajar Mengajar

  • Home
  • Sponsor/Jasa
  • Tentang
Home » Membuat Pemutar Musik MP3 dengan Delphi

Membuat Pemutar Musik MP3 dengan Delphi

Last Updated on 18 January 2013 By tommy 1 Comment

Tutorial ini menggunakan Delphi XE, dan penggunaan di Delphi 7 atau versi lainnya seharusnya tidak ada masalah, karena tidak ada menggunakan komponen diluar bawaaan delphi.

Buat design aplikasi pemutar musik seperti gambar dibawah ini
design pemutar musik delphi

Komponen yang digunakan
1 Mediaplayer
1 Tedit
1 Progressbar
1 timer
1 timage
1 timer
1 listbox
1 Opendialog
1 TLabel
setelah selesai mendesign, sekarang waktunya untuk menulis script agar aplikasi pemutar lagu tersebut dapat berjalan.
Klik dua kali pada tombol pilih mp3 dan ketik script dibawah ini

if OpenDialog1.Execute then
begin
edit1.Text:=opendialog1.FileName;
ListBox1.Items:=OpenDialog1.Files;
ProgressBar1.Max:=0;
MediaPlayer1.Close;
MediaPlayer1.FileName:=edit1.Text;
MediaPlayer1.Open;
ProgressBar1.Max:=MediaPlayer1.Length;
end;

Listbox berada di bawah tulisan Klik untuk memutar lagu : klik dua kali pada listbox dan tambahkan script

MediaPlayer1.Play;

lanjutkan dengan mengklik pada timer, tambahkan script dibawah ini

if ProgressBar1.Max<>0 then
ProgressBar1.Position:=MediaPlayer1.Position;
end;

untuk menyembunyikan Mediaplayer, klik dua kali pada form lalu tambahkan script

MediaPlayer1.Enabled:=False;

Jalankan program dengan menekan tombol F9 di keyboard. Tampilannya seperti gambar dibawah ini
tampilan pemutar lagu mp3
Contoh tampilan aplikasi sewaktu memutar MP3
tampilan pemutar lagu mp3

Download source code :

Download “Pemutar Lagu Delphi” mp3-player.zip – Downloaded 576 times – 178 B


Tulisan menarik lainnya

  • Membuat Program Launcher dengan Delphi XE

    Setelah di tulisan sebelumnya https://jaranguda.com/membuat-program-launcher-dengan-gambas/ kita menggunakan Gambas, maka sekarang kita akan mencoba membuat aplikasi…

  • Membuat Aplikasi Konversi Kilobyte, Megabyte Ke Byte dengan Delphi

    Versi Delphi yang saya gunakan adalah Delphi XE, tetapi aplikasi ini bisa berjalan di semua…

  • Membuat Program Aritmatika dengan Delphi XE

    Program yang akan kita buat disini adalah aritmatika (tambah, kurang, kali dan bagi) dan source…

  • Membuat Login dengan Delphi XE tanpa Database

    Buat design form seperti gambar dibawah ini komponen yang digunakan 2 TEdit, 2 TLabel dan…

Filed Under: Delphi Tagged With: aplikasi, pemutar mp3, source code

Reader Interactions

Leave a Reply Cancel reply

Your email address will not be published. Required fields are marked *

Primary Sidebar

Pencarian

Komentar

  • Nafies Luthfi on Balifiber Memblokir Port SSH/22
  • Eli setiawan on Cara Redirect Domain di Cloudflare
  • Sipriyadi on Password Router Huawei HG8245H5 Indihome
  • Bidadari on Kemana Menghilangnya Saldo BCA 50 ribu
  • Cecilia on Kemana Menghilangnya Saldo BCA 50 ribu

Terbaru

  • Cara Lengkap Install Docker dan Minikube di Linux
  • Cara Membuat Docker Image dengan Dockerfile
  • Cara Setting Wake On LAN di Debian Linux
  • Cara Lengkap Install VirtualBox 6 di Debian 10
  • Cara Setting Variable Environment di Linux

Tulisan Populer

  • Password Terbaru ZTE F609 Indihome 768.8k views
  • Password Router Huawei HG8245H5 Indihome 646.3k views
  • Cara Setting Manual Modem GPON ZTE F609 Indihome 246.8k views
  • Password Superadmin Huawei HG8245A 237.5k views
  • Cara Setting Wireless ZTE F609 Indihome 231.1k views
  • Mengaktifkan Port LAN di Huawei HG8245 Indihome 149.2k views
  • Akses UseeTV Indihome via Wireless ZTE F609 147.3k views
  • Cara Reset Password ZTE F609 Indihome 140.7k views
  • Mengubah Modem Wireless Router Menjadi Access Point 99.7k views
  • Cara Setting DHCP Server Modem/Router ZTE F609 97.2k views

Kategori

  • Delphi
  • dll
  • Gambas
  • Internet
  • Java
  • Lazarus
  • Linux
  • PHP
  • Review
  • Teknologi

Sponsor

kadal.id
Untuk jadi sponsor, hubungi kita lewat halaman sponsor
© 2020. Jaranguda
  • Linux
  • PHP
  • Internet
  • Teknologi
  • Delphi
  • Gambas
  • Java