Tutorial Delphi : Membuat Aplikasi Penghitung Umur
Buat design aplikasinya seperti gambar dibawah ini
2 buah TLabel
1 buah TButton
1 buah datetimepicker
1 buah Tedit
klik dua kali pada tombol hitung, lalu masukkan script
var umur, tl, ts: Integer; begin tl := Yearof(Now); ts := YearOf(DateTimePicker1.Date); umur := tl -ts; edit2.Text := IntToStr(umur);
klik dua kali pada form, tambahkan script dibawah ini
edit2.clear
Jalankan aplikasi diatas dengan menekan tombol F9 di keyboard
sumber : jaranguda
Demikian yang dapat kami share kepada sobat source code aplikasi pada kesempatan ini, semoga dapat bermanfaat dan bisa menjadi referensi pemrograman bagi anda. Jangan lupa like Fan Page kami, dan SUBSCRIBE Channel Youtube kami untuk dapatkan update source code aplikasi terbaru.