Cara Membuat Jam Digital di Delphi

Cara Membuat Jam Digital di Delphi

Ok kawan, Sambil Mendengarkan Musik Syahdu dari mas DIDI KEMPOT dengan Judul CAPING GUNUNG , yang ingin mendengarkan bisa  

 Download disini  

 saya mau menjelaskan cara membuat jam digital di delphi 2010. Tidak usah panjang lebar lagi ceritanya, kita langsung saja ke ............T......K......P.......

1.      Bukalah Delphi anda dan buatlah projeck baru dengan cara

( klick File => New => Vlc Form Aplication Delphi )

Screen Shootnya, mohon di perbesar / klik saja jika tidak jelas gambarnya.

2.      Pada pallet tools, pilihlah Standart, dan pilih Tlabel. Kemudian klik sambil geser ke Form.

Screen Shootya :

3.      Kemudian Atur Tulisanya sesuka hati seperti pada screen shoot dibawah ini :

4.      Kemudian, atur Font, Warna  pada Panel Object Inspector. Dengan pilih Labelnya yang sudah dimasukan ke forum dan lihat di Panel Object Inspector, pada iri bawah.

Lihat Screen Shootnya:

Keterangan:

a.      Untuk lingkaran yang warna merah adalah untuk membuka Font dialog.

b.      Warna Biru untuk memilih tampilan font,

c.       Warna kuning, untuk memilih warna font/ tulisan,

d.      Warna hijau untuk ukuran tulisan.

e.      Klik OK

5.      Tambahkan Item Ttimer pada Pallet Tools.

Screen shootnya :

a.      Warna Merah, menambahkan item Ttimer dengan cara

( Pilih System => Ttimer ) klik dan geser ke form agar nampak seperti pada Lingkaran yang kuning

6.      Kemudian atur Enablenya agar tru dengan cara , pada object inspector pilih enable dan ubah biar True.

Screen Shootnya :

Keterangan:

a.      Warna orange untuk merubah enablenya agar Tru,

b.      Warna merah, Dobel klik pada Timer ( yang dilingkari Merah ).

Kemudian tuliskan Kode berikut:

7.      Setelah di dobel klik, ketikan kode berikut dibawah Begin

Label1.Caption:=timetostr(time);

Screenshootnya :

Keterangan:

a.      Warna merah adalah penempatan kodenya.

b.      Warna hijau untuk menjalankan hasilnya, klik saja tanda segitiga Hijau.

c.       Warna kuning untuk Hasilnya.

Penjelasan Koding:

            Disini, untuk koding

Label1.Caption:=timetostr(time);

Label1.caption ( adalah nama label atau tulisanya, untuk captionya adalah tipe tulisanya)

Timetostr(time); (Adalah merubah dari bentuk Waktu ke Tulisan atau STRING)

Sekian dulu pembelajaran hari ini, semoga artikel ini bermanfaat untuk kita semua...

Tunggu postingan selanjutnya..........

===================================================================

Untuk E-booknya Bisa Download Disini :

E-book Cara membuat jam digital pada Delphi

Size : 617 kb

format : PDF

=====================================================================