Minggu, 08 November 2015

Program Reservasi Hotel mengunakan delphi 7

program reservasi hotel 

aplikasi yang di butuh kan
borlan delphi saya mengunakan delphi 7
devexprees
alpha skin
qreport

data base yang di gunakan mysql 



pertama kita di form log in




masuk dengan user name 'admin ' dan password '123'
ada dua user name "operator " password  nya '111'

 


 kita ke form utama,di form utama ada 

form tamu

form kamar

form registrasi/check in

form check out

laporan 

close






pertama kita masuk ke form tamu  mengisi data tamu yag datang
setelah di isi data tamu klik button simpan untuk mensimpan data




setelah mengisi data tamu kita ke form kamar ,di form kamar ini kita bisa memasukan data kamar
yang siap huni atau siap pakai
kita masukan data kamar yang siap huni
klik simpan untuk menyimpan data





setelah kita mengisi data kamar kita ke form regestrasi atau check in .di sini kita melakukan reservasi tamu

pertama kita pilih kamar mana yang mau di pesan tamu 

dengan memasukan data di "kode kamar"

dan  field filed  seperti "jenis kamar " dan "harga kamar "akan otomatis terisi

dan jangan lupa masukan data-data yang lain nya sperti tanggal check in dan check out dan
berapa lama tamu tinggal
dan status kamar nya pilih "CHECK IN" 
dan berapa uang bayar  awal nya /Uang DP
klik button "total haga"
dan sisa pembayaran akan muncul
klik simpan untuk menyimpan data
dan otomatis di form kamar status kamar menjadi "TERISI" 







setelah registrasi kita ke form check out disini kita tinggal

pilih id tamu .di dbgriid nya ,list yang tadi kita inputkan data di form registrasi otomatis  ada di form check out .

stelah di pilih id tamu otomatis field - field yang lain terisi.

saya mengunakan field bayangan biar mempermudah dan mempercepat  pengerjan resepsionis,

dan berapa uang yang akan melunasi"sisa bayar" 

masukan berapa bayar klik tombol proses  dan berapa uang kembalian nya 

klik simpan dan otomatis status kamar di  form  check out otomatis menjadi check out 

dan 

status kamar di form registrasi menjadi "CHECK OUT" 
dan status kamar di form kamar menjadi "KOSONG" 


ada buuton cetak untuk cetak laporan "check out"





setelah itu kembali ke  form utama/menu di sana ada form laporan .

klik dan laporan transaksi  tinggal cetak untuk laporan mingguan atau bulanan






untuk program nya bisa di download di bawah sini !!!!

http://www.mediafire.com/download/5sp72j0wnm47dhw/program+reservasi+hotel.rar

Jumat, 30 Oktober 2015

Belajar dasar mengunakan array di delphi

Pengertian array :

Pengertian Array adalah sekumpulan variabel yang memiliki tipe data yang sama dan dinyatakan dengan nama yang sama. Array merupakan konsep yang penting dalam pemrograman, karna array memungkinkan untuk menyimpan data maupun referensi objek dalam jumlah banyak dan terindeks.

Sumber :
http://azizah.ilearning.me/programming/pengertian-array-cara-kerja-dan-contohnya/

Untuk penulusia. Koding y  di delphi :

Var array : array[0..10] of Integer;

begin

   for i:=0 to 10 do

   listbox1.items.append(array[i]);

end;

Jadi penulisan variable mengunakan type data array seperti itu

Array//nama variable : array//tipe data array [1..10] of integer // tipe data


Rabu, 28 Oktober 2015

Membuat recording sendiri di delphi mobile

Next time

Belajar dasar kondisi if di delphi part 1

IF = jika
Then = maka

Kondisi di pemograman dasarnya ada 2 yaitu IF THen da. Case
Sekarang saya akan membahas IF terlebih dahulu.

Penulisa. IF pada delphi seperti ini

IF Kondisi then
Aksi ;

Langsung koding aja
Saya membuat variable terlebih dahulu

Var a : int;
        b : int;

Begin

Deklarasikan

a:=13;
b:=10;

If  a < b then
Edit1.text:= a;

End;
End.

Di atas adalah kondisi tunggal.
Ada juga kondisi if bersarang  simple y kaya gini :

If kondisi then
Aksi
Else
If kondisi then
Aksi

Sekian dulu  :D