diff --git a/app/DD_PM_WINDREAM/frmValidator.vb b/app/DD_PM_WINDREAM/frmValidator.vb index 242b1df..4a8e72a 100644 --- a/app/DD_PM_WINDREAM/frmValidator.vb +++ b/app/DD_PM_WINDREAM/frmValidator.vb @@ -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"