Multi delete dbgridEH

Posted by

Oke kali ini saya akan membahas lagi tentang penggunaan fasilitas yang ada didalam dbgridEh nan sakti mandraguna, sebelum saya sendiri lupa mari tulisakan disini, kali ini saya akan menulis tentang penggunaan multi-select untuk mendelete data yang tampil pada DbGridEh, kayak apa sih wujudnya saya sendiri juga bingung mau kasi judul apaan, seperti biasa supaya gambar yang menjelaskan saja, nah kurang lebih akan tampak seperti ini..
multidel-03
Oke kurang lebih seperti pada gambar diatas bro sis, lumayan keren kan yak?? kita bisa melakukan beberapa select di beberapa record dengan menggunakan checkbox (jangan-jangan susah nih munculin checkbox nya) haha itu sama sekali tanpa kesusahan mas bro dan mbak sis, karena itu sudah ada dalam fasilitas DbGridEh, jadi bener-bener zero coding buat munculin checkboxnya, oke langsung kita mulai pertama-tama pada dbgridEh set properties Options > DgMultiSelect > True dan yang satunya  set properties IndicatorOptions > gioShowRowselCheckboxesEh > True , untuk lebih jelasnya lihat pada gambar dibawah ini
multidel-01
Note:
Sample dibuat dengan menggunakan Delphi 7, database Ms Access, dan DbGridEh (EhLib 6.2) jika terjadi ketidaksaman pelaku harap menyesuaikan, serta database bukan dalam kondisi ReadOnly jika ada pesan error seperti tersebut harap menyesuaikan juga :D.
Setelah melakukan setting sama dengan langkah diatas maka akan didapati pada dbGrid kita akan muncul kolom checkbox pada bagian kiri dan sudah bisa kita main-mainkan untuk di contreng-contreng haha. maka hasil yang sudah kita lakukan akan tampak seperti project sederhana yang sudah saya buat ini…
multidel-02
Untuk melakukan delete pada data yang kita tandai cukup menambahkan kode seperti ini..
1
2
3
4
5
6
7
8
9
10
. . .
procedure Tflatihan.beditClick(Sender: TObject);
begin
if DBgridEh1.SelectedRows.Count=0 then
begin
 MessageDlg('Tidak ada data yang ditandai...',mtWarning,[mbOK],0);
 Exit;
end;
DBgridEh1.SelectedRows.Delete;
end;
Oke tuntas sudah trick sederhana ini, selenjutnya tinggal kemampuan anda untuk berkreasi, bagi yang ingin mendownload contoh project ini silahkan sedoooott disini.
Terimkasi atas waktunya untuk membaca artikel sederhana ini, kritik, saran atau sekedar komentar akan sangat saya nantikan, semoga bermanfaat, terimkasih…


Demo Blog NJW V2 Updated at: 21.33

2 komentar:

Text Widget

Popular Posts