Menampilkan Jam dan Tanggal dengan Delphi

Kali ini kita akan membahas aplikasi pada Delphi 7. Aplikasi yang akan kita bahas adalah bagaimana menampilkan jam dan tanggal secara real time pada form Delphi. Berikut capture tampilannya.

Berikut ini langkah-langkah pembuatannya :

1. Buka Delphi, kemudian ambil 2 buah komponen Panel pada Komponen Pallete Standard dan letakkan pada form delphi.
2. Atur property pada Panel1 dan Panel2 dengan bevelinner = bvRaised, bevelOuter = bvLowered, bevelWidth = 1, left = 8, Top = 8 (Panel1) 56 (Panel2), Height = 41, Width = 185, color = clBtnFace
3. Kemudian pada bagian var di editor tuliskan n:integer;
4. Kemudian pada event OnCreate form1 ketikkan perintah Panel1.Caption:=TimeToStr(time); dan Panel2.Caption:=DateToStr(date);
5. Ambil komponen Timer pada Komponen Pallete System dan letakkan pada form Delphi. Atur property Timer1 : Enabled = True dan Interval = 1000.
6. Kemudian pada event onTimer Timer1 ketikkan perintah Panel1.Caption:=TimeToStr(time); dan Panel2.Caption:=DateToStr(date);
7. Jika semua perintah sudah ditulis maka hasilnya akan seperti ini
   
    
8. Simpan project tersebut kemudian Run atau menekan F9. Jika semua perintah dan pengaturan property benar maka akan tampil seperti ini
   
   
   
   
   

   
   

   Demikian sedikit tutorial bagaimana menampilkan Jam dan tanggal dengan delphi7. Silakan dikembangkan lagi sesuai keinginan anda. Terima kasih.

   
   

   download aplikasi pdf 

   download delphi