AppStd/Monorepo
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Organize Control Classes in Namespaces

Browse Source
This commit is contained in:
Jonathan Jenne
2019-03-27 15:59:16 +01:00
parent d7a4a4441d
commit 0eb1eeb287
34 changed files with 670 additions and 234 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
EDMI_ClientSuite/FormWorkflow/frmWorkflowStep.vb
View File

@@ -1,9 +1,10 @@
Imports DevExpress.XtraLayout
Imports DigitalData.GUIs.ClientSuite
Imports DigitalData.GUIs.ClientSuite.Controls
Public Class frmWorkflowStep
Private _ControlLoader As ClassControlLoader
Private _ControlData As ClassControlData
Private _ControlLoader As ControlLoader
Private _ControlData As ControlData
Private _FormId As Int64
Private _RequestId As Int64
@@ -54,12 +55,16 @@ Public Class frmWorkflowStep
_HeaderGroup = LayoutControlGroupMain.AddGroup("Request Header")
_BodyGroup = LayoutControlGroupMain.AddGroup("Control Body")
_ControlLoader = New ClassControlLoader(My.LogConfig, _BodyGroup)
_ControlData = New ClassControlData(My.LogConfig)
_ControlLoader = New ControlLoader(My.LogConfig, _BodyGroup)
_ControlData = New ControlData(My.LogConfig)
LayoutControl1.BeginUpdate()
_ControlLoader.LoadControls(oControlTable)
_ControlData.LoadControlData(_ControlLoader.LayoutControls, oControlData)
LayoutControl1.EndUpdate()
_ControlLoader.AddControl("Process Name", _ProcessName, _HeaderGroup)
_ControlLoader.AddControl("Request Name", _RequestName, _HeaderGroup)
End Sub