Halaman

WARNING!!
Please do not post links crack / patch in your comment

Tuesday, October 18, 2011

Search or Filter Data in GridControl

Terkadang, data yang kita tampilkan dalam bentuk grid, jika hanya beberapa baris mungkin akan mudah mencarinya, tapi jika data yang di tampilkan berjumlah ratusan bahkan ribuan data, apa kita harus mencarinya satu persatu, pasti akan memakan waktu yang lama dan perlu ketelitian.


Dalam GridControl telah disediakan untuk Search dan Filter melalui grid, berikut akan saya tampilkan fitur bawaan dari gridcontrol dalam hal searching dan filter tanpa code.


Buatlah New Project baru, kemudian tambahkan GridControl kedalam form tersebut, isikan dock dengan fill, sehingga akan memenuhi form tersebut, seperti gambar berikut :



  • Masukkan ImageCollection kedalam form
  • Masukkan gambar kedalam ImageCollection1
  • Pada GridControl1 --> UsedEmbeddedNavigator = True
  • Pada Properties GridView1, tambahkan Images= ImageCollections1
  • Pada Properties GridView1 tambakan column 5 column
  • Pada gridcolumns2-->ColumnEdit -->ImageComboboxEdit
  • Pada gridcolumns3 -->ColumnEdit--> DateEdit
  • Pada gridcolumns3 -->UnboundType = String
  • pada gridcolumns4 --> Visibled = False
Pada properties masing-masing control anda bisa lihat pada source code yang telah di sediakan diakhir posting ini, anda bisa lihat perubahan apa saja di dalam properties GridControl atau GridView.
Pada contoh ini, saya menggunakan database access, sehingga untuk koneksi ke database saya menggunakan oledb sbb:

Public con As New OleDb.OleDbConnection
    Dim dtTable As DataTable
    Public Sub opencon()
        Try
            Dim Path As String = Application.StartupPath + "\" + "udinsofyanblogspotcom.accdb"
            con = New OleDb.OleDbConnection
            con.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source= " & Path & ";Jet OLEDB:Database Password=; "
            If con.State = ConnectionState.Closed Then con.Open()
        Catch ex As OleDbException
            Throw ex
End Sub

Pada script di atas saya mengambil databasenya sama dengan direktori dimana program ini di jalankan, jadi pastikan database dalam satu direktory, kecuali anda rubah path database sendiri.
Untuk mengambil data dari database saya menggunakan script berikut :

Sub ConnectionDB()
        Try
            opencon()
            Dim cmd As New OleDbCommand("select * from sample", con)
            Dim ada As New OleDbDataAdapter(cmd)
            dtTable = New DataTable
            ada.Fill(dtTable)
            GridControl1.DataSource = Nothing
            GridControl1.DataSource = dtTable
        Catch ex As Exception
            MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
            Exit Sub
        Finally
            con.Close()
        End Try
    End Sub

 Jika Program dijalankan akan seperti ini :


 Jika kita ingin Search di No Id dengan awalan dari b maka akan seperti ini :


anda bisa lihat, begitu huruf b di tulis langsung semua data dalam grid akan filter data di column No Id menjadi awalan b semua, anda juga bisa lihat pada garis merah, pada column tersebut anda bisa mencari data berdasarkan No Id, Nama Gender atau Tanggal .... tidak perlu code lagi dan tidak perlu buat script untuk membuat hal tersebut.


sekarang apa saja yang bisa di filter oleh grid


anda bisa perhatikan pada column No Id, coba anda klik tanda filter samping kanan atas column No Id, jika di klik akan seperti itu, sekarang coba klik Edit Filter di kanan bawah seperti pada lingkaran tersebut, maka akan keluar seperti berikut :


anda di berikan custom filter lagi untuk menyaring data yang di perlukan, anda bisa explore lagi untuk edit filter ini. ...... selamat mencoba...



Salam

Download source code:
Search Or Filter Data In GridControl

3 comments:

  1. Terima kasih mas udin, sepertinya hampir sama dgn C1 ( baru tadi pagi saya tanya sekarang ud ada contohnya, sekali lagi terima kasih ). satu lagi mas udin, reportnya terasa belum lengkap tanpa report (XtraReport). Maaf mas udin terlalu banya mintanya, kalau ada yang bisa saya bantu saya bantu deh .... hehh...hee...hee...

    ReplyDelete
  2. pasti saya akan buatkan mas made, tapi saya harus keluarin yang dasar-dasar dahulu, karena kalau langsung ke report kayak jadi loncat, untuk yang baru belajar jadi bingung...

    ReplyDelete
  3. Oh yah, bener tuh mas udin saya setuju, saya juga masih baru di vb.net, jadi saya setuju dengan materi yang mas udin sediakan.

    ReplyDelete

Note: Only a member of this blog may post a comment.

Search This Blog