UNIVERSITAS GUNADARMA
FAKULTAS TEKNOLOGI INDUSTRI
Komputasi Modern
Kelompok 4 :
Mougy Jessie
Muhamad Riski Maulana
Muhammad Ardon
Kelas : 4IA21
NPM : 54418375
Nama Dosen : ADAM HUDA NUGRAHA
Jakarta
2022
Pengertian Delphi
Delphi adalah Delphi merupakan bahasa pemrograman berbasis Windows yang menyediakan fasilitas pembuatan aplikasi visual seperti Visual Basic. Delphi memberikan kemudahan dalam menggunakan kode program, kompilasi yang cepat, penggunaan file unit ganda untuk pemrograman modular, pengembangan perangkat lunak, pola desain yang menarik serta diperkuat dengan bahasa pemrograman yang terstruktur dalam bahasa pemrograman Object Pascal. Delphi memiliki tampilan khusus yang didukung suatu lingkup kerja komponen Delphi untuk membangun suatu aplikasi dengan menggunakan Visual Component Library (VCL). Sebagian besar pengembang Delphi menuliskan dan mengkompilasi kode program dalam IDE (Integrated Development Environment).
Sejarah delphi :
Delphi 7 dikembangkan oleh Borland(sebelumnya dikenal sebagai Inprise). bahasa ini dapat pula digunakan untuk membuat program yang berjalan di sistem operasi Mac OS X dan Windows CE. Khusus untuk pemrogaman database, Borland Delphi menyediakan fasilitas obyek yang kuat dan lengkap yang memudahkan programmer membuat program untuk aplikasi database. Format database yang dimiliki Delphi yaitu format database Paradox, dBase, MS Access,ODBC, SyBASE, Oracle dan lain-lain
Membuat Program sederhana Perhitungan gaji Karyawan menggunakan borland delphi
Ketentuan Aplikasi gaji karyawan adalah sebagai berikut :
- Setiap orang memiliki gaji pokok dan tunjangan anak.
- Besarnya tunjangan anak adalah 50.000
- Jumlah anak yang diberi tunjangan maksimal sampai anak ke-3.
Implementasi peng-Aplikasian gaji karyawan :
1.Membuat Project baru, dan masukkan label, text, dan button sebagai berikut :
Berikut adalah list component dari project tersebut :
| 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 |
2.Selanjutnya adalah menyesuaikan nama nya
3.Kemudian masukkan kode program pada "Button" (Hitung).
|
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;
|
4.Kemudian masukkan data dan coba jalankan program delphi yang sudah di masukkan.
5.Ketika inputan sudah berhasil di hitung maka akan muncul seperti berikut :
Pertanyaan :
1.Bagaimana cara nya output bisa menghasilkan nilai ? dan bagaimana jika data tersebut kosong atau lebih dari kondisi yang sudah tersedia ?
Jawaban :
1.Output bisa keluar dikarenakan program akan membaca nilai dari gaji pokok dari label gaji pokok, kemudian akan membaca nilai tunjangan dengan cara mengkalikan nilai Tunjangan := Janak * Tanak; dan juga GTotal := GPokok + Tunjangan;. dan nilai yang di berikan untuk tunjangan anak adalah 3. dan akan memunculkan nilai maksimal dari jumlah anak.
Flow Chart :
1.Mulai
2.Masukkan Nama
3.Masukkan Gaji Pokok
4.Masukkan Gaji Total
5.Masukkan Jumlah Anak
seleksi kondisi :
6.Jumlah anak >3 jika "YA" maka akan mengeluarkan message "Jumlah Anak yang diberi tunjangan hanya sampai anak ke-3"
7.Jika "TIDAK" maka akan selesai.
Database :
tunjangan_anak
Sumber :
http://mukhroniaziz.blogspot.com/2014/03/program-sederhana-aplikasi-delphi.html
Baca juga
