
sendiri memiliki form dan tidak berbasis teks (bergambar/memiliki icon/simbol-simbol).
Untuk mengaktifkan mode Aplication sendiri akan muncul otomatis pada saat pertama kali membuka program delphi.
Langkah awal seperti biasa, buka terlebih dahulu Delphi 7 yang telah diinstall. START > Delphi 7
contoh pembuatan aplikasi sederhana dengan Delphi 7. berikut ini adalah aplikasi penghitungan Luas Persegi Panjang.
1. buat tampilan Form/interface terlebih dahulu
untuk keterangan form diatas sebagai berikut :
Type
|
Caption
|
Name
|
Label1
|
Panjang
|
|
Label2
|
Lebar
|
|
Label3
|
Luas
|
|
Edit1
|
{kosongkan}
|
txtPanjang
|
Edit2
|
{kosongkan}
|
txtLebar
|
Edit3
|
{kosongkan}
|
txtLuas
|
Button1
|
Mulai
|
Button1
|
Button2
|
Hapus
|
Button2
|
2. setelah pengaturan pada form, double-klik pada tombol Mulai untuk memulai pengetikan rumus/listing program.
var
Panjang,Lebar,Luas:integer;
begin
Panjang:=StrToInt(txtPanjang.Text);
Lebar:=StrToInt(txtLebar.Text);
Luas:=Panjang*Lebar;
txtLuas.Text:=IntToStr(Luas);
end;
Panjang,Lebar,Luas:integer;
begin
Panjang:=StrToInt(txtPanjang.Text);
Lebar:=StrToInt(txtLebar.Text);
Luas:=Panjang*Lebar;
txtLuas.Text:=IntToStr(Luas);
end;
3. setelah pengetikan listing program pada tombol Mulai, lanjutkan pengetikan listing program pada tombol Hapus.
begin
txtPanjang.Text:='';
txtLebar.Text:='';
txtLuas.Text:='';
end;
txtPanjang.Text:='';
txtLebar.Text:='';
txtLuas.Text:='';
end;
4. setelah pengetikan listing program, simpan lembar kerja kita dengan pilih menu File > Save As simpan sesuai folder yang diinginkan. kemudian simpan juga project dengan pilih menu File > Save Project As.
//INGAT!//
-untuk pemberian nama pada lembar kerja ataupun project jangan menggunakan kata yang terdapat dalam perintah listing program seperti "Procedure", "Function", dan lain-lain.
-pemberian nama pada lembar kerja dan project saat menyimpan tidak boleh sama. misal "materi" untuk nama lembar kerja dan "materi1" untuk project.
5. Lakukan pengujian aplikasi dengan klik icon
![]() |
Run (F9) |
isikan angka untuk menguji apakan rumus yang digunakan benar atau masih perlu perbaikan. misalnya Panjang = 4, Lebar =5, maka Luas = 4x5= 20.
>>>SELAMAT MENCOBA<<<
Tidak ada komentar:
Posting Komentar