reorganize form designer & final index properties
This commit is contained in:
Jonathan Jenne
parent
6e9b190f00
commit
8c76b53273
@ -2,4 +2,11 @@
|
||||
Public Const OpModeFS_PWM = "PURE_WM"
|
||||
Public Const OpModeFS_IDBWM = "IDB_WM"
|
||||
Public Const OpModeFS_ZF = "ZOOFLOW"
|
||||
|
||||
Public Const CAT_INFORMATION = "Information"
|
||||
Public Const CAT_GENERAL = "Allgemein"
|
||||
Public Const CAT_DISPLAY = "Anzeige"
|
||||
Public Const CAT_BEHAVIOUR = "Verhalten"
|
||||
Public Const CAT_DATA = "Daten"
|
||||
Public Const CAT_VALIDATION = "Validierung"
|
||||
End Class
|
||||
|
||||
@ -5,6 +5,7 @@ Imports System.Globalization
|
||||
Imports DigitalData.Modules.Language.Utils
|
||||
|
||||
Public Module ModuleControlProperties
|
||||
|
||||
Public Enum IndexTypes
|
||||
SimpleIndex = 0
|
||||
VectorIndex = 1
|
||||
@ -14,27 +15,28 @@ Public Module ModuleControlProperties
|
||||
Private _size As Size
|
||||
Private _font As Font
|
||||
|
||||
|
||||
<Category("Allgemein")>
|
||||
<DisplayName("Changed At")>
|
||||
<Category(ClassConstants.CAT_INFORMATION)>
|
||||
<[ReadOnly](True)>
|
||||
Public Property ChangedAt As Date
|
||||
|
||||
<Category("Allgemein")>
|
||||
<DisplayName("Changed Who")>
|
||||
<Category(ClassConstants.CAT_INFORMATION)>
|
||||
<[ReadOnly](True)>
|
||||
Public Property ChangedWho As String
|
||||
|
||||
<Category("Allgemein")>
|
||||
<Category(ClassConstants.CAT_GENERAL)>
|
||||
<[ReadOnly](True)>
|
||||
Public Property ID() As Integer
|
||||
|
||||
<Category("Allgemein")>
|
||||
<Category(ClassConstants.CAT_GENERAL)>
|
||||
Public Property Name() As String
|
||||
|
||||
|
||||
<Category("Anzeige")>
|
||||
<Category(ClassConstants.CAT_DISPLAY)>
|
||||
Public Property Location() As Point
|
||||
|
||||
<Category("Anzeige")>
|
||||
<Category(ClassConstants.CAT_DISPLAY)>
|
||||
Public Property Size() As Size
|
||||
Get
|
||||
Return _size
|
||||
@ -52,7 +54,7 @@ Public Module ModuleControlProperties
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Category("Anzeige")>
|
||||
<Category(ClassConstants.CAT_DISPLAY)>
|
||||
<TypeConverter(GetType(FontConverter))>
|
||||
Public Overridable Property Font As Font
|
||||
Get
|
||||
@ -63,7 +65,8 @@ Public Module ModuleControlProperties
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Category("Anzeige")>
|
||||
<DisplayName("Font Color")>
|
||||
<Category(ClassConstants.CAT_DISPLAY)>
|
||||
Public Property TextColor As Color
|
||||
|
||||
Class FontConverter
|
||||
@ -84,16 +87,24 @@ Public Module ModuleControlProperties
|
||||
Private _Override_SQL As String
|
||||
Private _Enable_SQL As String
|
||||
Private _Enable_SQL_ONLOAD As String
|
||||
|
||||
Private _default_value
|
||||
<Category("Allgemein")> Public Property Active() As Boolean
|
||||
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property Active() As Boolean
|
||||
|
||||
<Category(ClassConstants.CAT_VALIDATION)>
|
||||
Public Property Required() As Boolean
|
||||
<Category("Validierung")>
|
||||
|
||||
<DisplayName("Read Only")>
|
||||
<Category(ClassConstants.CAT_VALIDATION)>
|
||||
Public Property [ReadOnly]() As Boolean
|
||||
|
||||
<DisplayName("Save Changes On Read Only")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property [SaveChangeOnReadOnly]() As Boolean
|
||||
|
||||
<Browsable(False)>
|
||||
<Category("Indexierung")>
|
||||
<Category(ClassConstants.CAT_GENERAL)>
|
||||
Public Property IndexType() As IndexTypes
|
||||
''' <summary>
|
||||
''' Diese Eigenschaft enthält die auswählbaren Indicies, die für das Control verfügbar sind. Wird nicht direkt angezeigt.
|
||||
@ -103,10 +114,12 @@ Public Module ModuleControlProperties
|
||||
''' <summary>
|
||||
''' Diese Eigenschaft enthält des ausgewählten Index
|
||||
''' </summary>
|
||||
<Category("Indexierung")>
|
||||
<Category(ClassConstants.CAT_GENERAL)>
|
||||
<TypeConverter(GetType(IndexListConverter))>
|
||||
Public Property Index() As String
|
||||
<Category("Daten")>
|
||||
|
||||
<DisplayName("SQL Command")>
|
||||
<Category(ClassConstants.CAT_DATA)>
|
||||
Public Property SQLCommand() As SQLValue
|
||||
Get
|
||||
Return New SQLValue(NotNull(_sql_command, ""))
|
||||
@ -115,6 +128,9 @@ Public Module ModuleControlProperties
|
||||
_sql_command = value.Value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<DisplayName("Completion Override SQL")>
|
||||
<Category(ClassConstants.CAT_VALIDATION)>
|
||||
Public Property Override_SQL() As SQLValue
|
||||
Get
|
||||
Return New SQLValue(NotNull(_Override_SQL, ""))
|
||||
@ -123,6 +139,9 @@ Public Module ModuleControlProperties
|
||||
_Override_SQL = value.Value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<DisplayName("Enable On Change SQL")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property Enable_SQL() As SQLValue
|
||||
Get
|
||||
Return New SQLValue(NotNull(_Enable_SQL, ""))
|
||||
@ -131,6 +150,9 @@ Public Module ModuleControlProperties
|
||||
_Enable_SQL = value.Value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<DisplayName("Enable On Load SQL")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property Enable_SQL_OnLoad() As SQLValue
|
||||
Get
|
||||
Return New SQLValue(NotNull(_Enable_SQL_ONLOAD, ""))
|
||||
@ -140,7 +162,8 @@ Public Module ModuleControlProperties
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Category("Daten")>
|
||||
<DisplayName("Default Value")>
|
||||
<Category(ClassConstants.CAT_DATA)>
|
||||
Public Property DefaultValue() As String
|
||||
Get
|
||||
Return _default_value
|
||||
@ -153,13 +176,18 @@ Public Module ModuleControlProperties
|
||||
|
||||
Public Class TextboxProperties
|
||||
Inherits InputProperties
|
||||
<Category("Sonstiges")>
|
||||
|
||||
<DisplayName("Set Control Data SQL")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property SetControlData As SQLValue
|
||||
<Category("Validierung")>
|
||||
|
||||
<DisplayName("Regex Pattern")>
|
||||
<Category(ClassConstants.CAT_VALIDATION)>
|
||||
<Editor(GetType(ClassRegexEditor), GetType(UITypeEditor))>
|
||||
Public Property Regex As String
|
||||
|
||||
<Category("Validierung")>
|
||||
<DisplayName("Regex Failure Message")>
|
||||
<Category(ClassConstants.CAT_VALIDATION)>
|
||||
<Editor(GetType(MultilineStringEditor), GetType(UITypeEditor))>
|
||||
Public Property RegexMessage As String
|
||||
End Class
|
||||
@ -167,34 +195,41 @@ Public Module ModuleControlProperties
|
||||
Public Class LabelProperties
|
||||
Inherits BaseProperties
|
||||
|
||||
<Category("Allgemein")>
|
||||
<Category(ClassConstants.CAT_DISPLAY)>
|
||||
Public Property Text() As String
|
||||
End Class
|
||||
|
||||
Public Class CheckboxProperties
|
||||
Inherits InputProperties
|
||||
|
||||
<Category("Allgemein")>
|
||||
<Category(ClassConstants.CAT_DISPLAY)>
|
||||
Public Property Text() As String
|
||||
<Category("Sonstiges")>
|
||||
|
||||
<DisplayName("Set Control Data SQL")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property SetControlData As SQLValue
|
||||
End Class
|
||||
|
||||
Public Class ComboboxProperties
|
||||
Inherits InputProperties
|
||||
|
||||
<Category("Allgemein")>
|
||||
<Category(ClassConstants.CAT_DISPLAY)>
|
||||
Public Property Text() As String
|
||||
<Category("Sonstiges")>
|
||||
|
||||
<DisplayName("Set Control Data SQL")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property SetControlData As SQLValue
|
||||
|
||||
<Browsable(False)>
|
||||
Public Property ChoiceLists() As List(Of String)
|
||||
|
||||
<Category("Daten")>
|
||||
<DisplayName("Static Choice List")>
|
||||
<Category(ClassConstants.CAT_DATA)>
|
||||
<TypeConverter(GetType(ChoiceListConverter))>
|
||||
Public Property ChoiceList() As String
|
||||
<Category("SpecialBehaviour")>
|
||||
|
||||
<DisplayName("Display As Lookup Control")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property DisplayAsLookUpControl As Boolean
|
||||
|
||||
Public Class ChoiceListConverter
|
||||
@ -231,7 +266,8 @@ Public Module ModuleControlProperties
|
||||
Public Class GridControlProperties
|
||||
Inherits InputProperties
|
||||
|
||||
<Category("Einstellungen")>
|
||||
<DisplayName("Allow Adding New Values")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property AllowAddNewValues As Boolean
|
||||
End Class
|
||||
Public Class ButtonProperties
|
||||
@ -240,10 +276,11 @@ Public Module ModuleControlProperties
|
||||
Private _image_Value As String
|
||||
|
||||
|
||||
<Category("Allgemein")>
|
||||
<Category(ClassConstants.CAT_DISPLAY)>
|
||||
Public Property Text() As String
|
||||
|
||||
<Category("Image")>
|
||||
<DisplayName("Image")>
|
||||
<Category(ClassConstants.CAT_DISPLAY)>
|
||||
Public Property CtrlImage() As ImageValue
|
||||
Get
|
||||
Return New ImageValue(NotNull(_image_Value, ""))
|
||||
@ -256,16 +293,28 @@ Public Module ModuleControlProperties
|
||||
Public Class LookupControlProperties
|
||||
Inherits InputProperties
|
||||
|
||||
<Category("Einstellungen")>
|
||||
<DisplayName("Multi Select")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property MultiSelect As Boolean
|
||||
<Category("Einstellungen")>
|
||||
|
||||
<DisplayName("Allow Adding New Values")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property AllowAddNewValues As Boolean
|
||||
<Category("Einstellungen")>
|
||||
|
||||
<DisplayName("Prevent Duplicates")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property PreventDuplicates As Boolean
|
||||
|
||||
<DisplayName("Static Choice List")>
|
||||
<Category(ClassConstants.CAT_DATA)>
|
||||
Public Property ChoiceList() As String
|
||||
<Category("SpecialBehaviour")>
|
||||
|
||||
<DisplayName("Display As Combobox Control")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property DisplayAsComboBox As Boolean
|
||||
<Category("Sonstiges")>
|
||||
|
||||
<DisplayName("Set Control Data SQL")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property SetControlData As SQLValue
|
||||
|
||||
End Class
|
||||
|
||||
@ -6,73 +6,85 @@ Imports FormsUtils
|
||||
Module ModuleFinalIndexProperties
|
||||
<TypeConverter(GetType(PropertiesDeluxeTypeConverter))>
|
||||
Public Class FinalIndexProperties
|
||||
<Category("Information")>
|
||||
<DisplayName("ID")>
|
||||
<Category(ClassConstants.CAT_GENERAL)>
|
||||
<[ReadOnly](True)>
|
||||
Public Property GUID As Integer
|
||||
<Category("Information")>
|
||||
|
||||
<DisplayName("Connection ID")>
|
||||
<Category(ClassConstants.CAT_INFORMATION)>
|
||||
<[ReadOnly](True)>
|
||||
Public Property ConnectionId As Integer
|
||||
|
||||
<Category("Sonstiges")>
|
||||
<Category(ClassConstants.CAT_GENERAL)>
|
||||
Public Property Description As String
|
||||
<Category("Sonstiges")>
|
||||
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property Active As Boolean
|
||||
<Category("Sonstiges")>
|
||||
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property Sequence As Integer = 0
|
||||
<Category("Sonstiges")>
|
||||
|
||||
<DisplayName("Continue On Indifferent State")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
Public Property ContinueOnIndifferentState As Boolean
|
||||
|
||||
''' <summary>
|
||||
''' Eigenschaft, die den SQL Editor anzeigt
|
||||
''' </summary>
|
||||
<Category("Daten - SQL")>
|
||||
<DisplayName("SQL Command")>
|
||||
<Category(ClassConstants.CAT_DATA)>
|
||||
Public Property SQLCommand As SQLValue
|
||||
|
||||
' Eigenschaften für die verschiedenen Index-Typen
|
||||
<DisplayName("Value")>
|
||||
<Category("Daten - Fester Wert")>
|
||||
<Category(ClassConstants.CAT_DATA)>
|
||||
<PropertyAttributesProvider("IndexTypeStringProvider")>
|
||||
Public Property StringValue As String
|
||||
|
||||
<DisplayName("Value")>
|
||||
<Category("Daten - Fester Wert")>
|
||||
<Category(ClassConstants.CAT_DATA)>
|
||||
<PropertyAttributesProvider("IndexTypeBooleanProvider")>
|
||||
Public Property BoolValue As Boolean
|
||||
|
||||
<DisplayName("Value")>
|
||||
<Category("Daten - Fester Wert")>
|
||||
<Category(ClassConstants.CAT_DATA)>
|
||||
<PropertyAttributesProvider("IndexTypeFloatProvider")>
|
||||
Public Property FloatValue As Double
|
||||
|
||||
<DisplayName("Value")>
|
||||
<Category("Daten - Fester Wert")>
|
||||
<Category(ClassConstants.CAT_DATA)>
|
||||
<PropertyAttributesProvider("IndexTypeDateProvider")>
|
||||
Public Property DateValue As Date
|
||||
|
||||
<DisplayName("Value")>
|
||||
<Category("Daten - Fester Wert")>
|
||||
<Category(ClassConstants.CAT_DATA)>
|
||||
<PropertyAttributesProvider("IndexTypeIntegerProvider")>
|
||||
Public Property IntegerValue As Integer
|
||||
|
||||
<Category("Index")>
|
||||
<DisplayName("Index")>
|
||||
<Category(ClassConstants.CAT_GENERAL)>
|
||||
<TypeConverter(GetType(IndexListConverter))>
|
||||
Public Property IndexName As String
|
||||
|
||||
<Category("Index")>
|
||||
<DisplayName("Vector Index")>
|
||||
<Category(ClassConstants.CAT_INFORMATION)>
|
||||
<[ReadOnly](True)>
|
||||
Public Property VectorIndex As Boolean
|
||||
|
||||
<Category("Index")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
<DisplayName("Allow Multivalues")>
|
||||
<PropertyAttributesProvider("VectorIndexBooleanProvider")>
|
||||
Public Property AllowAddNewValues As Boolean
|
||||
|
||||
<Category("Index")>
|
||||
<DisplayName("IndexBehaviour")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
<DisplayName("Index Behaviour")>
|
||||
<TypeConverter(GetType(ClassVectorBehaviourListConverter))>
|
||||
<PropertyAttributesProvider("VectorIndexOnlyProvider")>
|
||||
Public Property VectorBehaviour As String
|
||||
|
||||
<Category("Index")>
|
||||
<DisplayName("Prevent Duplicates")>
|
||||
<Category(ClassConstants.CAT_BEHAVIOUR)>
|
||||
<PropertyAttributesProvider("VectorIndexBooleanProvider")>
|
||||
Public Property PreventDuplicates As Boolean
|
||||
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user