jj 15.03 datagridview can add rows
This commit is contained in:
@@ -233,6 +233,11 @@ Public Class ClassControlValues
|
||||
Dim picturebox = DirectCast(control, PictureBox)
|
||||
LoadImage(recordId, controlId, picturebox)
|
||||
|
||||
Case GetType(DataGridView)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(">> Sub LoadControlValueNeu - GetType(DataGridView) ", False)
|
||||
Dim gridview = DirectCast(control, DataGridView)
|
||||
ControlLoader.DataGridView.LoadValue(gridview, values)
|
||||
|
||||
Case Else
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(">> Sub LoadControlValue - Control-Type nicht berücksichtigt: " & GetType(Control).ToString(), False)
|
||||
End Select
|
||||
@@ -297,11 +302,6 @@ Public Class ClassControlValues
|
||||
Dim chlistbox = DirectCast(Ctrl, DevExpress.XtraEditors.CheckedListBoxControl)
|
||||
ControlLoader.CheckedListBox.LoadList(chlistbox, FormID, ConnID, sqlcommand)
|
||||
|
||||
Case GetType(DataGridView)
|
||||
Dim gridview = DirectCast(Ctrl, DataGridView)
|
||||
Dim noSQL As String = ""
|
||||
ControlLoader.DataGridView.LoadList(gridview, FormID, ConnID, noSQL)
|
||||
|
||||
End Select
|
||||
|
||||
swcontrol.Stop()
|
||||
|
||||
Reference in New Issue
Block a user