jj: rename usercontrols folder to widgets

This commit is contained in:
Jonathan Jenne
2019-02-05 13:37:44 +01:00
parent 54af1a770b
commit 8d301d14ce
4 changed files with 3 additions and 3 deletions

View File

@@ -0,0 +1,20 @@
Public Class ProcessManagerWidget
Public Delegate Sub RowDoubleClickedDelegate(RowView As DataRowView)
Public Event RowDoubleClicked As RowDoubleClickedDelegate
Public Property DataSource As DataTable
Get
Return GridMain.DataSource
End Get
Set(value As DataTable)
GridMain.DataSource = value
End Set
End Property
Private Sub ViewMain_RowClick(sender As Object, e As DevExpress.XtraGrid.Views.Grid.RowClickEventArgs) Handles ViewMain.RowClick
If e.Clicks = 2 Then
Dim oRow As DataRowView = ViewMain.GetRow(e.RowHandle)
RaiseEvent RowDoubleClicked(oRow)
End If
End Sub
End Class