Posted inDelphi

Menghitung Usia/Umur dengan Delphi

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 […]