jj 22.06 visible / treeview property

This commit is contained in:
JenneJ
2016-06-22 13:12:09 +02:00
parent d71de0dc2f
commit c8d0b3f52b
6 changed files with 104 additions and 5 deletions

View File

@@ -704,6 +704,7 @@
props.Name = r.Item("CONTROL_NAME")
props.Size = New Size(r.Item("CTRLSCR_WIDTH"), r.Item("CTRLSCR_HEIGHT"))
props.Location = New Point(r.Item("CTRLSCR_X_LOC"), r.Item("CTRLSCR_Y_LOC"))
props.Visible = ClassConverter.ToBooleanOrDefault(r.Item("CONTROL_VISIBLE"), True)
props.Hint = hint
'Control-spezifische Properties laden
@@ -717,6 +718,7 @@
props.ColumnTitle = r.Item("CONTROL_COL_NAME")
props.Caption = r.Item("CTRLSCR_CAPTION")
props.SQLCommand = New SQLValue(NotNull(r.Item("CONTROL_SQLCOMMAND_1"), ""))
props.TreeView = CBool(r.Item("CONTROL_VISIBLE"))
Case "Textbox"
props.ControlType = "TextBox"
@@ -735,6 +737,7 @@
props.Multiline = r.Item("CONTROL_MULTILINE")
props.SQLCommand = New SQLValue(NotNull(r.Item("CONTROL_SQLCOMMAND_1"), ""))
props.EnabledWhen = New SQLValue(r.Item("CONTROL_SQLCOMMAND_2").ToString())
props.TreeView = CBool(r.Item("CONTROL_TREE_VIEW"))
Case "Combobox"
props.ControlType = "ComboBox"
@@ -755,6 +758,7 @@
props.ShowColumn = NotNull(CBool(r.Item("CONTROL_SHOW_COLUMN")), True)
props.SQLCommand = New SQLValue(NotNull(r.Item("CONTROL_SQLCOMMAND_1"), ""))
props.EnabledWhen = New SQLValue(r.Item("CONTROL_SQLCOMMAND_2").ToString())
props.TreeView = CBool(r.Item("CONTROL_TREE_VIEW"))
Case "Checkbox"
props.ControlType = "CheckBox"
@@ -800,6 +804,7 @@
props.TabIndex = r.Item("CTRLSCR_TAB_INDEX")
props.SQLCommand = New SQLValue(NotNull(r.Item("CONTROL_SQLCOMMAND_1"), ""))
props.EnabledWhen = New SQLValue(r.Item("CONTROL_SQLCOMMAND_2").ToString())
props.TreeView = CBool(r.Item("CONTROL_TREE_VIEW"))
Case "Datagridview"
props.ControlType = "DataGridView/Table"
@@ -813,6 +818,7 @@
props.EnabledWhen = New SQLValue(r.Item("CONTROL_SQLCOMMAND_2").ToString())
props.IsRequired = r.Item("CONTROL_REQUIRED")
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
props.TreeView = CBool(r.Item("CONTROL_TREE_VIEW"))
Case "Groupbox"
props.ControlType = "GroupBox"
@@ -823,6 +829,7 @@
props.ControlType = "PictureBox"
props.IsRequired = r.Item("CONTROL_REQUIRED")
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
props.TreeView = CBool(r.Item("CONTROL_TREE_VIEW"))
Case "ListBox"
props.ControlType = "ListBox"
@@ -837,6 +844,7 @@
props.ColumnTitle = ClassConverter.ToStringOrDefault(r.Item("CONTROL_COL_NAME"), ctrl.Name)
props.ShowColumn = ClassConverter.ToBooleanOrDefault(r.Item("CONTROL_SHOW_COLUMN"), True)
props.EnabledWhen = New SQLValue(r.Item("CONTROL_SQLCOMMAND_2").ToString())
props.TreeView = CBool(r.Item("CONTROL_TREE_VIEW"))
Case "CheckedListBox"
props.ControlType = "CheckedListBox"
@@ -852,6 +860,8 @@
props.ShowColumn = ClassConverter.ToBooleanOrDefault(r.Item("CONTROL_SHOW_COLUMN"), True)
props.SQLCommand = New SQLValue(NotNull(r.Item("CONTROL_SQLCOMMAND_1"), ""))
props.EnabledWhen = New SQLValue(r.Item("CONTROL_SQLCOMMAND_2").ToString())
props.TreeView = CBool(r.Item("CONTROL_TREE_VIEW"))
Case "DatagridviewCheckable"
props.ControlType = "DataGridView/Table Checkable"
props.StaticList = New StaticListValue(r.Item("CONTROL_STATIC_LIST").ToString())
@@ -867,6 +877,8 @@
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
props.TabStop = r.Item("CTRLSCR_TAB_STOP")
props.TabIndex = r.Item("CTRLSCR_TAB_INDEX")
props.TreeView = CBool(r.Item("CONTROL_TREE_VIEW"))
Case "F_AddAppointment"
props.ControlType = "Function.AddToCalendar"
props.Caption() = r.Item("CTRLSCR_CAPTION")