Membuat Aplikasi Perhitungan Gaji


Setelah mengetahui tentang tipe data dan operator, sekarang kita coba membuat aplikasi sederhana untuk lebih memudahkan pemahaman tentang tipe data dan operator pada delphi.

Kita akan membuat aplikasi perhitungan gaji karyawan dengan kriteria sebagai berikut :

  1. Setiap orang memiliki gaji pokok dan tunjangan anak.
  2. Besarnya tunjangan anak adalah 50.000
  3. Jumlah anak yang diberi tunjangan maksimal sampai anak ke-3.

Contoh membuat aplikasi perhitungan gaji dengan menggunakan delphi 7

1. Buat project baru pada delphi, kemudian tempatkan komponen-komponen pada form seperti gambar berikut:

form hitung gaji

Tata Letak Form Aplikasi Perhitungan Gaji

2. Atur properti form dan komponen seperti pada tabel.

Component Properti Value
Label1 Caption Nama
Label2 Caption Gaji Pokok
Label3 Caption Jumlah Anak
Label4 Caption Gaji Total
Label5 Caption Aplikasi Perhitungan Gaji
Font 14
Label6 Caption Maksimal anak ke-3
Edit1 Name EdNama
Text Dikosongkan
Edit2 Name EdGajipokok
Text Dikosongkan
Edit3 Name EdJumlahanak
Text Dikosongkan
Edit4 Name EdGajitotal
Text Dikosongkan
Button1 Name BtHitung
Width 75
Height 65

3. Jika benar maka tampilan form menjadi seperti ini.

Form Aplikasi Perhitungan Gaji

Form Aplikasi Perhitungan Gaji

4. Dobel klik Button BtHitung pada form, lalu isikan prosedur perhitungan gaji sebagai berikut

procedure TForm1.Button1Click(Sender: TObject);
Const TAnak = 50000;
Var
JAnak:integer;
GPokok,Tunjangan,GTotal:Real;
begin
GPokok := StrtoFloat(EdGajipokok.Text);
JAnak := Strtoint(EdJumlahanak.Text);
if Janak > 3 then
begin
Janak := 3;
Showmessage(‘Jumlah Anak yang diberi tunjangan hanya sampai anak ke-3′);
end;
Tunjangan := Janak * Tanak;
GTotal := GPokok + Tunjangan;
EdGajiTotal.Text := Floattostr(GTotal);
end;

5. Coba jalankan project dengan menekan F9 lalu isikan data data pada nama, gaji pokok dan jumlah anak dan tekan tombol Hitung, Jika benar maka akan tampil seperti ini

Aplikasi Perhitungan Gaji Dengan Delphi 7

Aplikasi Perhitungan Gaji Dengan Delphi 7

6. Coba pada jumlah anak isikan dengan angka diatas 3 (misal= 4) maka akan tampil pesan sebagai berikut dan jumlah tunjangan hanya dihitung 3 anak.

Pesan jumlah anak

Pesan jumlah anak diatas 3

7. Simpan project dan unit dengan nama ProHitungGaji.dpr dan UhitungGaji.pas.

8. Download file project disini

About these ads

4 Responses to Membuat Aplikasi Perhitungan Gaji

  1. assalamu alaikum.,
    maaf seblumnya,.minta materi yang ada di blognya buat ngopy ke blog ana..,., biar ada isinya.,
    maklum masih baru.,.,
    dibawahnya saya tulis.,., dapat infonya dari alamat blog antum.,.,.
    maksih seblumnya.,,

  2. saman says:

    minta tips dan trik yang lain?

  3. ijin sedot master

  4. thanks gan infonya. ane lagi butuh tutorial untuk yang urusan ini

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

Follow

Get every new post delivered to your Inbox.

Join 32 other followers

%d bloggers like this: