Sunday, November 16, 2008

Belajar Control Objek Foxpro Part 2

Latihan 2 Belajar Kontrol Objek

Buatlah project dengan nama latihan2.pjx dan disain form sebagai berikut:
Kasus:
  1. Ketika program aktif, maka seluruh textbox tidak aktif
  2. Apabila tombol Hitung ditekan maka pada bagian total, diskon dan total bayar akan keluar hasilnya yaitu:
  3. total = harga * jumlah
  4. Diskon = 5% * total
  5. Total bayar = total - diskon
  6. Apabila tombol Lagi ditekan maka seluruh textbox kecuali tanggal dan jam akan kosong. dan pada bagian bagian kode buku, nama buku, harga dan jumlah textbox nya aktif dan setfocus pada bagian textbox kode buku
  7. Apabila tombol Tutup ditekan maka program akan keluar
  8. Tanggal dan jam akan tampil secara otomatis
Penyelesaian:
Untuk mendisain form seperti tampilan diatas, gunakan objek label, shape, textbox dan command button pada form control. Gunakan properties untuk mengatur tiap objek agar terlihat sama seperti tampilan diatas. Pada bagian tombol "Lagi", atur pada properti objek tersebut dan pilih gambar pada properties picture. Dan berikan objek kontrol Timer, dan atur properties interval nya isi dengan nilai 1000 (1 detik), agar melakukan perintah menampilkan jam dan tanggal tiap 1 detik sekali.

Penyelesaian no 1:
Ketika program aktif, maka seluruh textbox tidak aktif
isikan perintah berikut pada bagian

Object : Form1 Procedure: Activate
-----------------------------------------------------------------------
&&Mengontrol textbox menonaktifkan textbox
with thisform
.text1.enabled = .f. &&nonantifkan kode buku

.text2.enabled = .f. &&
nonantifkan nama buku
.text3.enabled = .f. &&
nonantifkan harga
.text4.enabled = .f. &&
nonantifkan jumlah
.text5.enabled = .f. &&
nonantifkan total
.text6.enabled = .f. &&
nonantifkan diskon
.text7.enabled = .f. &&
nonantifkan total bayar
endwith


Penyelesaian No. 2-5:
  • Apabila tombol Hitung ditekan maka pada bagian total, diskon dan total bayar akan keluar hasilnya yaitu:
  • total = harga * jumlah
  • Diskon = 5% * total
  • Total bayar = total - diskon
Berikan perintah berikut di:

Object : Command1 Procedure: Click
-----------------------------------------------------------------------
&&Mengontrol objek : menampilkan data pada textbox
&&total = harga * jumlah

thisform.text5.value = val(thisform.text3.value) * val(thisform.text4.value)
&&
Diskon = 5% * total

thisform.text6.value = (5/100) * thisform.text5.value
&&Total bayar = total - diskon
thisform.text7.value = thisform.text5.value - thisform.text6.value

Penyelesaian No. 6:
Apabila tombol Lagi ditekan maka seluruh textbox kecuali tanggal dan jam akan kosong. dan pada bagian bagian kode buku, nama buku, harga dan jumlah textbox nya aktif dan setfocus pada bagian textbox kode buku

Berikan perintah di:

Object : Command3 Procedure: Click
-----------------------------------------------------------------------
&&Mengontrol objek: mengkosongkan textbox
with thisform
.text1.VALUE = "" &&kosongkan kode buku
.text2.VALUE = "" &&
kosongkan nama buku
.text3.VALUE = ""
&&kosongkan harga
.text4.VALUE = "" &&kosongkan jumlah
.text5.VALUE = "" &&kosongkan total
.text6.VALUE = "" &&kosongkan diskon
.text7.VALUE = "" &&kosongkan total bayar
endwith
&&Mengontrol objek: mengaktifkan textbox dan setfocus texbox
with thisform
.text1.enabled = .t.
&&aktifkan kode buku
.text2.enabled = .t.
&&aktifkan nama buku
.text3.enabled = .t.
&&aktifkan harga buku
.TEXT4.ENABLED = .T.
&&aktifkan jumlah buku
.TEXT1.SETFOCUS()
&&setfocus kode buku
.REFRESH()
&&refresh tampilan form
endwith

Penyelesaian No. 7:
Apabila tombol Tutup ditekan maka program akan keluar.

Berikan perintah di:

Object : Command2 Procedure: Click
-----------------------------------------------------------------------
thisform.release() &&mengakhiri tampilan form

Penyelesaian No. 8:
Tanggal dan jam akan tampil secara otomatis

Object : Timer1 Procedure: Timer
-----------------------------------------------------------------------
thisform.text9.value = time()
thisform.text8.value = date()



Kemudian jalankan program dengan menekan short cut CTRL + E

Saturday, November 15, 2008

Belajar Control Objek Foxpro Part 1

Mari belajar men-kontrol objek pada foxpro

