This commit is contained in:
SchreiberM
2016-02-17 12:38:45 +01:00
parent 36c6f14890
commit f30ca8612c
12 changed files with 3812 additions and 265 deletions

View File

@@ -20,7 +20,7 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Ansichtseinstellungen")>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt die Größe des Elements an.")>
Public Property Size() As Size
Get
@@ -31,7 +31,7 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Ansichtseinstellungen")>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt die Position des Elements an.")>
Public Property Location() As Point
Get
@@ -42,7 +42,7 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Ansichtseinstellungen")>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den internen Namen des Elements an.")>
Public Property Name() As String
Get
@@ -58,22 +58,22 @@ Module ClassControlProperties
Inherits BaseProperties
Private _id As Integer
' Ansichtseinstellungen
' ViewConfigurations
Private _size As Size
Private _location As Point
Private _name As String = ""
Private _column_title = ""
' Sonstige Einstellungen
' Other Configurations
Private _required As Boolean = False
Private _read_only As Boolean = False
' Datenbank Einstellungen
' Database Configurations
Private _sql_connection As String = ""
Private _sql_command As String = ""
' Schrift Einstellungen
' Font Configurations
Private _font As Font
Private _font_color As Color
<CategoryAttribute("Ansichtseinstellungen")>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den Spaltentitel des Elements an.")>
Public Property ColumnTitle() As String
Get
@@ -84,7 +84,7 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Sonstige Einstellungen")>
<CategoryAttribute("Other Configurations")>
<DescriptionAttribute("Gibt an ob dieses Element benötigt wird um die Eingabe abzuschließen.")>
Public Property IsRequired() As Boolean
Get
@@ -95,7 +95,7 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Sonstige Einstellungen")>
<CategoryAttribute("Other Configurations")>
<DescriptionAttribute("Gibt an, ob dieses Element nur lesbar ist.")>
Public Property IsReadOnly() As Boolean
Get
@@ -106,7 +106,7 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Datenbank Einstellungen")>
<CategoryAttribute("Database Configurations")>
<DescriptionAttribute("Gibt die Datenbankverbindung für dieses Element an.")>
Public Property SQLConnection() As SQLValue
Get
@@ -117,7 +117,7 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Datenbank Einstellungen")>
<CategoryAttribute("Database Configurations")>
<DescriptionAttribute("Gibt die Datenbank-Abfrage für dieses Element an. Es können @RECORD_ID und @FORM_ID als Platzhalter verwendet werden.")>
Public Property SQLCommand() As SQLValue
Get
@@ -127,7 +127,7 @@ Module ClassControlProperties
_sql_command = value.Value
End Set
End Property
<CategoryAttribute("Schrift Einstellungen")>
<CategoryAttribute("Font Configurations")>
<DescriptionAttribute("Gibt die Schriftart an.")>
Public Property Font() As Font
Get
@@ -138,7 +138,7 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Schrift Einstellungen")>
<CategoryAttribute("Font Configurations")>
<DescriptionAttribute("Gibt die Schriftfarbe an.")>
Public Property FontColor() As Color
Get
@@ -158,7 +158,7 @@ Module ClassControlProperties
Private _tab_stop As Boolean
Private _show_column As Boolean
<CategoryAttribute("Sonstige Einstellungen")>
<CategoryAttribute("Other Configurations")>
<DescriptionAttribute("Gibt die Reihenfolge an, in der das Element durch die Tabulatortaste aktiviert wird.")>
Public Property TabIndex() As Integer
Get
@@ -168,7 +168,7 @@ Module ClassControlProperties
_tab_index = value
End Set
End Property
<CategoryAttribute("Sonstige Einstellungen")>
<CategoryAttribute("Other Configurations")>
<DescriptionAttribute("Gibt an, ob das Element durch die Tabulartortaste aktiviert werden soll.")>
Public Property TabStop() As Boolean
Get
@@ -178,7 +178,7 @@ Module ClassControlProperties
_tab_stop = value
End Set
End Property
<CategoryAttribute("Sonstige Einstellungen")>
<CategoryAttribute("Other Configurations")>
<DescriptionAttribute("Gibt den Standardwert dieses Elements an.")>
<DefaultValue("")>
Public Property DefaultValue() As String
@@ -190,7 +190,7 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Ansichtseinstellungen")>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt an, ob das Feld als Spalte im Grid angezeigt wird.")>
Public Property ShowColumn() As Boolean
Get
@@ -211,7 +211,7 @@ Module ClassControlProperties
Private _caption As String = ""
<Browsable(False)>
<CategoryAttribute("Ansichtseinstellungen")>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den Spaltentitel des Elements an.")>
Public Overloads Property ColumnTitle() As String
Get
@@ -222,7 +222,7 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Ansichtseinstellungen")>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den Beschreibungstext dieses Elements an.")>
Public Property Caption() As String
Get
@@ -240,7 +240,7 @@ Module ClassControlProperties
Private _multiline As Boolean
Private _format As String
<CategoryAttribute("Ansichtseinstellungen")>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt das Format des Textes an.")>
Public Property Format() As EnumFormatOptions
Get
@@ -251,7 +251,7 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Ansichtseinstellungen")>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt an, ob das Feld mehrzeilig sein soll.")>
Public Property Multiline() As Boolean
Get
@@ -269,7 +269,7 @@ Module ClassControlProperties
Private _static_list As String
Private _format As EnumFormatOptions
<CategoryAttribute("Ansichtseinstellungen")>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt das Format des Textes an.")>
Public Property Format() As EnumFormatOptions
Get
@@ -307,7 +307,7 @@ Module ClassControlProperties
Private _default_value As EnumDateTimePickerDefaultValueOptions = EnumDateTimePickerDefaultValueOptions.Empty
<CategoryAttribute("Sonstige Einstellungen")>
<CategoryAttribute("Other Configurations")>
<DescriptionAttribute("Gibt den Standardwert dieses Elements an.")>
Public Overloads Property DefaultValue() As EnumDateTimePickerDefaultValueOptions
Get
@@ -324,7 +324,7 @@ Module ClassControlProperties
Private _caption As String = ""
Private _default_value As Boolean = False
<CategoryAttribute("Ansichtseinstellungen")>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den Beschreibungstext dieses Elements an.")>
Public Property Caption() As String
Get
@@ -335,7 +335,7 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Sonstige Einstellungen")>
<CategoryAttribute("Other Configurations")>
<DescriptionAttribute("Gibt den Standardwert dieses Elements an.")>
<DefaultValue(False)>
Public Overloads Property DefaultValue As Boolean
@@ -355,7 +355,7 @@ Module ClassControlProperties
Private _default_value As Boolean = False
<CategoryAttribute("Ansichtseinstellungen")>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den Beschreibungstext dieses Elements an.")>
Public Property Caption() As String
Get
@@ -366,7 +366,7 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Sonstige Einstellungen")>
<CategoryAttribute("Other Configurations")>
<DescriptionAttribute("Gibt den Standardwert dieses Elements an.")>
<DefaultValue(False)>
Public Overloads Property DefaultValue As Boolean
@@ -390,7 +390,7 @@ Module ClassControlProperties
Private _caption As String = ""
Private _back_color As Color
<CategoryAttribute("Ansichtseinstellungen")>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den Beschreibungstext dieses Elements an.")>
Public Property Caption() As String
Get
@@ -401,7 +401,7 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Ansichtseinstellungen")>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt die Hintergrundfarbe des Elements an.")>
Public Property BackColor() As Color
Get
@@ -428,7 +428,7 @@ Module ClassControlProperties
Private _place As String
Private _description As String
<CategoryAttribute("Ansichtseinstellungen")>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den Beschreibungstext dieses Elements an.")>
Public Property Caption() As String
Get
@@ -513,7 +513,7 @@ Module ClassControlProperties
Private _form_id As Integer
Private _screen_id As Integer
<CategoryAttribute("Ansichtseinstellungen")>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den Beschreibungstext dieses Elements an.")>
Public Property Caption() As String
Get