STEP 04. CONTOH DESAIN KARTU NAMA

CONTOH DESAIN KARTU NAMA

Gambar diatas adalah contoh desain input data kartu nama dan coba kita aplikasikan ke form desainer Visual Foxpro.

1. Buat Form baru seperti contoh sebeluMnya

Apabila tidak muncul jendela properties , klik kanan pada form pilih properties, Setting dari form properties :

• Caption                : Form input Data KArtu NAma (memberikan judul dari form)
• Control Box        : .f. - False (menghilangkan control box pada jendela pojok kanan atas, minimum, maksimum & close dihilangkan karena nanti kita akan membuat tombol close sendiri, nanti bisa di coba beda control box yang .t. dan yang .f. )
• Show Tips        : .T., Memunculkan Tool Tips Text
• Auto Center        : .T.

2. Masukan control label sesuai yang dibutuhkan pada desain manual input kartu nama. Jendela form control bisa kita tampilkan melalui menubar kemudian pilih view ->  form control toolbar. Setting properties dari control label :

• Autosize                : .T.
• Caption                : KODE, NAMA, ALAMAT, PHONE, KETERANGAN, TGL AKTIF, TYPE

3. Masukan text Box dengan setting properties sbb :

• Name = KDE, maxlength = 5, format = !, back color =255,128,64 (orange), font bold = t
• Name = NMA, maxlength = 20 , format = !
• Name = ALM, maxlength = 20 , format = !
• Name = PHN, maxlength = 20 , format = !
• Name = KET, maxlength = 20 , format = !
• Name = TGA, value = {}

(ket : format = ! , menampilkan input huruf capital/besar, tga value = {}, menampilkan format input tanggal)

4. Check Box dengan setting properties sbb

• Name = cpel , Autosize = t , caption = Pelanggan
• Name = ccab , Autosize = t , caption = CAbang
• Name = csup , Autosize = t , caption = Supplier
• Name = cpeg , Autosize = t , caption = Pegawai
• Name = cdll , Autosize = t , caption = DAn Lain lain

5. Container dengan setting properties sbb :

• Name = container1, Special Effect = 0-raised

6. Command Button dengan setting Property sbb :

• Name = cclose, Caption = \<Close, Tool Tips Text = 'Tutup Form / Alt + C', Font Bold = .T., MOuse Pointer = 15 - Hand
• Name = cclear, Caption = C\<lear, Tool Tips Text = 'Bersihkan Form', Font Bold = .T., MOuse Pointer = 15 - Hand
• Name = csave, Caption = \<save, Tool Tips Text = 'Simpan DAta', Font Bold = .T., MOuse Pointer = 15 - Hand

* Note : Penulisan \<Close = membuat hot key ALt + C

Hasil akhir form Input data kartu Nama

Coba jalankan form yang sdah kita buat dengan klik kanan pada form , kemudian pilih run form . Voila ..!!!!! form pertama sudah kita buat, dan mungkin jika ada yang proses input masih loncat - locat, pada menubar View, pilih Tab Order, pilih Assign Interactively, sehingga akan mucul urutan proses pointer, jika masih acak tinggal diklik dari kode, urut sampai pada tombol Close.

diurutkan menjadi

Nah agar tombol close berjalan dengan sebagaimana mestinya, Dobel klik pada tombol close sehingga akan muncul area untuk menuliskan baris kode seperti dibawah ini :

pada objeck Tombol Close , Procedure Click (kejadian saat tombol di klik) , tuliskan baris perintah

thisform.Release()

*Menonaktifkan form

*Awalan tanda '*' tidak dibaca oleh sistem

 

Setelah ditulis kode program , kemudian jalankan form dengan cara sebelumnya atau kalau pakai tombol pintas pakai Ctrl +E.

Kemudian coba isikan datanya. J..

Nah desain input data sudah kita buat, tinggal kita isikan kode untuk tombol clear dan savenya.