ZooFlow
This commit is contained in:
@@ -43,9 +43,13 @@ Public Class ClassDetailPages
|
||||
Public IsInsert As Boolean = False
|
||||
Public TabPage As XtraTabPage
|
||||
Public Name As String
|
||||
<Description("The Binding Source for the Form")>
|
||||
Public BindingSource As BindingSource
|
||||
<Description("The Bound Datatable in the Dataset (eg. MyDataset.TB_FOO_TABLE)")>
|
||||
Public DataTable As DataTable
|
||||
<Description("The TextEdit Control containing the AddedWho value")>
|
||||
Public AddedWhoEdit As TextEdit
|
||||
<Description("The TextEdit Control containing the ChangedWhoEdit value")>
|
||||
Public ChangedWhoEdit As TextEdit
|
||||
End Class
|
||||
|
||||
@@ -80,6 +84,10 @@ Public Class ClassDetailPages
|
||||
AddHandler oLayoutControl.GotFocus, AddressOf Handle_Focus
|
||||
|
||||
For Each oContainer As LayoutControlItem In oLayoutControl.Root.Items
|
||||
If TypeOf oContainer Is EmptySpaceItem Then
|
||||
Continue For
|
||||
End If
|
||||
|
||||
Dim oControl As BaseEdit = oContainer.Control
|
||||
AddHandler oControl.GotFocus, AddressOf Handle_Focus
|
||||
AddHandler oControl.EditValueChanged, AddressOf Handle_EditValueChanged
|
||||
|
||||
Reference in New Issue
Block a user