Add Checkbox and DateTime Editor for frmEdit, New LookupGrid WIP

This commit is contained in:
Jonathan Jenne
2019-02-28 17:33:47 +01:00
parent 667b8f1b2f
commit cfbcd8a8f2
22 changed files with 574 additions and 74 deletions

View File

@@ -17,19 +17,19 @@ Public Class ClassControlPatcher(Of T As Control)
_Container = Container
End Sub
Public Function ProcessContainer(Action As Action(Of T)) As ClassControlPatcher(Of T)
Public Function ProcessContainer(Action As Action(Of T, Control)) As ClassControlPatcher(Of T)
Return ProcessContainer(_Container, Action)
End Function
Public Function ProcessControl(Action As Action(Of T), ByVal Control As Control) As ClassControlPatcher(Of T)
Action(Control)
Public Function ProcessControl(Action As Action(Of T, Control), ByVal Control As Control) As ClassControlPatcher(Of T)
Action(Control, _Container)
Return Me
End Function
Private Function ProcessContainer(ByVal Container As Control, Action As Action(Of T)) As ClassControlPatcher(Of T)
Private Function ProcessContainer(ByVal Container As Control, Action As Action(Of T, Control)) As ClassControlPatcher(Of T)
For Each oControl As Control In Container.Controls
If oControl.[GetType]() = GetType(T) Then
Action(oControl)
Action(oControl, Container)
Else
ProcessContainer(oControl, Action)
End If