jj 23.06
This commit is contained in:
@@ -51,7 +51,7 @@
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(DesignerCtrlBuilder.CurrentControl)
|
||||
Case "txt"
|
||||
DesignerCtrlBuilder.AddTextBox(0, "txt" & random, 0, 0, def_font_family, def_font_color, def_font_size, def_font_style, 0, True, 0, 0, False, False, False, "String", True, Parent)
|
||||
DesignerCtrlBuilder.AddTextBox(0, "txt" & random, 0, 0, def_font_family, def_font_color, def_font_size, def_font_style, 0, True, 0, 0, False, False, False, "String", False, True, Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(DesignerCtrlBuilder.CurrentControl)
|
||||
Case "cmb"
|
||||
@@ -263,6 +263,7 @@
|
||||
dr.Item("CONTROL_READ_ONLY"),
|
||||
dr.Item("CONTROL_REQUIRED"),
|
||||
dr.Item("CONTROL_FORMAT_TYPE"),
|
||||
dr.Item("CONTROL_AUTO_SUGGEST"),
|
||||
False,
|
||||
parent,
|
||||
True)
|
||||
@@ -751,6 +752,7 @@
|
||||
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"))
|
||||
props.AutoSuggest = CBool(r.Item("CONTROL_AUTO_SUGGEST"))
|
||||
|
||||
Case "Combobox"
|
||||
props.ControlType = "ComboBox"
|
||||
|
||||
Reference in New Issue
Block a user