Program Sederhana Delphi

    1.      Buka program Delphi 7 nya. Pertama dibuat Form 1,  buat kotak Panel dan 4 Button. Untuk ke 4    Button, ubah Properties > Caption-nya dengan tulisan (Biodata, Input Nilai, Keterangan, dan Tutup). Kegunaan Panel ini untuk menampilkan Form dari beberapa Form telah dibuat. Berikut gambarnya.

 

    2.      Buatlah Form baru dengan cara klik File > New > Form. Ubah keterangan caption dengan nama “Biodata Mahasiswa”, sama seperti sebelumnya hanya saja menambahkan 3 Label, 3 kotak Edit, 1 kotak Memo, dan 2 tombol Button. Pada komponen Edit, nama parameter text dihilangkan.

 

                                

     3.      Ulangi langkah 1 dan 2 dengan 2 Form, masing-masing 7 dan 5 komponen. Kedua Form tersebut diberi caption “Input Nilai Mahasiswa” dan “Keterangan Lulus/Gagal”.

 

4.  Setelah semuanya telah dibuat, selanjutnya memberikan kodingan script pada setiap Form. Untuk memasukkan kodingan caranya dengan meng-klik 2x tombol Button.

a. Form1

 

b. Biodata Mahasiswa

 

c. Pada Form3 Input Nilai Mahasiswa, kotak Button1 “Proses” diberi kodingannya sebagai berikut.

  

d. Pada Form4 Keterangan Lulus/Gagal, kotak Button1 “Proses” diberi kodingannya sebagai berikut.

 

5. Jalankan program yang sudah dibuat dengan meng-klik Run atau menekan tombol F9. 

LOGIKA

Pada dasarnya, program ini digunakan untuk menampilkan dari beberapa Form yang telah dibuat dan menampilkannya kedalam sebuah Panel, menghitung Nilai Mahasiswa, dan menentukan Kelulusan mahasiswa. Semuanya akan ditampilkan kedalam Form berkomponen Panel. Saat meng-klik “Biodata”, maka akan muncul tampilan dari Form2 “Biodata Mahasiswa” pada Panel di Form1. Di dalam Biodata terdapat Nama, Kelas, NPM, dan sebuah kotak kosong (Memo). Jika kotak Edit masing-masing diisi dan di proses “OK”, maka kotak Edit yang telah terisi akan muncul menjadi satu kedalam Memo.

Selanjutnya, ketika meng-klik Input Nilai akan muncul Form3 “Input Nilai Mahasiswa” yang berisikan input nilai UTS, UAS, dan Total Nilai. Pada nilai UTS dikalikan 70%, dan nilai UAS dikalikan 30%. Kedua nilai tersebut kemudian dijumlahkan dan disimpan kembali menjadi string. Hasil dari perhitungannya akan ditampikan di kotak Edit3.

Untuk melihat Kelulusan Nilai yang diperhitungkan dapat meng-klik Keterangan. Jika Total Nilai lebih dari 60, maka dinyatakan LULUS dan sebaliknya, jika Total Nilai kurang dari 60, maka dinyatakan GAGAL. Untuk mengetahuinya dapat meng-klik kotak “Proses”.