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

Jaranguda

Belajar Mengajar

  • Home
  • Sponsor/Jasa
  • Tentang

Menghitung Usia/Umur dengan Delphi

Last Updated on 2 February 2013 By tommy Leave a Comment

Buat design aplikasinya seperti gambar dibawah ini
design umur delphi

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
program hitung usia delphi
hasil perhitungan usia

Tulisan menarik lainnya

  • Menghitung Umur dengan Gambas

    Buat design program seperti gambar dibawah ini Komponen yang digunakan 2 buath TextBox 1 Buah…

  • Menghitung Gaji Karyawan dengan Delphi

    Gaji yang akan kita hitung mempunyai aturan sebagai berikut : 1. Pengguna menginput data gaji…

  • 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 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: delpi xe, source code, umur

Reader Interactions

Leave a Reply Cancel reply

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

Primary Sidebar

Pencarian

Tanya Jawab tentang DevOps SRE CPE, gabung di https://t.me/devopsindonesia

Terbaru

  • Cara Mengganti Port Screen Sharing macOS
  • Cara Menonaktifkan Pager di macOS
  • Cara Mengupdate Nama Apple silicon-as-a-Service Scaleway
  • Cara Force Delete Namespace di Kubernetes
  • Install PHP MariaDB di Mac Monterey

Komentar

  • mazda on Tutorial Lengkap Install Mail Server Postfix Dovecot MariaDB di CentOS 7
  • adi on Menggunakan Mikrotik Sebagai SSH Client
  • aris u on Solusi Simple Queue Mikrotik Tidak Berjalan
  • Bowo on Cara Mematikan SSID Molecool Balifiber
  • aris on Solusi Simple Queue Mikrotik Tidak Berjalan

Tulisan Populer

  • Password Router Huawei HG8245H5 Indihome 1.2m views
  • Password Terbaru ZTE F609 Indihome 784.5k views
  • Password Superadmin Huawei HG8245A 318.2k views
  • Cara Setting Manual Modem GPON ZTE F609 Indihome 273k views
  • Cara Setting Wireless ZTE F609 Indihome 257.1k views
  • Mengaktifkan Port LAN di Huawei HG8245 Indihome 169.8k views
  • Akses UseeTV Indihome via Wireless ZTE F609 156.8k views
  • Kemana Menghilangnya Saldo BCA 50 ribu 153.1k views
  • Cara Reset Password ZTE F609 Indihome 147.5k views
  • Cara Setting DHCP Server Modem/Router ZTE F609 113.5k views

Kategori

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

Sponsor

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