Pertama-tama buatlah Project dengan nama Latihan 1. Dan simpan menjadi:
C:\Latihan Foxpro\Latihan1.pjx
disainlah form seperti berikut:
Objek yang dibutuhkan:
Label1
Properties:
  • AutoSize = .T. - True
  • Caption = "Toko Aksesoris Motor"
  • FontSize = 20
  • FontBold = .T. - True
Label2
Properties:
  • AutoSize = .T. - True
  • Caption = "Kode"
Label3
Properties:
  • AutoSize = .T. - True
  • Caption = "Nama"
Label4
Properties:
  • AutoSize = .T. - True
  • Caption = "Harga"
Label5
Properties:
  • AutoSize = .T. - True
  • Caption = "Jumlah"
Label6
Properties:
  • AutoSize = .T. - True
  • Caption = "Total"
Textbox1: Properties:Name=Text1; Textbox2 Properties:Name=Text2;Textbox3: Properties:Name=Text3; Textbox4:Properties:Name=Text4

Textbox5: Properties: Enabled = .F. - False; Name = text5,

Command1:
Properties:
  • Caption:/
Command2:
Properties:
  • Caption:/

Setelah Mendisain baru memberikan perintah kontrol untuk beberapa objek pada form tersebut.
Kasus:
  1. Ketika tombol "Hitung" ditekan, maka pada Total (Text5) akan menampilkan hasil perkalian antara harga * Jumlah
  2. Ketika tombol "Keluar" ditekan, maka program akan keluar
Penyelesaian.
Analisa:
Karena aksi terjadi karena tombol hitung ditekan, maka berikan perintah tersebut pada bagian object tombol "Hitung" yaitu pada

Belajar Visual Foxpro 6.0 Part 3

Memulai Project Di Visual Foxpro dan Membuat Tampilan Antar Muka

Untuk memulai suatu project di Visual Foxpro dapat memilih menu: File->New->[Project]->[New] ataupun dapat menggunakan perintah :
CREATE PROJECT pada Command Window kemudian enter dan simpan file project nya yang akan berextensi .PJX dan .PJT

Setelah itu akan tampil Project Manager.
Project Manager inilah untuk mengatur pengembangan, integrasi dan pembuatan plikasi. Yang dinamakan project adalah kumpulan file, data, dokumen dan obyek yang digunakan dalam Visual FoxPro 6.0 dan mempunyai ekstensi .PJX. Project Manager memudahkan pemakai untuk mengatur dan mengorganisasi database, tabel, form, laporan dan query selama pembuatan aplikasi.
Menu yang terdapat pada Project Manager antara lain:
  • Data : Bagian untuk membangun bagian basis data program yang dibuat di Foxpro, baik itu database, free tables, maupun queries
  • Document : Bagian untuk membangun Form, Report dan Labels. Yaitu bagian untuk perancangan antar muka bagi si pengguna.
  • Class Libraries: Bagian untuk perancangan Class pada program yang nantinya dibangun
  • Code: Bagian untuk penunjangan pembangunan program yang terdapat sub menu seperti Programs, API Libraries dan Application, sehingga dimungkinkan untuk mengintegrasikan program yang dibuat di Visual Foxpro dengan file libary lainnya maupun aplikasi lainnya.
  • Other: Bagian untuk menunjang pembangunan program seperti pembuatan Menu, Text Files dan other files dalam program yang akan dikembangkan di Visual Foxpro
Untuk dapat melihat sub menu dari setiap menu yang disediakan pada Project Manager dapat memilih tiap tab ataupun pada menu tab [All] dan mengexpand menu-menu tersebut pada treeview.

Sebagai pengenalan dalam pembangunan Antar Muka maka sekarang kita akan mencoba untuk membangun sebuah tampilan form.
Caranya, masuk pada bagian tab Document, kemudian pilih menu Form dan klik tombol [New]
yang ada disamping sebelah kanan. Atau bisa juga dengan menggunakan perintah CREATE FORM pada CommandWindow seperti contoh dibawah.


Mengenal Form Control

Form Control adalah bagian menu yang menyediakan object-object yang dapat di gunakan dalam menunjang pembuatan tampilan antar muka program pada Visual Foxpro. Untuk mengambil menu form control pastinya kita sudah memiliki sebuah form terlebih dahulu, kemudia klik pada bagian desain form tersebut kemudian pilih menu View-> Form Controls Toolbar. seperti contoh gambar dibawah
Ada beberapa object pada form control yang dapat digunakan untuk membantu dalam pengembangan program pada Visual Foxpro.
Select Object : untuk memilih object yang ada pada form.

View Classes: Untuk melihat, menambah Class untuk menunjang pembangunan program. Bisa pula memilih class Active X
Label: Untuk label / tulisan pada desain form body

Textbox: Sebagai tempat untuk mengisikan teks data ataupun menampilkan isi data
Editbox : Hampir sama dengan Textbox, namun dapat bersifat multiline yang artinya dapat menampilkan teks yang bersifat lebih dari satu baris
Command Button: Untuk tombol pada tampilan antar muka program

