"Ilmu yang bermanfaat" adalah salah satu kunci naungan Allah kepada kita di padang Masyar.

Aplikasi Hari dan Tanggal Menggunakan Delphi



*      Aplikasi Hari dan Tanggal
Perhatikan Gambar 4.21 di bawah ini!
Program aplikasi ini merupakan program aplikasi yang menampilkan Jam, Tanggal, dan Kalender. Tiga komponen tersebut secara otomatis berfungsi mengikuti pengaturan yang ada di komputer/labtop anda.
 
Langkah langkah Kerja :
  1. Letakkan 2 komponen Label, 1 komponen MonthCalender, dan 2 komponen Timer pada sebuah Form.
  2. Aturlah letak komponen komponen tersebut pada Form seperti gambar di bawah ini :
Gambar 4.22 Desain Program Aplikasi Jam & Tanggal
  1. Kemudian ubahlah property komponen komponen di atas seperti pada tabel berikut ini:
Tabel 4.1 Daftar Komponen Program Aplikasi Jam dan Tanggal
Komponen
Tab
Nomor
Properti
Nama/Judul
Form
-
-
Caption
Aplikasi Jam & Tanggal
Label
Standard
1
Caption
Kosongkan *
2
Caption
Kosongkan
MonthCalender
Win32
1
-
-
Timer
System
1
-
-
2
-
-
* setiap ada kata (Kosongkan), ini perintah untuk menghapus nama komponen tersebut di Caption yang ada di tab Standard.
  1. Klik ganda pada komponen Timer1 dan ketikkan sintak berikut ini :
procedure TForm1.Timer1Timer(Sender: TObject);
begin
LABEL1.Caption:='JAM : ' + TIMETOSTR(NOW);
end;
  1. Klik ganda pada komponen Timer2 dan ketikkan sintak berikut ini:
procedure TForm1.Timer2Timer(Sender: TObject);
begin
LABEL2.Caption:='TANGGAL : ' + DateToStr(NOW);
end;
  1. Terakhir silahkan eksekusi program aplikasi anda dengan meng-klik komponen Run pada Toolbar atau tekan tombol F9 pada keyboard. Maka akan tampil jendela berikut ini:
Gambar 4.23 Hasil Eksekusi Program Aplikasi Jam & Tanggal
  1. Simpanlah Program Aplikasi anda melalui: File à Save All, tempatkan di (D:). Simpan dengan nama folder Praktikum Delphi I-a, klik OK.

No comments:

Post a Comment