Belajar Lazarus: Menggunakan Variabel dan Tipe Data pada Lazarus
Hallo! kali ini kita akan coba membuat sebuah program sederhana di lazarus yang menerapkan variabel dan tipe data.
Variabel merupakan sebuah nama atau simbol tempat kita menyimpan data. Variabel ini tersimpan dalam memori memori. Sedangkan tipe data adalah jenis data yang akan kita simpan.
Ok, mari kita coba…
Silahkan buat dulu proyek baru di Lazarus, kemudian ikuti langkah-langkah berikut.
Langkah 1: Desain Form
Kita akan menggunakan beberapa objek, diantaranya Label, Edit, GroupBox, dan Button. Sebagian dari obejek-objek telah diganti namanya untuk mempermudah saat pengkodean.
Langkah 2: Menulis Kode Program
Kode program akan kita tulis pada event tombol Tampilkan diklik. Silahkan klik dua kali pada tombol Tampilkan lalu tuliskan kode berikut.
procedure TForm1.Button1Click(Sender: TObject);
var
nama: string;
thnLahir, thnSekarang, umur: integer;
begin
nama := EditNama.Text;
thnLahir := StrToInt(EditTahunLahir.Text);
thnSekarang := StrToInt(EditTahunSekarang.Text);
umur := thnSekarang - thnLahir;
LabelNama.Caption := nama;
LabelUmur.Caption := IntToStr(umur);
end;
Penjelasan:
Pertama kita mendeklarasikan empat variabel dengan kata kunci var
.
Empat variabel itu adalah nama
, thnLahir
,thnSekarang
, dan umur
.
var
nama: string;
thnLahir, thnSekarang, umur: integer;
Setelah itu, kita isi semua variabel ini dengan teks yang diinputkan:
nama := EditNama.Text;
thnLahir := StrToInt(EditTahunLahir.Text);
thnSekarang := StrToInt(EditTahunSekarang.Text);
Sekarang semua variabel sudah terisi dan tersimpan dalam memori. Selanjutnya kita bisa melakukan operasi pengurangan.
umur := thnSekarang - thnLahir;
Terahir, kita tampilkan hasil operasi ke Label.
LabelNama.Caption := nama;
LabelUmur.Caption := IntToStr(umur);
Langkah 3: Menjalankan Program
Simpan semua dengan mengelik tombol save all. Kemudian jalankan dengan
menekan tombol F9
.
Nah, itulah contoh program sederhana penggunaan variabel di Lazarus. Gampang ‘kan?