*Selamat Datang di Bang Tiyo's Blog*

Kamis, 30 Desember 2010

PROGRAM KALKULATOR SEDERHANA DELPHI 7

Karena saya baru bisa membuat aplikasi kalkulator sederhana ini menggunakan Delphi 7,,maka tak ada salahnya kand kalau aku berbagi ilmu ma temen2 sekalian. Ya walaupun masih sangat sederhana banget kalkulator buatan saya ini, tapi siapa tau berguna buat kalian semua.
Kalian sudah siap untuk membuatnya ??? oke sekarang siapkan dulu bahan2 yang dibutuhkan ya!!
1. Aplikasi Borland Delphi untuk membuatnya,, jika belum ada KLIK DISINI ! untuk men-downloadnya.
2. Makanan dan minuman, siapa tau kalian semua akan lapar karena keasyikan membuat kalkulator buatan sendiri nantinya.
Nah, kalo semuanya uda siap. Mari kita mulai mengerjakan.
1. Langkah pertama “save all” terlebih dahulu jika anda ingin menyimpannya, selanjutnya buatlah tampilan form seperti berikut ini !
Form tsb terdiri dari :
1 buah Radiogroup.
4 buah radio button.
3 buah label.
3 buah edit,dan
2 buat button.
Percantiklah tampilan font dan warna background sesuai dengan selera anda masing-masing.

2. Langkah yang selanjutnya adalah klik 2 kali pada radiobutton penjumlahan.

Setelah itu masukkan kode berikut !

var //inisialisasi data
Form1: TForm1;
a, b , c : real; //nilai yang tertera pada data a, b, c adalah real.

begin
a:=strtofloat(edit1.Text); //mengubah string ke float pada kotak nilai 1
b:=strtofloat(edit2.Text); //mengubah string ke float pada kotak nilai 2
c:= a+b; //Algoritma penjumlahan
edit3.Text:=floattostr(c); //mengubah integer ke string pada kotak Hasil
end;

Dan seterusnya pada radiobutton pengurangan, perkalian, pembagian. Tinggal ganti saja tandanya pada c:= sesuai dengan nama radiobuttonnya.

3. Langkah yang terakhir, klik 2 kali pada button reset.
Kemudian masukkan kode berikut ini !
begin
Edit1.Clear;
Edit2.Clear;
Edit3.Clear;

end;

Sedangkan Untuk button selesai.
masukkan kode berikut !
begin
close;
end;

end.

Nah,,sekarang udah jadi deh aplikasi kalkulator sederhanannya. Tinggal di pake tuh buat ngitung2 duit. Hahahaha :D.