Cara Membuat Kalkulator Sederhana Dengan Delphi 7

Cara Membuat Kalkulator Sederhana Dengan Delphi 7



Kali ini kita akan belajar bagaimana membuat kalkulator dengan Delphi 7.tutorial yg aku bagikan kali ini masih sangat dasar/simple acara yg sudah dibentuk.anda masih mampu membuatkan kalkulator ini menjadi lebih canggih lagi.ya,ini cuman model saja bagi yang penasaran cara menciptakan kalkulator dengan aplikasi Delphi 7

Berikut ini aku kasih model bagaimana membuat kalkulator menggunakan Delphi 7

1)Buka acara Delphi 7 lalu buat 3 label, tiga Edit sama lima Button seperti ini contohnya

2)Tambahkan kode berikut di bawah var 
angka1,angka2: real;


3)Klik dua kali button1 atau tambah dan masukkan kode berikut
angka1 := strtofloat(edit1.text);
angka2 := strtofloat(edit2.text);
edit3.text :=floattostr( angka1 + angka2);



4)Klik 2 kali button2 atau kurang serta masukkan kode yg hampir sama namun bedanya ganti + menggunakan -

Angka1 :=strtofloat(edit1.text);
Angka2:= strtofloat(edit2.text);
Edit3.text:=floattostr(angka1- angka2);



5)Klik dua kali button3 atau kali serta masukkan kode yang hampir sama namun tandanya ganti dengan *

Angka1 :=strtofloat(edit1.text);
Angka2:=strtofloat(edit2.text);
Edit3.text:= floattostr(angka1*angka2);



6)Klik 2 kali button 4 atau bagi serta ganti tandanya dengan /

Angka1:= strtofloat(edit1.text);
Angka2:=strtofloat(edit2.text);
Edit3.text:= floattostr(angka1/angka2);


7)Klik dua kali button lima atau hapus dan masukkan kode ini

Edit1.clear;
Edit2.clear;
Edit3.clear;



8)Sekarang coba run dulu (f9) apakah terdapat error atau tidak bila normal harusnya sanggup jalan seperti ini



9)Kalau mau build projectnya silahkan menuju ke Project < Build (NamaProyek) dan tunggu sampai finish buildnya

Kalau merasa tampilannya kurang menarik, anda bisa ubah ubah warna button, edit maupun formnya.atau jika mau yang lebih rupawan anda mampu coba alpha skin yg pernah saya bagi di SINI beserta cara memasangnya

Popular posts from this blog

DOWNLOAD GRATIS AUTODESK AUTOCAD 2009 FULL VERSION

DOWNLOAD GRATIS SOLIDWORKS 2019 FULL VERSION