CARA MEMBUAT PROGRAMAN KOMPUTER MENGGUNAKAN DELPHI 7
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.
Tidak ada komentar:
Posting Komentar