Membuat Program kalkulator sederhana menggunakan delphi 7

Siapkan 1 Button, 1 Combobox, 3 Edit, dan 4 Label
Kemudian setting Properties seperti gambar dibawah ini :

Untuk mengisi combobox cari items di properties combobox seperti pada gambar dibawah :

Kemudian isi string list editor seperti gambar dibawah

Setelah semua selesai masukan syntax dibwah ke button 1
procedure TForm1.Button1Click(Sender: TObject);
var x,y,z: real;
begin
x:= strtofloat(edit1.Text);
y:=strtofloat(edit2.Text);
if combobox1.Text = ‘+’ then
z:=x+y
else
if combobox1.text = ‘-’ then
z:=x-y
else
if combobox1.text=’/’ then
z:=x/y
else
if combobox1.text=’*’ then
z:=x*y;
edit3.text:=floattostr(z);
end;
Catatan : Program ini memiliki kelemahan apabila dibagi 0, Karena apabila bilangan dibagi 0 hasilnya adalah tidak terhingga

Tutorial membuat program menghitung luas segitiga dengan menggunakan Delphi 7.

Untuk memulai membuat program dengan menggunakan Delphi 7, terlebih dahulu kita harus sudah menginstal program Delphi. Dalam tutorial kali ini saya akan sedikit mencoba menjelaskan bagaimana membuat program “Menghitung Luas Segitiga”. Jadi anda harus sudah menginstal Delphi di PC anda. Bagi yang belum menginstalnya, maka installah. Oke..!!
Baiklah kalau begitu, kita mulai tutorialnya dengan menjalankan (me-RUN) program Delphi. Maka akan muncul ScreenShot seperti berikut:

Misal kita akan memberi nama program ini dengan “Edy0505” dengan cara mengubah Caption yang berisi “Form1” dengan “Edy0505”.

Sehingga menghasilkan perubahan seperti berikut:

Kemudian kita akan membuat tiga label (Alas Segitiga, Tinggi Segitiga dan Luas Segitiga). Caranya adalah dengan mengklik icon “A” (Label) pada menu bar kemudian mengklik satu kali pada form. Ini dilakukan sebanyak label yang akan dibuat dan memeri nama masing-masing label Alas Segitiga, Tinggi Segitiga dan Luas Segitiga seperti gambar di bawah ini.

Selanjutnya kita akan membuat tempat mengisi nilai alas segitiga dan tinggi segitiga, juga tempat munculnya nilai luas segitiga. Sama halnya dengan membuat label tadi, tapi kali ini kita memilih icon “Edit” seperti gambar di bawah :

Langkah selanjutnya adalah membuat button untuk mengeksekusi atau menjalankan program menghitung luas segitiga dan button untuk keluar program. Caranya dengan memilih icon “ok” (Button) kemudian mengklik satu kali di form Edy0505. Kemudian mengganti nama button tersebut dengan nama yang lainnya. Di sini saya coba mengganti button1 dengan nama “Hitung” dan button2 dengan nama “Keluar”.

sekarang kita akan mengisikan button “Hitung” dengan peng-codingan dalam bahasa Delphi. Double klick pada button Hitung, maka akan muncul:

Kemudian isikan kode-kode berikut:

Kemudian kita akan mengisikan button “Keluar” dengan peng-codingan dalam bahasa Delphi. Double klick pada button Keluar, maka akan muncul:

Kemudian isikan kode “close;” di bawah begin seperti pada gambar berikut berikut:

Terakhir Run Program dengan menekan run (F9), maka akan muncul:

Jadi, anda bisa mengisikan nilai alas segitiga dan tinggi segitiga. Missal saya masukkan nilai alasnya 4 dan nilai tingginya 4. Untuk mengetahui luas segitiga dengan alas dan tinggi yang dimasukkan, tekan Hitung maka akan muncul:

Tutorial membuat program menghitung jari-jari, keliling dan luas lingkaran dengan menggunakan Delphi 7.

Ini adalah form yang dibutuhkan untuk pembuatan program menghitung jari-jari, keliling dan luas lingkaran. Sebelumnya sudah dipaparkan bagaimana membuat form dengan beberapa label, edit dan button. Jadi langkah selanjutnya adalah mengisikan kode-kode berikut setelah double klick pada button Hitung.

Terakhir Run Program dengan menekan run (F9), maka akan muncul:

Jadi, anda bisa mengisikan nilai diameter lingkaran yang akan dicari jari-jari, keliling dan luas lingkaran tersebut. Missal saya masukkan nilai diameternya 8. Untuk mengetahui jari-jari, keliling dan luas lingkaran tersebut dengan nilai diameter yang dimasukkan, tekan Hitung maka akan muncul:

Catatan:

Jika ingin lebih cepat mengerti peng-codingan dalam bahasa Delphi terlebih dahulu kuasai sintax dari pascal. Karena dasar dari peng-codingan dalam Delphi adalah bahasa pascal.