Add Edit Row Button, Transfer multiple files at once, F5 for Row Editor, Timeout for HTTP Client of 60 seconds

2022-02-03 16:22:20 +01:00
parent 2e03e1b1f3
commit 8ee955f6f2
16 changed files with 1163 additions and 949 deletions
--- a/MultiTool.Form/frmImportMain.Designer.vb
+++ b/MultiTool.Form/frmImportMain.Designer.vb
@@ -30,7 +30,6 @@ Partial Class frmImportMain
        Me.GridControlFiles = New DevExpress.XtraGrid.GridControl()
        Me.GridViewFiles = New DevExpress.XtraGrid.Views.BandedGrid.AdvBandedGridView()
        Me.gridBand1 = New DevExpress.XtraGrid.Views.BandedGrid.GridBand()
-        Me.colSelected = New DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn()
        Me.GridBand2 = New DevExpress.XtraGrid.Views.BandedGrid.GridBand()
        Me.colFilename = New DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn()
        Me.colCreatedAt = New DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn()
@@ -52,11 +51,10 @@ Partial Class frmImportMain
        Me.txtCurrentFile = New DevExpress.XtraBars.BarStaticItem()
        Me.btnConfig = New DevExpress.XtraBars.BarButtonItem()
        Me.btnRemoveRow = New DevExpress.XtraBars.BarButtonItem()
-        Me.BarWorkspaceMenuItem1 = New DevExpress.XtraBars.BarWorkspaceMenuItem()
-        Me.WorkspaceManager1 = New DevExpress.Utils.WorkspaceManager(Me.components)
        Me.btnTestTransferFile = New DevExpress.XtraBars.BarButtonItem()
        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
        Me.btnDebugExportReport = New DevExpress.XtraBars.BarButtonItem()
+        Me.btnEditRow = New DevExpress.XtraBars.BarButtonItem()
        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
        Me.RibbonPageGroup4 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
@@ -85,6 +83,7 @@ Partial Class frmImportMain
        Me.GridView3 = New DevExpress.XtraGrid.Views.Grid.GridView()
        Me.GridControl4 = New DevExpress.XtraGrid.GridControl()
        Me.GridView4 = New DevExpress.XtraGrid.Views.Grid.GridView()
+        Me.WorkspaceManager1 = New DevExpress.Utils.WorkspaceManager(Me.components)
        Me.BehaviorManager = New DevExpress.Utils.Behaviors.BehaviorManager(Me.components)
        Me.SplashScreenManager = New DevExpress.XtraSplashScreen.SplashScreenManager(Me, GetType(Global.MultiTool.Form.frmWaitForm), True, True)
        CType(Me.SplitContainerMain, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -147,7 +146,7 @@ Partial Class frmImportMain
        '
        Me.SplitContainerMain.Panel2.Controls.Add(Me.SplitContainerGrids)
        resources.ApplyResources(Me.SplitContainerMain.Panel2, "SplitContainerMain.Panel2")
-        Me.SplitContainerMain.SplitterPosition = 340
+        Me.SplitContainerMain.SplitterPosition = 287
        '
        'GridControlFiles
        '
@@ -161,9 +160,13 @@ Partial Class frmImportMain
        'GridViewFiles
        '
        Me.GridViewFiles.Bands.AddRange(New DevExpress.XtraGrid.Views.BandedGrid.GridBand() {Me.gridBand1, Me.GridBand2})
-        Me.GridViewFiles.Columns.AddRange(New DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn() {Me.colSelected, Me.colFilename, Me.colMandator, Me.colCreatedAt})
+        Me.GridViewFiles.Columns.AddRange(New DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn() {Me.colFilename, Me.colMandator, Me.colCreatedAt})
        Me.GridViewFiles.GridControl = Me.GridControlFiles
        Me.GridViewFiles.Name = "GridViewFiles"
+        Me.GridViewFiles.OptionsSelection.CheckBoxSelectorColumnWidth = 25
+        Me.GridViewFiles.OptionsSelection.CheckBoxSelectorField = "Selected"
+        Me.GridViewFiles.OptionsSelection.MultiSelect = True
+        Me.GridViewFiles.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CheckBoxRowSelect
        Me.GridViewFiles.OptionsView.ShowBands = False
        Me.GridViewFiles.OptionsView.ShowDetailButtons = False
        Me.GridViewFiles.OptionsView.ShowGroupPanel = False
@@ -172,20 +175,7 @@ Partial Class frmImportMain
        'gridBand1
        '
        resources.ApplyResources(Me.gridBand1, "gridBand1")
-        Me.gridBand1.Columns.Add(Me.colSelected)
-        Me.gridBand1.VisibleIndex = 0
-        '
-        'colSelected
-        '
-        Me.colSelected.AutoFillDown = True
-        resources.ApplyResources(Me.colSelected, "colSelected")
-        Me.colSelected.FieldName = "Selected"
-        Me.colSelected.ImageOptions.SvgImage = Global.MultiTool.Form.My.Resources.Resources.actions_send2
-        Me.colSelected.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16)
-        Me.colSelected.MinWidth = 27
-        Me.colSelected.Name = "colSelected"
-        Me.colSelected.OptionsColumn.FixedWidth = True
-        Me.colSelected.UnboundType = DevExpress.Data.UnboundColumnType.[Boolean]
+        Me.gridBand1.VisibleIndex = -1
        '
        'GridBand2
        '
