• Skip to primary navigation
  • Skip to main content
  • Skip to primary sidebar

Jaranguda

Belajar Mengajar

  • Home
  • Sponsor/Jasa
  • Tentang
Home » Membuat Program Aritmatika dengan Delphi XE

Membuat Program Aritmatika dengan Delphi XE

Last Updated on 17 September 2012 By tommy Leave a Comment

Program yang akan kita buat disini adalah aritmatika (tambah, kurang, kali dan bagi) dan source code dari program aritmatika ini bisa di dowload dibawah tulisan ini.

Buat sebuah VLC form application baru di delphi dan design seperti gambar dibawah ini
design form
keterangan :
label1, edit1 di Angka 1
label2, edit2 di Angka 2
label3, edit3 di Hasil
Button1 : kali
Button2 : bagi
Button3 : tambah
Button4 : kurang
Button5 : clear

klik dua kali pada tombol kali dan tambahkan script dibawah ini

angka1 := StrToFloat(edit1.Text);
angka2 := StrToFloat(edit2.Text);
hasil := angka1 * angka2;
edit3.Text := FloatToStr(hasil)

klik dua kali pada tombol bagi dan tambahkan script dibawah ini

angka1 := StrToFloat(edit1.Text);
angka2 := StrToFloat(edit2.Text);
hasil := angka1 / angka2;
edit3.Text := FloatToStr(hasil)

klik dua kali pada tombol tambah dan tambahkan script dibawah ini

angka1 := StrToFloat(edit1.Text);
angka2 := StrToFloat(edit2.Text);
hasil := angka1 + angka2;
edit3.Text := FloatToStr(hasil)

klik dua kali pada tombol kurang dan tambahkan script dibawah ini

angka1 := StrToFloat(edit1.Text);
angka2 := StrToFloat(edit2.Text);
hasil := angka1 - angka2;
edit3.Text := FloatToStr(hasil)

klik dua kali pada tombol clear dan tambahkan script dibawah ini

edit1.Text := '';
edit2.Text := '';
edit3.Text := '';

jalankan dengan menekan tombol F9, hasilnya bisa dilihat dibawah ini
contoh aplikasi aritmatika delphi xe

Download :

Download “Aplikasi Aritmatika Delphi” aritmatika.zip – Downloaded 370 times –

Tulisan menarik lainnya

  • Membuat Program Launcher dengan Delphi XE

    Setelah di tulisan sebelumnya https://jaranguda.com/membuat-program-launcher-dengan-gambas/ kita menggunakan Gambas, maka sekarang kita akan mencoba membuat aplikasi…

  • Membuat Aplikasi Aritmatika dengan Gambas3

    Setelah sebelumnya membuat Program Aritmatika dengan Delphi XE kali ini kita akan mengubah koding tersebut…

  • Membuat Login dengan Delphi XE tanpa Database

    Buat design form seperti gambar dibawah ini komponen yang digunakan 2 TEdit, 2 TLabel dan…

  • Membuat Pemutar Musik MP3 dengan Delphi

    Tutorial ini menggunakan Delphi XE, dan penggunaan di Delphi 7 atau versi lainnya seharusnya tidak…

Filed Under: Delphi Tagged With: artimatika

Reader Interactions

Leave a Reply Cancel reply

Your email address will not be published. Required fields are marked *

Primary Sidebar

Pencarian

Tanya Jawab tentang DevOps SRE CPE, gabung di https://t.me/devopsindonesia

Terbaru

  • Solusi Playwright Firefox version `GLIBCXX_3.4.30′ not found (required by /lib64/libicuuc.so.69)
  • Cara Upgrade Fedora 35 ke Fedora 36
  • Ekstrak Gzip File dan Ambil Total dengan Python
  • Cara Menggunakan filter dengan Fluentd
  • Cara Membuat Public dan Private Key SSH untuk Login Server

Komentar

  • one on Solusi Error EFAKTUR ETAXSERVICE-20017 Client Tidak Terdaftar
  • Rafik on Password Terbaru ZTE F609 Indihome
  • Akbar Alfayiz on Password Terbaru ZTE F609 Indihome
  • Achmad mujaeni on Kemana Menghilangnya Saldo BCA 50 ribu
  • tommy on Cara Mengatasi SSH Error REMOTE HOST IDENTIFICATION HAS CHANGED

Tulisan Populer

  • Password Router Huawei HG8245H5 Indihome 1m views
  • Password Terbaru ZTE F609 Indihome 780.9k views
  • Password Superadmin Huawei HG8245A 290k views
  • Cara Setting Manual Modem GPON ZTE F609 Indihome 266.8k views
  • Cara Setting Wireless ZTE F609 Indihome 249.8k views
  • Mengaktifkan Port LAN di Huawei HG8245 Indihome 164.6k views
  • Akses UseeTV Indihome via Wireless ZTE F609 154.5k views
  • Cara Reset Password ZTE F609 Indihome 145.7k views
  • Kemana Menghilangnya Saldo BCA 50 ribu 132k views
  • Cara Setting DHCP Server Modem/Router ZTE F609 108.3k views

Kategori

  • Delphi
  • dll
  • Gambas
  • Internet
  • Java
  • Lazarus
  • Linux
  • PHP
  • Review
  • Teknologi

Sponsor

kadal.id
Untuk jadi sponsor, hubungi kita lewat halaman sponsor
© 2021. Jaranguda
  • Linux
  • PHP
  • Internet
  • Teknologi
  • Delphi
  • Gambas
  • Java