Membuat Aplikasi Kode Kampus Menggunakan Delphi

Membuat Tampilan

Buatlah tampilan seperti berikut menggunakan label, button, dan editbox

      Coding

Jika sudah maka masukkan kode berikut pada Button “OK”

Logika :

-          Pada kolom edit1 dideklarasikan strtoint yang dimaksudkan tipe data STRING akan diubah menjadi tipe data INTEGER

-          Jika pada editbox dimasukkan kode 1 – 5 maka akan keluar kode kampus dan lokasi kampus Univ Gunadarma yang ada pada label 2

-          Jika yang dimasukkan angka lain maka akan keluar teks kode kampus tidak ada.

  

      Percobaan

Jika sudah maka hasilnya akan seperti berikut