Menampilkan waktu di delphi

Untuk menampilkan tanggal atau waktu atau keduanya di delphi secara real time
anda bisa menggunakan Komponen Timer pada event OnTimer.
berikut ini tutorial singkatnya (saya menggunakan delphi 7) :

  • Buat sebuah project baru di delphi. tambahkan sebuah komponen Label dan
    sebuah komponen Timer (ada di tab System)
  • Set property Interval komponen Timer
    menjadi 100 atau berapa saja (satuan dalam milli second) lebih kecil interval yang diberikan,
    lebih cepat event OnTimer dieksekusi
  • Tambahkan perintah berikut pada Event OnTimer komponen Timer

//

label1.Caption :=
formatdatetime(‘"Tanggal : "dd/mm/yyyy’,now)+chr(10)+
formatdatetime(‘"Pukul : "hh:nn:ss’,now);
label1.Refresh;

//

Perhatikan tanda petik ‘ dan “ ,

Trackback URI | Comments RSS

Leave a Reply