This commit is contained in:
SchreiberM
2016-06-10 08:49:06 +02:00
parent af27d8f335
commit 8b999ee7cb
2 changed files with 7 additions and 4 deletions

View File

@@ -683,10 +683,13 @@ Public Class ClassControlValues
Dim controlId As Integer = row.Item("CONTROL_ID")
Dim controlName As String = row.Item("CONTROL_NAME")
Dim control As Control = controls.Find(controlName, False)(0)
LoadDefaultValue(controlId, RecordID, control, parentRecordID, EntityID, defaultValue)
Try
Dim control As Control = controls.Find(controlName, False)(0)
LoadDefaultValue(controlId, RecordID, Control, parentRecordID, EntityID, defaultValue)
Catch ex As Exception
ClassLogger.Add("Unexpected Error in getting default value for control '" & controlName & " - " & ex.Message, True)
End Try
Next

View File

@@ -3815,7 +3815,7 @@ Public Class frmConstructor_Main
End If
Dim Width = DT_WINDREAM_RESULTLIST.Rows(0).Item(String.Format("{0}_WIDTH", col.ColumnName))
If Not IsNothing(Width) And Not IsDBNull(Width) Then
GridViewDoc_Search.Columns.Item(rowvalue). = Width
' GridViewDoc_Search.Columns.Item(rowvalue). = Width
End If
Next