Pengenalan Delphi (Penjualan Voucher Game)

I.         Deskripsi Program

Program ini merupakan program transaksi penjualan voucher game online. Program ini dapat di gunakan oleh penjual voucher game online untuk melakukan penghitungan transaksi voucher dengan lebih sistematis. Program ini di buat menggunakan Borland Delphi 7.

II.      Interface Program

III.         Coding Program

NamaKomponen	Event	Perintah
proses	OnClick	procedure TForm1.prosesClick(Sender: TObject); var   i:integer; begin i:=strtoint(nominal.Text)*strtoint(jumlah.Text); if ck1.Checked=true then total.Text:='Voucher '+ck1.caption+' Rp.'+inttostr(i)+',-'; if ck2.checked=true then total.Text:='Voucher '+ck2.caption+' Rp.'+inttostr(i)+',-'; if ck3.Checked=true then total.Text:='Voucher '+ck3.caption+' Rp.'+inttostr(i)+',-'; end;
reset	Onclick	procedure TForm1.resetClick(Sender: TObject); begin ck1.Checked:=false; ck2.Checked:=false; ck3.Checked:=false; nominal.clear; jumlah.Clear; Total.Clear; end;

IV.         Output 

Program diatas bisa di download disini