Array – Nama Bulan

Tingkatan	Pemula
Kategori	Dasar
Sub Kategori	Array
Judul	Nama Bulan
Oleh	Nama Eko Indriyawan Domisili Surabaya – Darmo Satelit Delphi Delphi 2007 for Win32 YM eko_elits Email eko_elits@yahoo.com Telp 031 – 605 384 36
Referensi	by Eko Indriyawan
Tujuan	Memberikan wacana kepada pemula tentang bagaimana menggunakan array untuk menyimpan data nama bulan versi bahasa Indonesia.
	spasi
Overview	Artikel ini membahas tentang bagaimana menyimpan data nama bulan kedalam array, kemudian kita memanggilnya dengan cukup menggunakan parameter indek angka. Semoga contoh artikel ini bisa memberikan gambaran kepada pemula untuk membuat array sejenis ini untuk menyimpan data lain yang kemudian dipanggil berdasarkan indek. Apabila anda mengalami kesulitan dalam memahami artikel ini, langsung saja tanyakan permasalahan anda tersebut melalui email atau YM yang sudah ditunjukkan diatas. Kemudian, dari pembahasan dan program contoh yang sudah diberikan, diharapkan anda bisa mengembangkan sendiri untuk kebutuhan program yang akan anda buat.
	spasi
Petunjuk :	Silahkan anda ikuti langkah – langkah berikut ini dengan pelan – pelan agar bisa berjalan dengan lancar sesuai dengan petunjuk yang sudah diberikan.
	spasi
Langkah 1	Buat program aplikasi baru.
Langkah 2	Tambahkan beberapa object kedalam Form
	Edit1: TEdit; Edit2: TEdit; Label1: TLabel; Label2: TLabel; Button1: TButton;
	spasi
Langkah 3	Atur desainnya seperti berikut ditampilkan pada gambar form dibawah ini
	spasi
Langkah 4	Silahkan anda deklarasikan array statik pada bagian private. Untuk lebih jelasnya silahkan anda lihat potongan kode program dibawah ini.
	spasi
	… … private { Private declarations } NamaBulan : array [1..12] ofstring; … …
	spasi
Langkah 5	Silahkan anda tuliskan kode program didalam event OnCreate pada object Form1. Untuk lebih detailnya silahkan anda lihat potongan kode program di bawah ini.
	spasi
	… … procedure TForm1.FormCreate(Sender: TObject); begin Tag := 0; Tag := Tag + 1; NamaBulan[Tag] := ‘Januari’; Tag := Tag + 1; NamaBulan[Tag] := ‘Februari’; Tag := Tag + 1; NamaBulan[Tag] := ‘Maret’; Tag := Tag + 1; NamaBulan[Tag] := ‘April’; Tag := Tag + 1; NamaBulan[Tag] := ‘Mei’; Tag := Tag + 1; NamaBulan[Tag] := ‘Juni’; Tag := Tag + 1; NamaBulan[Tag] := ‘Juli’; Tag := Tag + 1; NamaBulan[Tag] := ‘Agustus’; Tag := Tag + 1; NamaBulan[Tag] := ‘September’; Tag := Tag + 1; NamaBulan[Tag] := ‘Oktober’; Tag := Tag + 1; NamaBulan[Tag] := ‘Nopember’; Tag := Tag + 1; NamaBulan[Tag] := ‘Desember’; end; … …
	spasi
Langkah 6	Silahkan anda klik 2x tombol Proses. Setelah itu anda lanjutkan dengan menuliskan kode program didalam event OnClick
	spasi
	… … procedure TForm1.Button1Click(Sender: TObject); begin Edit2.Text := NamaBulan[strtoInt(Edit1.Text)]; end; … …
	spasi
Langkah 7	Silahkan anda compile. Tekan tombol Ctrl + F9. Tunggu beberapa saat… ( Sedang di cek kode programnya ).
	Apabila tidak muncul pesan error, berarti program yang anda buat telah berhasil dan silahkan anda tekan tombol F9 untuk menjalankan program aplikasinya.
	spasi
Langkah 8	Silahkan anda tentukan indek bulan dengan nilai 2 dan lanjutkan dengan menekan tombol Proses
	spasi
	spasi
Langkah 9	Program sudah selesai anda buat. Sekarang silahkan anda tekan tombol Keluar.
	spasi
Download	Array – Nama Bulan Silahkan anda download link diatas untuk mendapatkan contoh program aplikasi secara lengkap. Ada beberapa masukan dan keluhan dari teman – teman, bahwa ada beberapa program contoh tidak bisa dijalankan dari delphi 7. Hal ini dikarenakan program contoh dibuat dengan menggunakan Delphi 2007 for win32. Apabila anda menggunakan D7, sebaiknya anda mengikuti pandauan dari langkah – langkah yang sudah diberikan. Atas perhatiannya, saya mengucapkan banyak terimakasih.
	spasi
Link terkait	Judul Tutorial             Copy     Banyak Dimensi     Satu Dimensi     Konstanta     Statik             Judul Tutorial             Buat Indek Sendiri     Fungsi dan Prosedur     Frekuensi Data     Nama Bulan
Buku panduan	Dasar First Step To Be A Programmer Menengah Pemrograman Database dengan Delphi dan MS SQL Server Menengah Membangun database MLM