Delphi : Program Menghitung Gaji

Nama           : ANDI KHOIRUDIN

Kelas           : 2-B SMT 2

Jurusan       : Teknik Informatika

STIMIK YADIKA BANGIL 2015

Membuat Program Sederhana Menghitung Gaji dengan DELPHI 

Langkah-langkahnya  : 

1. Buka Aplikasi Delphi 

2. Pilih Menu File --> New --> Form Delphi 

3. Kemudian Desain Propertiesnya : 

Hingga seperti gambar di bawah ini : 

4.Kemudian Double Klik Button Proses  dan Sisipkan script di bawah ini : 

procedure TForm1.Button1Click(Sender: TObject);

var
gaji, total, tunjang: integer;

begin

gaji:= StrtoInt(tgaji.text);

if tgol.text = 'A'  then tunjang:= 10000 ELSE
if tgol.text = 'B'   then tunjang:= 20000 ELSE
tunjang:= 30000;

total:= gaji + tunjang;

tunj.caption := InttoStr(tunjang);
tot.caption:= IntToStr(total);


end;

5. Terakhir coba jalankan program dengan tekan F9 atau klik tombol Run , apabila tidak ada pesan kesalahan maka program akan terlihat seperti di bawah ini :

6. Ketika program di coba untuk digunakan maka akan tampil seperti di bawah ini :

Silahkan dikembangkan sendiri programnya. Semoga bermanfaat & Selamat Mencoba
Jika ada kesalahan Mohon maaf dan terima kasih sudah berkunjung