Aplikasi Sederhanan Penghitungan Luas dan Keliling Persegi Panjang

Aplikasi Sederhanan Penghitungan Luas dan Keliling Persegi Panjang

Kali ini gue mau ngebagi sedikit ilmu, pembuatan aplikasi sederhana dari Delphi
" Penghitungan Luas dan Keliling Persegi Panjang "

Aplikasi Sederhana Penghitungan Luas dan Keliling Persegi Panjang
Aplikasi Sederhana Penghitungan Luas dan Keliling Persegi Panjang
  1. Jalankan Program Delphi
  2. Langkah pertama buat Applikasi baru
    Klik File > New > Application 
Aplikasi Sederhana Penghitungan Luas dan Keliling Persegi Panjang
Aplikasi Sederhana Penghitungan Luas dan Keliling Persegi Panjang
    3. Langakah berikutnya pada From Designer
         tambahkan beberapa komponen nama komponen disesuaikan
  • 4 From Edit yang nantinya digunakan sebagai From Inputan Nilai dan From Outputan
  • 3 buah Button yang nantinya sebagai Prosses
  • Nama Komponen terserah anada 
    Aplikasi Sederhana Penghitungan Luas dan Keliling Persegi Panjang
    Aplikasi Sederhana Penghitungan Luas dan Keliling Persegi Panjang


     4. Langkah terakhir tinggal masukin script
         Pada Button1 klik dua kali dan masukan Script dibawah ini
" edit3.Text:=inttostr(strtoint(edit1.Text)*(strtoint(edit2.Text)));

Aplikasi Sederhana Penghitungan Luas dan Keliling Persegi Panjang
Aplikasi Sederhana Penghitungan Luas dan Keliling Persegi Panjang

Pada Button2 klik dua kali dan masukan Script dibawah ini
" edit4.Text:=inttostr(strtoint(edit1.Text)+(strtoint(edit2.Text))); "

Aplikasi Sederhana Penghitungan Luas dan Keliling Persegi Panjang
Aplikasi Sederhana Penghitungan Luas dan Keliling Persegi Panjang

Pada Button3 klik dua kali dan masukan Script dibawah ini 

         " edit1.text:='' ;
           edit2.Text:='';
           edit3.Text:='';
           edit4.Text:='';
           edit1.SetFocus; "

Aplikasi Sederhana Penghitungan Luas dan Keliling Persegi Panjang
Aplikasi Sederhana Penghitungan Luas dan Keliling Persegi Panjang

      Langkah terakhir tinggal Eksekusi Project tersebut tekan F9 
Aplikasi Sederhana Penghitungan Luas dan Keliling Persegi Panjang
Aplikasi Sederhana Delphi
#Selamat mencoba, Salam Blogger :)