Virtual database (database sementara)

Ini mungkin katrok bagi para master Delphier yang sudah malang melintang di dunia perdelphian dan perdatabasean, namun bagi saya teknik ini lumayan seru lah, apa itu virtual table, yang belom punya silahkan langsung sedot aja dari sumbernya disini, komponen ini adalah salah satu produk free dari devart masbro dan mbaksis, jadi Halal untuk diedarkan silahkan tidak usah sungkan, atau yang mau langsung download yang sudah saya tampung di mediafire yaitu virtualtable untuk Delphi XE2 dan Delphi 7 silahkan sedot disini. cara installnya gampang udah ada installernya tinggal next2 dan ok saja :)

Komponen akan Muncul di Dalam Pallete > Data Access..

Kembali lagi apa sih Virtual Table itu?? penasaran kan?? bagi yang mahir bahasa inggris silahkan baca-baca disini. Bagi yang tidak demen saya coba jelaskan setahu saya juga :D haha, VirtualTable adalah komponen turunan dari Tdataset berfungsi menyimpan data sementara didalam memory, layaknya database, “gunaya buat apa sih??” ada yang pernah buat aplikasi transaksi jual/beli? atau semacamnya? nah pasti sering menggunakan stringgrid (:3 ane pernah pakek juga, hihi) untuk menampung item yang sedang dalam proses beli/jual (kasir) kan?? tujuanya apa?? pastilah supaya data yang “belum pasti disimpan” tidak masuk kedatabase langsung, yang pasti coding stringgrid ruwet lah  ya dah pada tau sendiri, seiring perkembangan muncul ide bikin temporari table di database, jadi datamasuk ke temporari dulu sebelum bener2 disimpan :D kelihatanya udah merasa keren banget saat bisa ini, eits tapi ternyata ada kendala juga saat database diakses lebih dari satu user secara bersamaan, pastilah ada cara mengakalinya tapi masih bahaya juga klo misal koneksi atau listrik mati, T.T ketinggalan deh itu data didatabase. (sekali lagi ini cara nyubi, kalo para master pastilah sudah memanfaatkan penuh kemampuan database :D jadi jgan diketawaain yah).

Gambaran Penggunaan Temporary Table

Tatarraaaaaa… nah akhirnya gue nemu deh solusi buat penyimpanan sementara tadi yaitu virtual table, karena dia menyimpan data sementara dimemory masing masing komputer jadi tidak akan menggangu user lain maupun database yang diakses lebih dari satu user tadi.. Bagaimana cara menggunakanya?? ayoo silahkan simak

Pertama-tama tentunya tambahkan komponen TVirtualTable ke dalam Form, Setelah itu Properties >FieldsDef

Maka Akan dihadapkan seperti tampilan dibawah ini,

Selanjutnya klik icon untuk menambahkan field, ini sudah sama seperti membuat filed dalam database lihat bagian properties kita diberi pilihan tipe data, nama filed, serta size nya. Selanjutnya tambahkan semua filed yang dibutuhkan setelah selesai bisa dicheck dengan doubleclick pada komponen TVirtualTable maka akan tampak seperti gambar dibawah ini,

Disini kita juga bisa melakukan test dengan menambahkan data lewat navigator yang tersedia, oke untuk penggunaan di dalam aplikasinya sangatlahmudah sama seperti memasukan data kedalam databasae dengan komponen rumpun dari dataset saya biasa menggunakan code seperti ini :

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Temp.Append // untuk memasukan record baru Temp['kdbarang']:=eKode.Text; Temp['jenis']:=eJenis.Text; Temp['ukuran']:=eUkuran.Text; Temp['harga']:=eHarga.Text; Temp['qty']:=eQty.Text; Temp['disc']:=eDisc.Text; Temp['subtotal']:=eGrand.Text; Temp['stok']:=eStok.Text; Temp.Post; //keterangan : Temp = name VirtualTable //gunakan Temp.Edit, Temp.Delete //untuk merubah dan hapus record //untuk mengosongkan Virtualtable //Temp.Clear; //Temp.Active:=True;

:) Senang bisa berbagi, semoga artikel ini juga bermanfaat bagi para delphier sekalian yang sedang belajar seperti saya juga, terimakasih…