Command Group: Untuk membuat group tombol bisa didesain secara vertikal maupun horisontal. Dan dapat mengatur sendiri besaran tombol secara seragam untuk group tombol tersebut.
Option Group: Untuk object pemilihan menu yang bersifat opsional berupa group dan hanya boleh dipilih 1 saja.
Checkbox: Untuk objek yang bersifat check / menandai suatu pemilihan yang bisa lebih dari satu pilihan
Combobox: Objek untuk menampilkan banyak pilihan item / data berupa daftar untuk dipilih namun pada keadaan biasa objek tersebut hanya menampilkan item yang dipilih saja.
Listbox: Objek seperti combobox yang menampilkan banyak item untuk dipilih, namun bentuknya yang statis, yang dapat memilih lebih dari satu item.
Spinner: Object untuk menampilkan angka atau bilanagan yang dapat merubah nilainya dengan menekan tombol atas dan bawah disebelah kanan objek.
Grid: Objek untuk menampilkan data-data pada table database

Image: Objek untuk menampilkan gambar pada form

Timer: Objek yang dapat menjalankan perintah dari event Time miliknya sesuai dengan interval yang diatur. Satuan interval nya adala ms atau interval = 1000 untuk 1 detik
Page Frame: Objek untuk membuat menu tab.

ActiveX Control: Control untuk menggunakan object ActiveX

ActiveX Bound Control:

Line : Objek untuk membentuk garis pada body form di Form Designer

Shape: Objek untuk membentuk pola persegi, oval maupun bulat di body form. Membentuk pola tergantung dari nilai properties Curvature nya


Mengenal Properties untuk mengatur objek
Properties digunakan untuk merubah sifat dari kontrol objek dalam mendisain tampilan antar muka.
Properties dapat diambil pada menu View->Properties

Untuk menampilkan menu Properties tentunya harus sudah memiliki form, seperti menampilkan menu Form Controls, maka pilih terlebih dahulu form designer, kemudian pilih menu Properties pada bagian menu Top View.

Perhatikan pada bagian daftar item yang ada di bagian Properties, daftar-daftar tersebut adalah daftar yang memungkinkan untuk dirubah dalam melakukan pengaturan sifat dari objek kontrol pada desain form.

Mendisain Form sederhana.

Sebagai latihan, mari membuat tampilan form sebagai berikut:


















caranya:
Letakkan objek Label dan shape seperti berikut:

Caranya:
Klik pada bagian label pada bagian form control kemudian cursor akan berganti menjadi tanda plus [ + ], kemudian klik saja pada bagian area posisi form yang di inginkan. Untuk meletakkan shape maka pilih pada bagian form control klik shape dan ketika cursor telah berubah menjadi gambar plus [ + ] maka klik pada bagian from dan tahan kemudian tarik untuk menyesuaikan ukuran dari shape yang ingin di ciptakan. Dan buat seperti gambar disamping.


Kemudian tambahkan beberapa label seperti berikut:














Kemudian atur pada properties setiap object. Contoh objek pada label1, atur propertiesnya sebagai berikut:
Untuk memperbesar tulisan maka ganti pada properti Fontsize di perbesar nilainya dan ubah pula pada properti FontBold mejadi .T. - True, untuk menebalkan tulisan tersebut.
Kemudian aturlah objek label-label yang lain untuk menjadi tampilan sebagai berikut:
Kemudian untuk menjadikan sedikit oval pada objek shape tersebut:
Perhatikan pada bagian objek shape, pada bagian sudut tidak menjadi siku (sedikit melengkung), caranya pilih pada bagian objek shape tersebut, kemudian tinggikan nilai properti Curvature nya. Misal seperti gambar diatas, yaitu menjadi 60

Kemudian tambahkan textbox seperti pada tampilan berikut:
Kemudian tambahkan command button seperti tampilan berikut:

Kemudian anturlah properti pada tiap command button tersebut, ubahlah pada propertie caption untuk mengganti tulisan pada tombol tersebut.
Perhatikan pada tulisan tombol [Save], dimana huruf S tersebut terdapat garis bawah. Untuk membuatnya berikan karakter \<>Untuk menonaktifkan textbox, pilih texbox yang akan di non aktifkan, kemudian pada bagian properti ->Enabled kemudian nilainya dijadikan .F. - False.
Maka tampilannya seperti gambar disamping. Properti Enabled ini berguna untuk mematikan fungsi textbox, agar tidak dapat di inputkan data, namun masih dapat menampilkan data.


Untuk mengganti Judul kotak dialog program, maka ubah pada bagian properti Form->Caption
Perhatikan gambar disamping. Judul Form dirubah melalu properti Caption.













Jalankan Program

Menjalankan program dengan menekan short cut CTRL + E. Hasil Eksekusi tempilan diatas adalah: