Bài viết mới
- [C#] Chia sẽ source code nhận dạng nhiều khuôn mặt RealTime
- [C#] Đặt mật khẩu bảo vệ cho database Sqlite
- [C#] Tách file thành nhiều phần để download
- [SQL SERVER] Chia sẽ hàm convert table sang class C#
- [C#] Hướng dẫn Split files and Merge files
- [C#] Hướng dẫn Sử dụng IL Disassembler (ildasm.exe) và IL Assembler (ilasm.exe) để chỉnh sửa mã nguồn
- [C#] Hướng dẫn lấy icon từ process
- [C#] Hướng dẫn chuyển đổi chuỗi sang nhị phân và ngược lại
- [C#] Hướng dẫn sử dụng Expando Object với từ khóa Dynamic
- [C#] Hướng dẫn sử dụng thuật toán mã hóa và giải mã Atom-128 algorithm
- [C#] Hướng dẫn sắp xếp column listview (sort column header listview)
- [C#] Hướng dẫn lấy icon từ thuộc tính file shell32.dll trong windows
- [SQL SERVER] Hướng dẫn tạo bảng cấu trúc cây theo phương pháp đệ quy
- [SQL SERVER] Hướng dẫn sử dụng hàm WITH để đệ quy trong sql
- C# - Kéo thả dòng từ một lưới sang một lưới khác trong cùng một form
- [C#] Hướng dẫn tạo checkbox Datagridview và truyền dữ liệu giữa hai Gridview
- [C#] Hướng dẫn sử dụng StopWatch để kiểm tra tốc độ xử lý trong Visual Studio
- [C#] Hướng dẫn tạo hotkey cho ứng dụng winform
- [C#] Hướng dẫn mã hóa và giải mã sử dụng thuật toán ROT13
- [C#] Hướng dẫn sử dụng thuật toán mã hóa RC4 (Rivest Cipher 4 )
[DEVEXPRESS] Hướng dẫn Move up và Move down giữa các dòng trong gridview
Bài viết hôm nay, mình sẽ hướng dẫn cho các bạn cách di chuyển giữa các dòng trên gridview của Devexpress. Có thể di chuyển lên xuống hoặc drag and drop.
- Với công việc này sẽ giúp cho các bạn dễ dàng sắp xếp dữ liệu trên gridview một cách dễ dàng.
Xem hình ảnh demo ứng dụng:
Source code VB.NET
- Viết sự kiện cho nút Up
Private Sub button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button1.Click Dim view As GridView = gridView1 view.GridControl.Focus() Dim index As Integer = view.FocusedRowHandle If index <= 0 Then Return End If Dim row1 As DataRow = view.GetDataRow(index) Dim row2 As DataRow = view.GetDataRow(index - 1) Dim val1 As Object = row1(OrderFieldName) Dim val2 As Object = row2(OrderFieldName) row1(OrderFieldName) = val2 row2(OrderFieldName) = val1 view.FocusedRowHandle = index - 1 End Sub
- Viết sự kiện cho nút Down
Private Sub button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button2.Click Dim view As GridView = gridView1 view.GridControl.Focus() Dim index As Integer = view.FocusedRowHandle If index >= view.DataRowCount - 1 Then Return End If Dim row1 As DataRow = view.GetDataRow(index) Dim row2 As DataRow = view.GetDataRow(index + 1) Dim val1 As Object = row1(OrderFieldName) Dim val2 As Object = row2(OrderFieldName) row1(OrderFieldName) = val2 row2(OrderFieldName) = val1 view.FocusedRowHandle = index + 1 End Sub
- Viết sự kiện cho nút form load
Private Sub FillDataSet() dataTable1.Rows.Add(New Object() { 1, "abstract", 1 }) dataTable1.Rows.Add(New Object() { 2, "event", 2 }) dataTable1.Rows.Add(New Object() { 3, "new", 3 }) dataTable1.Rows.Add(New Object() { 4, "struct", 4 }) dataTable1.Rows.Add(New Object() { 5, "as", 5 }) dataTable1.Rows.Add(New Object() { 6, "explicit", 6 }) dataTable1.Rows.Add(New Object() { 7, "null", 7 }) dataTable1.Rows.Add(New Object() { 8, "switch", 8 }) dataTable1.Rows.Add(New Object() { 9, "base", 9 }) dataTable1.Rows.Add(New Object() { 10, "extern", 10 }) dataTable1.Rows.Add(New Object() { 11, "object", 11 }) dataTable1.Rows.Add(New Object() { 12, "this", 12 }) dataTable1.Rows.Add(New Object() { 13, "bool", 13 }) dataTable1.Rows.Add(New Object() { 14, "false", 14 }) dataTable1.Rows.Add(New Object() { 15, "operator", 15 }) dataTable1.Rows.Add(New Object() { 16, "throw", 16 }) dataTable1.Rows.Add(New Object() { 17, "break", 17 }) dataTable1.AcceptChanges() End Sub Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load FillDataSet() gridControl1.DataSource = dataTable1 gridView1.PopulateColumns() gridView1.Columns(OrderFieldName).SortOrder = DevExpress.Data.ColumnSortOrder.Ascending gridView1.OptionsCustomization.AllowSort = False gridView1.OptionsView.ShowGroupPanel = False End Sub
=> Chúc các bạn thành công.