Hitung Umur dengan delphi

Source code hitung umur. Walaupun sudah sangad banyak cara hitung umur terutama dengan delphi, ane berharap source code ini bisa sedikit membantu untuk yang sedang belajar delphi walapun masih banyak kekurangannya. Silakan untuk dikembangkan.
Pada dasarnya cara menghitung umur adalah dengan mengurangkan tanggal sekarang dengan tanggal lahir untuk mengetahui selisih jumlah hari diantara keduanya. Dalam source code ini, ane memodifikasi sebuah fungsi yaitu

Result:= Trunc(TglNew - TglOld);
sebagai berikut :

function SelisihTanggal(TglOld,TglNew: TDate): Integer;
begin
Result:= Trunc(TglNew - TglOld);
end;

fungsi tersebut di tulis dibawah :

implementation

{$R *.dfm}


Download Source Code :


2 comments on Hitung Umur dengan delphi :

sho dikin said... on 16 December 2012 at 21:59

kenapa harus di donwnlod pak

RaniRara said... on 11 March 2017 at 02:12

matur suwun infonya..tp kira2 kalau dibalik script nya gmn ya? Misal sekarang umur saya 30 tahun..maka tanggal lahir saya brp?

Post a Comment

Pages

next page