Ekspresi | Les Private Arab-Inggris via WA dan BBM Gratis | Sunda | Kontak | Google | Gmail | Uang Adsense
Toko Baju Online Abah + Bonus
LP3I Tasikmalaya
Bahasa Arab (Kelas 1 SD sampai Universitas)
Bisnis Bitcoin | Daftar Isi | Tools Penting | PrivacyPolicy | Jago Bahasa Inggris dan Arab | Kamus | Kamus Google

Thursday, March 10, 2016

Membuat Kalkulator Tambah Delphi 7



Hello Katabah!
Meskipun judulnya memuat kata “kalkulator”, tapi cara ini tidak hanya bermanfaat ketika membuat aplikasi kalkulator Delphi, tapi akan bermanfaat ketika membuat aplikasi database yang melibatkan penjumlahan angka-angka, seperti yang ada dalam kwitansi atau nota pembayaran.

1. Buka Delphi 7
2. Letakkan dua buah komponen Edit dari kategori Standard (Component Pallete) pada area form yang kosong
3. Letakkan pula Button dari kategori Standard
4. Di bawah Button, letakkan Edit lagi (Edit3)
Desainnya seperti ini:


5. Klik dua kali Button1
6. Ketik script ini:
var
  a, b, c: byte;
begin
  a:=StrToInt(Edit1.Text);
  b:=StrToInt(Edit2.Text);
  c:=a+b;
  Edit3.Text:=IntToStr(c);

7. Jalankan program dengan menekan tombol F9 di keyboard
8. Silahkan isikan angka berapa saja di kotak Edit1 dan Edit2. Kemudian klik tombol Button1. Maka hasilnya akan muncul di Edit3.


"Bitcoin and Forex are high risk business. We must join them smartly."
loading...