jj 16.03 add columntitle for dgv
This commit is contained in:
@@ -1127,7 +1127,8 @@ Public Class ClassControlBuilder
|
||||
_new As Boolean,
|
||||
read_only As Boolean,
|
||||
required As Boolean,
|
||||
Optional parent As GroupBox = Nothing,
|
||||
columnTitle As String,
|
||||
Optional parent As GroupBox = Nothing,
|
||||
Optional _designMode As Boolean = False)
|
||||
|
||||
Dim control As New DataGridView
|
||||
@@ -1149,7 +1150,7 @@ Public Class ClassControlBuilder
|
||||
control.Parent = _master_panel
|
||||
control.ReadOnly = read_only
|
||||
|
||||
column.HeaderText = "Data"
|
||||
column.HeaderText = columnTitle
|
||||
column.Name = "column1"
|
||||
control.Columns.Add(column)
|
||||
|
||||
|
||||
@@ -148,6 +148,7 @@ Public Class ClassControlCommandsUI
|
||||
False,
|
||||
dr.Item("CONTROL_READ_ONLY"),
|
||||
dr.Item("CONTROL_REQUIRED"),
|
||||
dr.Item("CONTROL_COL_NAME"),
|
||||
parent)
|
||||
Case 10 ' Checkbox
|
||||
Dim Checked As Boolean = False
|
||||
|
||||
@@ -129,7 +129,7 @@
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case "dgv"
|
||||
CtrlBuilder.AddDataGridView(0, "dgv" & random, 0, 0, 0, 0, True, False, False, Parent)
|
||||
CtrlBuilder.AddDataGridView(0, "dgv" & random, 0, 0, 0, 0, True, False, False, "dgv" & random, Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case "chk"
|
||||
@@ -407,6 +407,7 @@
|
||||
False,
|
||||
dr.Item("CONTROL_READ_ONLY"),
|
||||
dr.Item("CONTROL_REQUIRED"),
|
||||
dr.Item("CONTROL_COL_NAME"),
|
||||
parent,
|
||||
True)
|
||||
Case 10 ' Checkbox
|
||||
|
||||
Reference in New Issue
Block a user