add logging for vector index loading in grid

This commit is contained in:
Jonathan Jenne 2021-01-13 12:01:32 +01:00
parent 917bacfba4
commit 6c81a24785

View File

@ -3265,18 +3265,26 @@ Public Class frmValidator
Dim oDataSource As DataTable = oMyGridControl.DataSource
oDataSource.Rows.Clear()
If IDB_ACTIVE = False Then
LOGGER.Debug("ValueFromSource contains {0} items", oValueFromSource)
For Each Zeile As Object In oValueFromSource
LOGGER.Debug($"vektorrow Value {Zeile.ToString}...")
oColValuesfromSource = Split(Zeile, PMDelimiter)
Dim oNewRow = oDataSource.NewRow()
LOGGER.Debug("Creating new row..")
For index = 0 To oDTColumnsPerDevExGrid.Rows.Count - 1
LOGGER.Debug("Column Index {0}", index)
If oColValuesfromSource.Length > index Then
LOGGER.Debug("Value: {0}", oColValuesfromSource(index))
oNewRow.Item(index) = oColValuesfromSource(index)
Else
LOGGER.Debug("Value: String.Empty")
oNewRow.Item(index) = String.Empty
End If
Next
LOGGER.Debug("Adding row to grid..")
oDataSource.Rows.Add(oNewRow)
'Select Case oDTColumnsPerDevExGrid.Rows.Count
@ -3433,7 +3441,7 @@ Public Class frmValidator
' RestoreDevExpressGridControl_Layout(CURRENT_CLICKED_PROFILE_ID, oControlId, oMyGridView)
Catch ex As Exception
LOGGER.Error(ex)
End Try
End If
Case "System.Windows.Forms.CheckBox"