@@ -193,7 +183,7 @@ Partial Class frmImportMain
        Me.GridBand2.Columns.Add(Me.colFilename)
        Me.GridBand2.Columns.Add(Me.colCreatedAt)
        Me.GridBand2.Columns.Add(Me.colMandator)
-        Me.GridBand2.VisibleIndex = 1
+        Me.GridBand2.VisibleIndex = 0
        '
        'colFilename
        '
@@ -230,11 +220,10 @@ Partial Class frmImportMain
        'RibbonControl
        '
        Me.RibbonControl.ExpandCollapseItem.Id = 0
-        Me.RibbonControl.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl.ExpandCollapseItem, Me.RibbonControl.SearchEditItem, Me.txtFilesLoaded, Me.btnLoadFiles, Me.btnTransferFile, Me.btnOpenInputDirectory, Me.btnOpenOutputDirectory, Me.btnOpenSchemaDirectory, Me.btnReloadFile, Me.btnTransferAllFiles, Me.btnOpenReport, Me.btnShowXml, Me.btnOpenLogDirectory, Me.btnOpenConfigDirectory, Me.txtCurrentFile, Me.btnConfig, Me.btnRemoveRow, Me.BarWorkspaceMenuItem1, Me.btnTestTransferFile, Me.BarButtonItem1, Me.btnDebugExportReport})
+        Me.RibbonControl.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl.ExpandCollapseItem, Me.RibbonControl.SearchEditItem, Me.txtFilesLoaded, Me.btnLoadFiles, Me.btnTransferFile, Me.btnOpenInputDirectory, Me.btnOpenOutputDirectory, Me.btnOpenSchemaDirectory, Me.btnReloadFile, Me.btnTransferAllFiles, Me.btnOpenReport, Me.btnShowXml, Me.btnOpenLogDirectory, Me.btnOpenConfigDirectory, Me.txtCurrentFile, Me.btnConfig, Me.btnRemoveRow, Me.btnTestTransferFile, Me.BarButtonItem1, Me.btnDebugExportReport, Me.btnEditRow})
        resources.ApplyResources(Me.RibbonControl, "RibbonControl")
-        Me.RibbonControl.MaxItemId = 34
+        Me.RibbonControl.MaxItemId = 36
        Me.RibbonControl.Name = "RibbonControl"
-        Me.RibbonControl.PageHeaderItemLinks.Add(Me.BarWorkspaceMenuItem1)
        Me.RibbonControl.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1, Me.RibbonPage2})
        Me.RibbonControl.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemComboBox1, Me.RepositoryItemProgressBar1})
        Me.RibbonControl.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
@@ -297,7 +286,6 @@ Partial Class frmImportMain
        'btnTransferAllFiles
        '
        resources.ApplyResources(Me.btnTransferAllFiles, "btnTransferAllFiles")
-        Me.btnTransferAllFiles.Enabled = False
        Me.btnTransferAllFiles.Id = 13
        Me.btnTransferAllFiles.ImageOptions.SvgImage = Global.MultiTool.Form.My.Resources.Resources.actions_send
        Me.btnTransferAllFiles.Name = "btnTransferAllFiles"
@@ -356,18 +344,6 @@ Partial Class frmImportMain
        Me.btnRemoveRow.ImageOptions.SvgImage = Global.MultiTool.Form.My.Resources.Resources.actions_deletecircled
        Me.btnRemoveRow.Name = "btnRemoveRow"
        '
