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

EDMIBenchmark: clean up

Browse Source
This commit is contained in:
Jonathan Jenne 2021-02-04 16:57:12 +01:00
parent fe6b1476bb
commit 95173cdf15
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
GUIs.Test.EDMIBenchmark/Form1.vb
View File

@ -6,6 +6,7 @@ Imports DevExpress.XtraEditors.Controls
Imports System.IO Imports System.IO
Imports DigitalData.Modules.EDMI.API.EDMIServiceReference Imports DigitalData.Modules.EDMI.API.EDMIServiceReference
Imports DigitalData.GUIs.Common Imports DigitalData.GUIs.Common
Imports DigitalData.Modules.ZooFlow.State
Public Class Form1 Public Class Form1
Private _LogConfig As LogConfig Private _LogConfig As LogConfig
@ -159,12 +160,15 @@ Public Class Form1
} }
} }
Dim oEnv As New DigitalData.Modules.ZooFlow.Environment() With { Dim oEnv As New DigitalData.Modules.ZooFlow.Environment() With {
.Service = New DigitalData.Modules.ZooFlow.State.ServiceState() With { .Service = New ServiceState() With {
.IsActive = True, .IsActive = True,
.Address = "172.24.12.39:9000" .Address = "172.24.12.39:9000"
}, },
.Settings = New DigitalData.Modules.ZooFlow.State.SettingsState With { .Settings = New SettingsState With {
.GdPictureKey = "21182889975216572111813147150675976632" .GdPictureKey = "21182889975216572111813147150675976632"
},
.User = New UserState() With {
.UserId = 2
} }
} }
Dim oForm As New frmDocumentResultList(_LogConfig, oEnv, oParams) Dim oForm As New frmDocumentResultList(_LogConfig, oEnv, oParams)