PENGENALAN PEMROGRAMAN DELPHI
Landasan
Teori
1.
Pengantar Pemrograman Delphi
Bahasa pemrograman Delphi merupakan
pemrograman Visual (berbasis windows) yang dibuat oleh sebuah Perusahaan
Software Borland .Inc, fungsi dari aplikasi visual lainnya, seperti VB, Foxpro
dan lain-lain.
Delphi dapat menangani pembuatan
aplikasi sederhana sampai pada aplikasi yang berbasis client/server atau
jaringan, Delphi dapat dimanfaatkan untuk membuat aplikasi yang berbasis text,
grafik, angka, database maupun web.
Bahasa pemrograman visual mempunyai 2
hal yaitu object dank ode program, menifestasi dari object adalah berbentuk
komponen yang dapat dilihat (visual), sedangkan kode program merupakan
sekumpulan text yang digunakan sebagai sebuah perintah yang telah diatur dengan
suatu aturan dan mempunyai satu tujuan tertentu.
Bahasa pemrograman Delphi merupakan
bahasa pemrograman yang dikembangkan dari bahasa pemrograman Pascal, Pascal
berbasis text only sedangkan Delphi berbasis visual (windows).
2.
Memulai Pemrograman Delphi
Software Delphi yang
digunakan pada modul ini adalah Borland Delphi versi 7.0, Setelah aplikasi ini
dipasang (install) pada computer secara default maka kita bisa membuka melalui
Start Menu Delphi 7, lihat gambar
di bawah ini:
Gambar 1. Proses Membuka Aplikasi
Delphi 7
Setelah
Aplikasi terbuka, maka kita akan melihat layar kerja Delphi 7 seperti terlihat
pada gambar di bawah ini:
Gambar
2. Interface Pemrograman Delphi
1. Strukur file pada Delphi
Secara dasar Delphi mempunyai struktur file
sebagai berikut:
Ø File
Project adalah merupakan kepala dari file,artinya seluruh file yang lain akan
berada di dalam file project, ekstensi dari file ini adalah *.dpr
Ø File
Form (Interface) adalah merupakan file yang berfungsi sebagai interface
aplikasi yang menampung seluruh komponen visual aplikasi, ekstensi dari file
ini adalah *.dfm
Ø File
Pas (Kode Program) adalah merupakan file yang menampung listing program dari
sebuah aplikasi, ekstensi dari file ini adalah *.Pas
Hasil
dan Pembahasan
Adapun
langkah-langkah kerja di bawah ini:
Ø Membuat
sebuah folder dengan nama Delphi (nim) pada direktori.
Ø Membuka
program Delphi, dari menu file pilih save all.
Ø Membuat
project dengan form yang telah ditentukan yaitu
Mengenal Pemrograman Delphi.
Ø Mengeset
properti untuk seluruh komponen seperti pada tabel properti komponen.
Ø Mengetik
listing program yang ditentukan.
Ø Memilih
menu run dan memilih run atau atau tekan tombol F9
untuk menjalankan program
yang kita buat.
Ø Membuat
kesimpulan praktikum yang telah dilakukan.
Contoh
Membuat Program Kalkulator Sederhana
III.
Pembahasan
Percobaan
Adapun
pembahasan dari percobaan tersebut antara lain:
1.
Tabel Properti Komponen
|
Koponen/Object
|
Properties
|
Pengaturan
|
|
TForm1
|
Caption
|
Kalkulator
Sederhana
|
|
Name
|
Form1
|
|
|
TLabel
|
Caption
|
Operand1
|
|
Name
|
Label1
|
|
|
Font
Size
|
12
|
|
|
TLabel
|
Caption
|
Operand2
|
|
Name
|
Label2
|
|
|
Font
Size
|
12
|
|
|
TLabel
|
Caption
|
Hasil
|
|
Name
|
Label3
|
|
|
Font
Size
|
12
|
|
|
TEdit
|
Name
|
Operand1
|
|
Text
|
|
|
|
|
Font
Size
|
12
|
|
TEdit
|
Name
|
Operand2
|
|
Text
|
|
|
|
Font
Size
|
12
|
|
|
TEdit
|
Name
|
Hasil
|
|
Text
|
|
|
|
Font
Size
|
12
|
|
|
TRadioGroup
|
Caption
|
Pilian
|
|
Name
|
rgpilihan
|
|
|
Font
Size
|
12
|
|
|
ItemIndex
|
0
|
|
|
items
|
Anda
klik sehingga tampil String List
Editor, kemudian ketik Penjumlahan
> Enter > Pengurangan > Enter > Perkalian dst > OK.
|
|
|
TButton
|
Caption
|
&HITUNG
|
|
Name
|
TombolHitung
|
|
|
TButton
|
Caption
|
&KELUAR
|
|
Name
|
TombolKeluar
|
2.
Listing Program
Pada
code editor, di bawah tulisan berikut
var
Form1 : TForm1;
Ketik
tulisan berikut:
a,b,inthasil:integer;
realhasil:real;
Pada
Button1 klik 2 kali, dan ketik kode berikut
inthasil:=0;
realhasil:=0;
a:=StrToInt(Operand1.Text);
b:=StrToInt(Operand2.Text);
if rgpilihan.ItemIndex=0 then
begin
inthasil:=a+b;
end
else
if rgpilihan.ItemIndex=1 then
begin
inthasil:=a-b;
end
else
if rgpilihan.ItemIndex=2 then
begin
inthasil:=a*b;
end
else
if rgpilihan.ItemIndex=3 then
begin
realhasil:=a/b;
end
else
if rgpilihan.ItemIndex=4 then
begin
inthasil:=a div b;
end
else
if rgpilihan.ItemIndex=5 then
begin
inthasil:=a mod b;
end;
if rgpilihan.ItemIndex<>3 then
Hasil.Text:=IntToStr(inthasil)
else
Hasil.Text:=FloatToStr(realhasil);
end ;
3.
Hasil Percobaan
Adapun
hasil eksekusi sebelum dijalankan maupun setelah dijalankan antara lain:
4. Analisa
Percobaan
Jika
kita masukkan angka pada nilai1
dan nilai dua dan kemudian kita mengklik tombol hitung maka akan keluar hasil
yang telah kita ketik. Pada icon yang disamping jika kita mengklik maka hasilpun akan berubah
sesuai icon yang kita klik.
Jika
kita menekan tombol clear maka semua angka akan terhapus dan jika kita menekan
tombol close maka program yang kita jalankan akan kembali seperti semula. Hal
ini menunjukkan program yang kita telah
eksekusi berhasil.