-        'BarWorkspaceMenuItem1
-        '
-        resources.ApplyResources(Me.BarWorkspaceMenuItem1, "BarWorkspaceMenuItem1")
-        Me.BarWorkspaceMenuItem1.Id = 28
-        Me.BarWorkspaceMenuItem1.Name = "BarWorkspaceMenuItem1"
-        Me.BarWorkspaceMenuItem1.WorkspaceManager = Me.WorkspaceManager1
-        '
-        'WorkspaceManager1
-        '
-        Me.WorkspaceManager1.TargetControl = Me
-        Me.WorkspaceManager1.TransitionType = PushTransition1
-        '
        'btnTestTransferFile
        '
        resources.ApplyResources(Me.btnTestTransferFile, "btnTestTransferFile")
@@ -389,6 +365,13 @@ Partial Class frmImportMain
        Me.btnDebugExportReport.ImageOptions.SvgImage = Global.MultiTool.Form.My.Resources.Resources.exporttopdf
        Me.btnDebugExportReport.Name = "btnDebugExportReport"
        '
+        'btnEditRow
+        '
+        resources.ApplyResources(Me.btnEditRow, "btnEditRow")
+        Me.btnEditRow.Id = 35
+        Me.btnEditRow.ImageOptions.SvgImage = Global.MultiTool.Form.My.Resources.Resources.editquery
+        Me.btnEditRow.Name = "btnEditRow"
+        '
        'RibbonPage1
        '
        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup4, Me.RibbonPageGroup3, Me.RibbonPageGroup7})
@@ -419,6 +402,7 @@ Partial Class frmImportMain
        '
        'RibbonPageGroup7
        '
+        Me.RibbonPageGroup7.ItemLinks.Add(Me.btnEditRow)
        Me.RibbonPageGroup7.ItemLinks.Add(Me.btnRemoveRow)
        Me.RibbonPageGroup7.Name = "RibbonPageGroup7"
        resources.ApplyResources(Me.RibbonPageGroup7, "RibbonPageGroup7")
@@ -605,6 +589,11 @@ Partial Class frmImportMain
        Me.GridView4.GridControl = Me.GridControl4
        Me.GridView4.Name = "GridView4"
        '
+        'WorkspaceManager1
+        '
+        Me.WorkspaceManager1.TargetControl = Me
+        Me.WorkspaceManager1.TransitionType = PushTransition1
+        '
        'SplashScreenManager
        '
        Me.SplashScreenManager.ClosingDelay = 500
@@ -699,7 +688,6 @@ Partial Class frmImportMain
    Friend WithEvents RibbonPageGroup5 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
    Friend WithEvents RepositoryItemComboBox1 As DevExpress.XtraEditors.Repository.RepositoryItemComboBox
    Friend WithEvents GridViewFiles As DevExpress.XtraGrid.Views.BandedGrid.AdvBandedGridView
-    Friend WithEvents colSelected As DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn
    Friend WithEvents colCreatedAt As DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn
    Friend WithEvents colMandator As DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn
    Friend WithEvents colFilename As DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn
@@ -725,12 +713,12 @@ Partial Class frmImportMain
    Friend WithEvents GridView3 As GridView
    Friend WithEvents GridControl4 As DevExpress.XtraGrid.GridControl
    Friend WithEvents GridView4 As GridView
-    Friend WithEvents BarWorkspaceMenuItem1 As DevExpress.XtraBars.BarWorkspaceMenuItem
    Friend WithEvents WorkspaceManager1 As DevExpress.Utils.WorkspaceManager
    Friend WithEvents btnTestTransferFile As DevExpress.XtraBars.BarButtonItem
-    Friend WithEvents gridBand1 As DevExpress.XtraGrid.Views.BandedGrid.GridBand
-    Friend WithEvents GridBand2 As DevExpress.XtraGrid.Views.BandedGrid.GridBand
    Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
    Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
    Friend WithEvents btnDebugExportReport As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents gridBand1 As DevExpress.XtraGrid.Views.BandedGrid.GridBand
+    Friend WithEvents GridBand2 As DevExpress.XtraGrid.Views.BandedGrid.GridBand
+    Friend WithEvents btnEditRow As DevExpress.XtraBars.BarButtonItem
 End Class