• Skip to primary navigation
  • Skip to main content
  • Skip to primary sidebar

Jaranguda

Belajar Mengajar

  • Home
  • Sponsor/Jasa
  • Tentang

Menghitung Gaji Karyawan dengan Delphi

Last Updated on 12 September 2012 By tommy 1 Comment

Gaji yang akan kita hitung mempunyai aturan sebagai berikut :
1. Pengguna menginput data gaji pokok, uang makan, dan bonus
2. Perhitungan tunjangan = 20% * gaji kotor
3. Total gaji = pokok + uang makan + bonus + tunjangan

Versi delphi yang akan saya gunakan adalah Delphi XE2, tetapi cara ini bisa digunakan untuk Delphi 7 keatas. Buka aplikasi Delphi XE dan klik File > New > VLC Form Application
klik new delphi

Design form agar menyerupai tampilan form dibawah ini :
hitung gaji karyawan

1. Input Data dan Total diambil dari Tool Palette TGroupBox.
2. Nama, Jabatan, Gaji Pokok, Uang Makan, Bonus diambil dari Tool Palette TLabel
3. Hitung, Reset, Exit diambil dari Tool Palette TButton. Yang diubah hanya Caption.

Tool Palette berada disebelah kanan bawah window aplikasi Delphi XE
tool palette

Setelah form tersebut didesign, klik duakali disembarang tempat di form, sehingga tampilan akan berubah ke mode coding scroll ke baris paling atas hingga di bagian

 private
    { Private declarations }
  public
    { Public declarations }

ubah menjadi

 private
    { Private declarations }
  public
    { Public declarations }
    nama, jabatan : string;
    gapok, umakan, bonus, tunjangan, t_gaji, output_gaji :real;

double klik pada Button Hitung tambahkan script dibawah ini

nama := edit1.Text;
jabatan := edit2.Text;
gapok := strtofloat (edit3.Text);
umakan := strtofloat (edit4.Text);
bonus := strtofloat (edit5.Text);
tunjangan := 0.2*gapok;
t_gaji := gapok+umakan+bonus;
edit6.Text := floattostr(tunjangan);
output_gaji := tunjangan + t_gaji;
edit7.Text := floattostr (output_gaji);

untuk lebih jelasnya lihat gambar dibawah ini
isi tombol hitung

kembali ke tampilan Design, untuk berpindah-pindah dari mode Code ke Design atau sebaliknya lihat seperti gambar dibawah ini
mode delphi xe

Klik dua kali pada tombol Reset, tambahkan script dibawah ini

 edit1.Text := ' ';
  edit2.Text := ' ';
  edit3.Text := ' ';
  edit4.Text := ' ';
  edit5.Text := ' ';
  edit6.Text := ' ';
  edit7.Text := ' ';

yang terakhir di tombol Exit tambahkan

close;

Screenshoot :

Download :

Download “Aplikasi Penggajian Pegawai”

gaji.zip – Downloaded 3153 times –

Tulisan menarik lainnya

  • Menghitung Total Gaji dengan Gambas

    Buat project baru (CTRL + N), namakan gajikaryawan, lalu design formnya seperti gambar dibawah ini…

  • Menghitung Usia/Umur dengan Delphi

    Buat design aplikasinya seperti gambar dibawah ini 2 buah TLabel 1 buah TButton 1 buah…

  • Script PHP untuk Menghitung Gaji Karyawan dan Kenaikannya

    Contoh kasus : Ada seorang karyawan bekerja di PT. Jaranguda dengan gaji awal Rp. 2.000.000,…

  • Mengganti Judul Form dengan Delphi

    Buat aplikasi baru dan design seperti tampilan dibawah ini : komponen yang digunakan TButton dan…

Filed Under: Delphi Tagged With: gaji karyawan, pemula, perhitungan

Reader Interactions

Comments

  1. Rian says

    24 July 2018 at 07:18

    Gan linknya mati…

    Reply

Leave a Reply Cancel reply

Your email address will not be published. Required fields are marked *

Primary Sidebar

Pencarian

Tanya Jawab tentang DevOps SRE CPE, gabung di https://t.me/devopsindonesia

Terbaru

  • Solusi helm Upgrade Failed
  • macOS package is untrusted
  • Cara Mengganti Port Screen Sharing macOS
  • Cara Menonaktifkan Pager di macOS
  • Cara Mengupdate Nama Apple silicon-as-a-Service Scaleway

Komentar

  • Beritalogi on Cara Redirect Domain di Cloudflare
  • Putu on Cara Setting TP-LINK EN020-F5 Sebagai Range Extender
  • Budi on Solusi Simple Queue Mikrotik Tidak Berjalan
  • mazda on Tutorial Lengkap Install Mail Server Postfix Dovecot MariaDB di CentOS 7
  • adi on Menggunakan Mikrotik Sebagai SSH Client

Tulisan Populer

  • Password Router Huawei HG8245H5 Indihome 1.2m views
  • Password Terbaru ZTE F609 Indihome 785k views
  • Password Superadmin Huawei HG8245A 322.7k views
  • Cara Setting Manual Modem GPON ZTE F609 Indihome 273.9k views
  • Cara Setting Wireless ZTE F609 Indihome 258.3k views
  • Mengaktifkan Port LAN di Huawei HG8245 Indihome 170.7k views
  • Akses UseeTV Indihome via Wireless ZTE F609 157.1k views
  • Kemana Menghilangnya Saldo BCA 50 ribu 156.2k views
  • Cara Reset Password ZTE F609 Indihome 147.9k views
  • Cara Setting DHCP Server Modem/Router ZTE F609 114.3k views

Kategori

  • Delphi
  • dll
  • Gambas
  • Internet
  • Java
  • Lazarus
  • Linux
  • PHP
  • Review
  • Teknologi

Sponsor

kadal.id
carakami.com
kuotabisa.com
Untuk jadi sponsor, hubungi kita lewat halaman sponsor
© 2021. Jaranguda
  • Linux
  • PHP
  • Internet
  • Teknologi
  • Delphi
  • Gambas
  • Java