AppStd/RecordOrganizer
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Merge branch 'master' of http://scmadmin@172.24.11.74:90/scm/git/RecordOrganizer

Browse Source
This commit is contained in:
SchreiberM
2016-03-08 09:46:23 +01:00
parent 980e625c1c 57fd15b4c1
commit 9ca22dce19
15 changed files with 1076 additions and 217 deletions
Download Patch File Download Diff File Expand all files Collapse all files

200
app/DD-Record-Organiser/ClassControlProperties.vb
View File

@@ -1,6 +1,36 @@
Imports System.ComponentModel
Imports System.Resources
Module ClassControlProperties
' ++++++ LOCALIZE PROPERTIES ++++++
Private Function Lookup(key As String)
Try
Return My.Resources.ControlProperties.ResourceManager.GetString(key)
Catch ex As Exception
Return key
End Try
End Function
Public Class LocalizedDescriptionAttribute
Inherits DescriptionAttribute
Public Sub New(key As String)
MyBase.New(Lookup(key))
End Sub
End Class
Public Class LocalizedCategoryAttribute
Inherits CategoryAttribute
Public Sub New(key As String)
MyBase.New(Lookup(key))
End Sub
End Class
' +++++ END LOCALIZE PROPERTIES +++++
' +++++ ABSTRACT CLASSES +++++
Public MustInherit Class BaseProperties
Private _id As Integer
@@ -8,8 +38,8 @@ Module ClassControlProperties
Private _location As Point
Private _name As String
<CategoryAttribute("ID")>
<DescriptionAttribute("Gibt die eindeutige ID des Elements an.")>
<LocalizedCategoryAttribute("category_id")>
<LocalizedDescriptionAttribute("desc_id")>
<ReadOnlyAttribute(True)>
Public Property ID() As Integer
Get
@@ -20,8 +50,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt die Größe des Elements an.")>
<LocalizedCategoryAttribute("category_view")>
<LocalizedDescriptionAttribute("desc_size")>
Public Property Size() As Size
Get
Return _size
@@ -31,8 +61,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt die Position des Elements an.")>
<LocalizedCategoryAttribute("category_view")>
<LocalizedDescriptionAttribute("desc_location")>
Public Property Location() As Point
Get
Return _location
@@ -42,8 +72,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den internen Namen des Elements an.")>
<LocalizedCategoryAttribute("category_view")>
<LocalizedDescriptionAttribute("desc_name")>
Public Property Name() As String
Get
Return _name
@@ -73,8 +103,8 @@ Module ClassControlProperties
Private _font As Font
Private _font_color As Color
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den Spaltentitel des Elements an.")>
<LocalizedCategoryAttribute("category_view")>
<LocalizedDescriptionAttribute("desc_col_title")>
Public Property ColumnTitle() As String
Get
Return _column_title
@@ -84,8 +114,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Other Configurations")>
<DescriptionAttribute("Gibt an ob dieses Element benötigt wird um die Eingabe abzuschließen.")>
<LocalizedCategoryAttribute("category_other")>
<LocalizedDescriptionAttribute("desc_required")>
Public Property IsRequired() As Boolean
Get
Return _required
@@ -95,8 +125,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Other Configurations")>
<DescriptionAttribute("Gibt an, ob dieses Element nur lesbar ist.")>
<LocalizedCategoryAttribute("category_other")>
<LocalizedDescriptionAttribute("desc_readonly")>
Public Property IsReadOnly() As Boolean
Get
Return _read_only
@@ -106,19 +136,19 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Database Configurations")>
<DescriptionAttribute("Gibt die Datenbankverbindung für dieses Element an.")>
Public Property SQLConnection() As SQLValue
Get
Return New SQLValue(_sql_connection)
End Get
Set(value As SQLValue)
_sql_connection = value.Value
End Set
End Property
'<LocalizedCategoryAttribute("category_database")>
'<LocalizedDescriptionAttribute("Gibt die Datenbankverbindung für dieses Element an.")>
'Public Property SQLConnection() As SQLValue
' Get
' Return New SQLValue(_sql_connection)
' End Get
' Set(value As SQLValue)
' _sql_connection = value.Value
' End Set
'End Property
<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.")>
<LocalizedCategoryAttribute("category_database")>
<LocalizedDescriptionAttribute("desc_sqlcommand")>
Public Property SQLCommand() As SQLValue
Get
Return New SQLValue(_sql_command)
@@ -127,8 +157,8 @@ Module ClassControlProperties
_sql_command = value.Value
End Set
End Property
<CategoryAttribute("Font Configurations")>
<DescriptionAttribute("Gibt die Schriftart an.")>
<LocalizedCategoryAttribute("category_font")>
<LocalizedDescriptionAttribute("desc_fontstyle")>
Public Property Font() As Font
Get
Return _font
@@ -138,8 +168,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Font Configurations")>
<DescriptionAttribute("Gibt die Schriftfarbe an.")>
<LocalizedCategoryAttribute("category_font")>
<LocalizedDescriptionAttribute("desc_fontcolor")>
Public Property FontColor() As Color
Get
Return _font_color
@@ -158,8 +188,8 @@ Module ClassControlProperties
Private _tab_stop As Boolean
Private _show_column As Boolean
<CategoryAttribute("Other Configurations")>
<DescriptionAttribute("Gibt die Reihenfolge an, in der das Element durch die Tabulatortaste aktiviert wird.")>
<LocalizedCategoryAttribute("category_other")>
<LocalizedDescriptionAttribute("desc_tabindex")>
Public Property TabIndex() As Integer
Get
Return _tab_index
@@ -168,8 +198,8 @@ Module ClassControlProperties
_tab_index = value
End Set
End Property
<CategoryAttribute("Other Configurations")>
<DescriptionAttribute("Gibt an, ob das Element durch die Tabulartortaste aktiviert werden soll.")>
<LocalizedCategoryAttribute("category_other")>
<LocalizedDescriptionAttribute("desc_tabstop")>
Public Property TabStop() As Boolean
Get
Return _tab_stop
@@ -178,8 +208,8 @@ Module ClassControlProperties
_tab_stop = value
End Set
End Property
<CategoryAttribute("Other Configurations")>
<DescriptionAttribute("Gibt den Standardwert dieses Elements an.")>
<LocalizedCategoryAttribute("category_other")>
<LocalizedDescriptionAttribute("desc_defaultvalue")>
<DefaultValue("")>
Public Property DefaultValue() As String
Get
@@ -190,8 +220,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt an, ob das Feld als Spalte im Grid angezeigt wird.")>
<LocalizedCategoryAttribute("category_view")>
<LocalizedDescriptionAttribute("desc_showcolumn")>
Public Property ShowColumn() As Boolean
Get
Return _show_column
@@ -202,7 +232,7 @@ Module ClassControlProperties
End Property
End Class
' +++++ CONTROL CLASSES +++++
Public Class LabelProperties
@@ -211,8 +241,8 @@ Module ClassControlProperties
Private _caption As String = ""
<Browsable(False)>
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den Spaltentitel des Elements an.")>
<LocalizedCategoryAttribute("category_view")>
<LocalizedDescriptionAttribute("desc_columntitle")>
Public Overloads Property ColumnTitle() As String
Get
Return ""
@@ -222,8 +252,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den Beschreibungstext dieses Elements an.")>
<LocalizedCategoryAttribute("category_view")>
<LocalizedDescriptionAttribute("desc_caption")>
Public Property Caption() As String
Get
Return _caption
@@ -240,8 +270,8 @@ Module ClassControlProperties
Private _multiline As Boolean
Private _format As String
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt das Format des Textes an.")>
<LocalizedCategoryAttribute("category_view")>
<LocalizedDescriptionAttribute("desc_format")>
Public Property Format() As EnumFormatOptions
Get
Return _format
@@ -251,8 +281,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt an, ob das Feld mehrzeilig sein soll.")>
<LocalizedCategoryAttribute("category_view")>
<LocalizedDescriptionAttribute("desc_multiline")>
Public Property Multiline() As Boolean
Get
Return _multiline
@@ -269,8 +299,8 @@ Module ClassControlProperties
Private _static_list As String
Private _format As EnumFormatOptions
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt das Format des Textes an.")>
<LocalizedCategoryAttribute("category_view")>
<LocalizedDescriptionAttribute("desc_format")>
Public Property Format() As EnumFormatOptions
Get
Return _format
@@ -290,8 +320,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Daten")>
<DescriptionAttribute("Eine Liste von statischen Werten, die durch ';' getrennt sind. Überschreibt die Daten aus 'Datenbank-Einstellungen'")>
<LocalizedCategoryAttribute("category_data")>
<LocalizedDescriptionAttribute("desc_staticlist")>
Public Property StaticList() As String
Get
Return _static_list
@@ -307,8 +337,8 @@ Module ClassControlProperties
Private _default_value As EnumDateTimePickerDefaultValueOptions = EnumDateTimePickerDefaultValueOptions.Empty
<CategoryAttribute("Other Configurations")>
<DescriptionAttribute("Gibt den Standardwert dieses Elements an.")>
<LocalizedCategoryAttribute("category_other")>
<LocalizedDescriptionAttribute("desc_defaultvalue")>
Public Overloads Property DefaultValue() As EnumDateTimePickerDefaultValueOptions
Get
Return _default_value
@@ -324,8 +354,8 @@ Module ClassControlProperties
Private _caption As String = ""
Private _default_value As Boolean = False
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den Beschreibungstext dieses Elements an.")>
<LocalizedCategoryAttribute("category_view")>
<LocalizedDescriptionAttribute("desc_caption")>
Public Property Caption() As String
Get
Return _caption
@@ -335,8 +365,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Other Configurations")>
<DescriptionAttribute("Gibt den Standardwert dieses Elements an.")>
<LocalizedCategoryAttribute("category_other")>
<LocalizedDescriptionAttribute("desc_defaultvalue")>
<DefaultValue(False)>
Public Overloads Property DefaultValue As Boolean
Get
@@ -355,8 +385,8 @@ Module ClassControlProperties
Private _default_value As Boolean = False
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den Beschreibungstext dieses Elements an.")>
<LocalizedCategoryAttribute("category_view")>
<LocalizedDescriptionAttribute("desc_caption")>
Public Property Caption() As String
Get
Return _caption
@@ -366,8 +396,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Other Configurations")>
<DescriptionAttribute("Gibt den Standardwert dieses Elements an.")>
<LocalizedCategoryAttribute("category_other")>
<LocalizedDescriptionAttribute("desc_defaultvalue")>
<DefaultValue(False)>
Public Overloads Property DefaultValue As Boolean
Get
@@ -390,8 +420,8 @@ Module ClassControlProperties
Private _caption As String = ""
Private _back_color As Color
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den Beschreibungstext dieses Elements an.")>
<LocalizedCategoryAttribute("category_view")>
<LocalizedDescriptionAttribute("desc_caption")>
Public Property Caption() As String
Get
Return _caption
@@ -401,8 +431,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt die Hintergrundfarbe des Elements an.")>
<LocalizedCategoryAttribute("category_view")>
<LocalizedDescriptionAttribute("desc_backcolor")>
Public Property BackColor() As Color
Get
Return _back_color
@@ -428,8 +458,8 @@ Module ClassControlProperties
Private _place As String
Private _description As String
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den Beschreibungstext dieses Elements an.")>
<LocalizedCategoryAttribute("category_view")>
<LocalizedDescriptionAttribute("desc_caption")>
Public Property Caption() As String
Get
Return _caption
@@ -439,8 +469,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Termin Einstellungen")>
<DescriptionAttribute("Gibt den Betreff des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden")>
<LocalizedCategoryAttribute("category_appointment")>
<LocalizedDescriptionAttribute("desc_subject")>
Public Property Subject() As String
Get
Return _subject
@@ -450,8 +480,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Termin Einstellungen")>
<DescriptionAttribute("Gibt den optionalen zweiten Betreff des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden")>
<LocalizedCategoryAttribute("category_appointment")>
<LocalizedDescriptionAttribute("desc_subject2")>
Public Property Subject2() As String
Get
Return _subject2
@@ -461,8 +491,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Termin Einstellungen")>
<DescriptionAttribute("Gibt den Ort des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden")>
<LocalizedCategoryAttribute("category_appointment")>
<LocalizedDescriptionAttribute("desc_place")>
Public Property Place() As String
Get
Return _place
@@ -472,8 +502,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Termin Einstellungen")>
<DescriptionAttribute("Gibt die Beschreibung des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden")>
<LocalizedCategoryAttribute("category_appointment")>
<LocalizedDescriptionAttribute("desc_description")>
Public Property Description() As String
Get
Return _description
@@ -483,8 +513,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Datums Einstellungen")>
<DescriptionAttribute("Der Name eines Elements von dem das End-Datum gelesen wird.")>
<LocalizedCategoryAttribute("category_date")>
<LocalizedDescriptionAttribute("desc_fromdate")>
Public Property FromDate() As String
Get
Return _from_date
@@ -494,8 +524,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Datums Einstellungen")>
<DescriptionAttribute("Der Name eines Elements von dem das Start-Datum gelesen wird.")>
<LocalizedCategoryAttribute("category_date")>
<LocalizedDescriptionAttribute("desc_todate")>
Public Property ToDate() As String
Get
Return _to_date
@@ -513,8 +543,8 @@ Module ClassControlProperties
Private _form_id As Integer
Private _screen_id As Integer
<CategoryAttribute("ViewConfigurations")>
<DescriptionAttribute("Gibt den Beschreibungstext dieses Elements an.")>
<LocalizedCategoryAttribute("category_view")>
<LocalizedDescriptionAttribute("desc_caption")>
Public Property Caption() As String
Get
Return _caption
@@ -524,8 +554,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Form Einstellungen")>
<DescriptionAttribute("Gibt die Form-ID der zu öffnenden Form an.")>
<LocalizedCategoryAttribute("category_form")>
<LocalizedDescriptionAttribute("Gibt die Form-ID der zu öffnenden Form an.")>
Public Property FormID() As Integer
Get
Return _form_id
@@ -535,8 +565,8 @@ Module ClassControlProperties
End Set
End Property
<CategoryAttribute("Form Einstellungen")>
<DescriptionAttribute("Gibt die Screen-ID der zu öffnenden Form an.")>
<LocalizedCategoryAttribute("category_form")>
<LocalizedDescriptionAttribute("Gibt die Screen-ID der zu öffnenden Form an.")>
Public Property ScreenID() As Integer
Get
Return _screen_id

27
app/DD-Record-Organiser/ClassInit.vb
View File

@@ -51,33 +51,6 @@ Public Class ClassInit
End Sub
Public Sub InitInterface(mainForm As frmMain)
Dim SQL As String = "SELECT BACKGROUND_IMAGE, PRODUCT_NAME1 FROM TBDD_MODULES WHERE NAME = 'Record-Organizer'"
Dim dt As DataTable = ClassDatabase.Return_Datatable(SQL)
If dt.Rows.Count > 0 Then
Dim row As DataRow = dt.Rows(0)
If Not IsDBNull(row.Item("BACKGROUND_IMAGE")) Then
Dim bimage() As Byte = CType(row.Item("BACKGROUND_IMAGE"), Byte())
Dim image As Bitmap = ByteArrayToBitmap(bimage)
mainForm.SetWindowBackground(image)
End If
If Not IsDBNull(row.Item("PRODUCT_NAME1")) Then
Dim title As String = row.Item("PRODUCT_NAME1")
mainForm.SetWindowTitle(title)
End If
End If
End Sub
Public Sub InitUserLogin()
Dim sql = sql_UserID
sql = sql.Replace("@user", Environment.UserName)

22
app/DD-Record-Organiser/DD-Record-Organiser.vbproj
View File

@@ -253,6 +253,16 @@
<Compile Include="ClassFolderWatcher.vb" />
<Compile Include="ClassJumpRecord.vb" />
<Compile Include="ClassLicence.vb" />
<Compile Include="Strings\ControlProperties.en.Designer.vb">
<DependentUpon>ControlProperties.en.resx</DependentUpon>
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
</Compile>
<Compile Include="Strings\ControlProperties.Designer.vb">
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
<DependentUpon>ControlProperties.resx</DependentUpon>
</Compile>
<Compile Include="DD_DMSDataSet1.Designer.vb">
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
@@ -576,6 +586,16 @@
</Compile>
</ItemGroup>
<ItemGroup>
<EmbeddedResource Include="Strings\ControlProperties.en.resx">
<Generator>ResXFileCodeGenerator</Generator>
<LastGenOutput>ControlProperties.en.Designer.vb</LastGenOutput>
<CustomToolNamespace>My.Resources</CustomToolNamespace>
</EmbeddedResource>
<EmbeddedResource Include="Strings\ControlProperties.resx">
<CustomToolNamespace>My.Resources</CustomToolNamespace>
<Generator>ResXFileCodeGenerator</Generator>
<LastGenOutput>ControlProperties.Designer.vb</LastGenOutput>
</EmbeddedResource>
<EmbeddedResource Include="frmAbout.en-GB.resx">
<DependentUpon>frmAbout.vb</DependentUpon>
</EmbeddedResource>
@@ -1178,6 +1198,8 @@
<None Include="Resources\bell_go.png" />
<None Include="Resources\Copy_6524.png" />
<None Include="Resources\arrow_Down_16xLG.png" />
<None Include="Resources\changechartlegendalignment_32x32.png" />
<None Include="Resources\calendar_32x32.png" />
<Content Include="Resources\cube.ico" />
<Content Include="Resources\138_PushPin_32x42_72.png" />
<None Include="Resources\PropertyGridEditorPart_6041.png" />

20
app/DD-Record-Organiser/My Project/Resources.Designer.vb generated
View File

@@ -410,6 +410,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property calendar_32x32() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("calendar_32x32", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
@@ -450,6 +460,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property changechartlegendalignment_32x32() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("changechartlegendalignment_32x32", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>

24
app/DD-Record-Organiser/My Project/Resources.resx
View File

@@ -136,8 +136,8 @@
<data name="DD_Icons-ADDI" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\DD_Icons-ADDI.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="brainpool" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\brainpool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Home_5699_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Home_5699_32.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="action_add_16xMD" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\action_add_16xMD.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -235,6 +235,9 @@
<data name="database_error" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\database_error.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="changechartlegendalignment_32x32" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\changechartlegendalignment_32x32.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="page_excel" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\page_excel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -421,6 +424,9 @@
<data name="database_go1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\database_go1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="brainpool" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\brainpool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="refresh_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\refresh_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -445,8 +451,8 @@
<data name="user_suit" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\user_suit.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Home_5699_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Home_5699_32.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Table_748" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Table_748.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="table_refresh" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\table_refresh.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -499,9 +505,6 @@
<data name="page_refresh" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\page_refresh.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Table_748" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Table_748.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="add1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\add1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -565,13 +568,16 @@
<data name="HomeHS" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\HomeHS.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="arrow_Down_16xLG1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\arrow_Down_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="112_RefreshArrow_Blue_24x24_721" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\112_RefreshArrow_Blue_24x24_721.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="action_Cancel_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\action_Cancel_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="arrow_Down_16xLG1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\arrow_Down_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="calendar_32x32" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\calendar_32x32.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
</root>

BIN
app/DD-Record-Organiser/Resources/calendar_32x32.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 2.2 KiB

BIN
app/DD-Record-Organiser/Resources/changechartlegendalignment_32x32.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.7 KiB

400
app/DD-Record-Organiser/Strings/ControlProperties.Designer.vb generated Normal file
View File

@@ -0,0 +1,400 @@
'------------------------------------------------------------------------------
' <auto-generated>
' Dieser Code wurde von einem Tool generiert.
' Laufzeitversion:4.0.30319.34209
'
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Imports System
Namespace My.Resources
'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
'-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
'''<summary>
''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
Friend Class ControlProperties
Private Shared resourceMan As Global.System.Resources.ResourceManager
Private Shared resourceCulture As Global.System.Globalization.CultureInfo
<Global.System.Diagnostics.CodeAnalysis.SuppressMessageAttribute("Microsoft.Performance", "CA1811:AvoidUncalledPrivateCode")> _
Friend Sub New()
MyBase.New
End Sub
'''<summary>
''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Friend Shared ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
Get
If Object.ReferenceEquals(resourceMan, Nothing) Then
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DD_Record_Organiser.ControlProperties", GetType(ControlProperties).Assembly)
resourceMan = temp
End If
Return resourceMan
End Get
End Property
'''<summary>
''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Friend Shared Property Culture() As Global.System.Globalization.CultureInfo
Get
Return resourceCulture
End Get
Set
resourceCulture = value
End Set
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Termin Einstellungen ähnelt.
'''</summary>
Friend Shared ReadOnly Property category_appointment() As String
Get
Return ResourceManager.GetString("category_appointment", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Daten ähnelt.
'''</summary>
Friend Shared ReadOnly Property category_data() As String
Get
Return ResourceManager.GetString("category_data", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Database Configurations ähnelt.
'''</summary>
Friend Shared ReadOnly Property category_database() As String
Get
Return ResourceManager.GetString("category_database", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Datums Einstellungen ähnelt.
'''</summary>
Friend Shared ReadOnly Property category_date() As String
Get
Return ResourceManager.GetString("category_date", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Font Configurations ähnelt.
'''</summary>
Friend Shared ReadOnly Property category_font() As String
Get
Return ResourceManager.GetString("category_font", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Form Einstellungen ähnelt.
'''</summary>
Friend Shared ReadOnly Property category_form() As String
Get
Return ResourceManager.GetString("category_form", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die ID ähnelt.
'''</summary>
Friend Shared ReadOnly Property category_id() As String
Get
Return ResourceManager.GetString("category_id", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Other Configurations ähnelt.
'''</summary>
Friend Shared ReadOnly Property category_other() As String
Get
Return ResourceManager.GetString("category_other", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die ViewConfigurations ähnelt.
'''</summary>
Friend Shared ReadOnly Property category_view() As String
Get
Return ResourceManager.GetString("category_view", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Hintergrundfarbe des Elements an. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_backcolor() As String
Get
Return ResourceManager.GetString("desc_backcolor", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt den Beschreibungstext dieses Elements an. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_caption() As String
Get
Return ResourceManager.GetString("desc_caption", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt den Spaltentitel des Elements an. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_col_title() As String
Get
Return ResourceManager.GetString("desc_col_title", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt den Spaltentitel des Elements an. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_columntitle() As String
Get
Return ResourceManager.GetString("desc_columntitle", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt den Standardwert dieses Elements an. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_defaultvalue() As String
Get
Return ResourceManager.GetString("desc_defaultvalue", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Beschreibung des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_description() As String
Get
Return ResourceManager.GetString("desc_description", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Schriftfarbe an. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_fontcolor() As String
Get
Return ResourceManager.GetString("desc_fontcolor", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Schriftart an. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_fontstyle() As String
Get
Return ResourceManager.GetString("desc_fontstyle", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt das Format des Textes an. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_format() As String
Get
Return ResourceManager.GetString("desc_format", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Form-ID der zu öffnenden Form an. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_formid() As String
Get
Return ResourceManager.GetString("desc_formid", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Der Name eines Elements von dem das End-Datum gelesen wird. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_fromdate() As String
Get
Return ResourceManager.GetString("desc_fromdate", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt die eindeutige ID des Elements an. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_id() As String
Get
Return ResourceManager.GetString("desc_id", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Position des Elements an. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_location() As String
Get
Return ResourceManager.GetString("desc_location", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt an, ob das Feld mehrzeilig sein soll. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_multiline() As String
Get
Return ResourceManager.GetString("desc_multiline", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt den internen Namen des Elements an. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_name() As String
Get
Return ResourceManager.GetString("desc_name", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt den Ort des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_place() As String
Get
Return ResourceManager.GetString("desc_place", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt an, ob dieses Element nur lesbar ist. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_readonly() As String
Get
Return ResourceManager.GetString("desc_readonly", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt an ob dieses Element benötigt wird um die Eingabe abzuschließen. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_required() As String
Get
Return ResourceManager.GetString("desc_required", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Screen-ID der zu öffnenden Form an. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_screenid() As String
Get
Return ResourceManager.GetString("desc_screenid", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt an, ob das Feld als Spalte im Grid angezeigt wird. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_showcolumn() As String
Get
Return ResourceManager.GetString("desc_showcolumn", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Größe des Elements an ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_size() As String
Get
Return ResourceManager.GetString("desc_size", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Datenbank-Abfrage für dieses Element an. Es können @RECORD_ID und @FORM_ID als Platzhalter verwendet werden. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_sqlcommand() As String
Get
Return ResourceManager.GetString("desc_sqlcommand", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Eine Liste von statischen Werten, die durch &apos;;&apos; getrennt sind. Überschreibt die Daten aus &apos;Datenbank-Einstellungen&apos; ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_staticlist() As String
Get
Return ResourceManager.GetString("desc_staticlist", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt den Betreff des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_subject() As String
Get
Return ResourceManager.GetString("desc_subject", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt den optionalen zweiten Betreff des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_subject2() As String
Get
Return ResourceManager.GetString("desc_subject2", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt die Reihenfolge an, in der das Element durch die Tabulatortaste aktiviert wird. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_tabindex() As String
Get
Return ResourceManager.GetString("desc_tabindex", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Gibt an, ob das Element durch die Tabulartortaste aktiviert werden soll. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_tabstop() As String
Get
Return ResourceManager.GetString("desc_tabstop", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Der Name eines Elements von dem das Start-Datum gelesen wird. ähnelt.
'''</summary>
Friend Shared ReadOnly Property desc_todate() As String
Get
Return ResourceManager.GetString("desc_todate", resourceCulture)
End Get
End Property
End Class
End Namespace

0
app/DD-Record-Organiser/Strings/ControlProperties.en.Designer.vb generated Normal file
View File

231
app/DD-Record-Organiser/Strings/ControlProperties.en.resx Normal file
View File

@@ -0,0 +1,231 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="category_appointment" xml:space="preserve">
<value>Termin Einstellungen</value>
</data>
<data name="category_data" xml:space="preserve">
<value>Daten</value>
</data>
<data name="category_database" xml:space="preserve">
<value>Database Configurations</value>
</data>
<data name="category_date" xml:space="preserve">
<value>Datums Einstellungen</value>
</data>
<data name="category_font" xml:space="preserve">
<value>Font Configurations</value>
</data>
<data name="category_form" xml:space="preserve">
<value>Form Einstellungen</value>
</data>
<data name="category_id" xml:space="preserve">
<value>ID</value>
</data>
<data name="category_other" xml:space="preserve">
<value>Other Configurations</value>
</data>
<data name="category_view" xml:space="preserve">
<value>ViewConfigurations</value>
</data>
<data name="desc_backcolor" xml:space="preserve">
<value>Gibt die Hintergrundfarbe des Elements an.</value>
</data>
<data name="desc_caption" xml:space="preserve">
<value>Gibt den Beschreibungstext dieses Elements an.</value>
</data>
<data name="desc_columntitle" xml:space="preserve">
<value>Gibt den Spaltentitel des Elements an.</value>
</data>
<data name="desc_col_title" xml:space="preserve">
<value>Gibt den Spaltentitel des Elements an.</value>
</data>
<data name="desc_defaultvalue" xml:space="preserve">
<value>Gibt den Standardwert dieses Elements an.</value>
</data>
<data name="desc_description" xml:space="preserve">
<value>Gibt die Beschreibung des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden</value>
</data>
<data name="desc_fontcolor" xml:space="preserve">
<value>Gibt die Schriftfarbe an.</value>
</data>
<data name="desc_fontstyle" xml:space="preserve">
<value>Gibt die Schriftart an.</value>
</data>
<data name="desc_format" xml:space="preserve">
<value>Gibt das Format des Textes an.</value>
</data>
<data name="desc_formid" xml:space="preserve">
<value>Gibt die Form-ID der zu öffnenden Form an.</value>
</data>
<data name="desc_fromdate" xml:space="preserve">
<value>Der Name eines Elements von dem das End-Datum gelesen wird.</value>
</data>
<data name="desc_id" xml:space="preserve">
<value>Gibt die eindeutige ID des Elements an.</value>
</data>
<data name="desc_location" xml:space="preserve">
<value>Gibt die Position des Elements an.</value>
</data>
<data name="desc_multiline" xml:space="preserve">
<value>Gibt an, ob das Feld mehrzeilig sein soll.</value>
</data>
<data name="desc_name" xml:space="preserve">
<value>Gibt den internen Namen des Elements an.</value>
</data>
<data name="desc_place" xml:space="preserve">
<value>Gibt den Ort des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden</value>
</data>
<data name="desc_readonly" xml:space="preserve">
<value>Gibt an, ob dieses Element nur lesbar ist.</value>
</data>
<data name="desc_required" xml:space="preserve">
<value>Gibt an ob dieses Element benötigt wird um die Eingabe abzuschließen.</value>
</data>
<data name="desc_screenid" xml:space="preserve">
<value>Gibt die Screen-ID der zu öffnenden Form an.</value>
</data>
<data name="desc_showcolumn" xml:space="preserve">
<value>Gibt an, ob das Feld als Spalte im Grid angezeigt wird.</value>
</data>
<data name="desc_size" xml:space="preserve">
<value>Gibt die Größe des Elements an</value>
</data>
<data name="desc_sqlcommand" xml:space="preserve">
<value>Gibt die Datenbank-Abfrage für dieses Element an. Es können @RECORD_ID und @FORM_ID als Platzhalter verwendet werden.</value>
</data>
<data name="desc_staticlist" xml:space="preserve">
<value>Eine Liste von statischen Werten, die durch ';' getrennt sind. Überschreibt die Daten aus 'Datenbank-Einstellungen'</value>
</data>
<data name="desc_subject" xml:space="preserve">
<value>Gibt den Betreff des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden</value>
</data>
<data name="desc_subject2" xml:space="preserve">
<value>Gibt den optionalen zweiten Betreff des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden</value>
</data>
<data name="desc_tabindex" xml:space="preserve">
<value>Gibt die Reihenfolge an, in der das Element durch die Tabulatortaste aktiviert wird.</value>
</data>
<data name="desc_tabstop" xml:space="preserve">
<value>Gibt an, ob das Element durch die Tabulartortaste aktiviert werden soll.</value>
</data>
<data name="desc_todate" xml:space="preserve">
<value>Der Name eines Elements von dem das Start-Datum gelesen wird.</value>
</data>
</root>

231
app/DD-Record-Organiser/Strings/ControlProperties.resx Normal file
View File

@@ -0,0 +1,231 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="category_appointment" xml:space="preserve">
<value>Termin Einstellungen</value>
</data>
<data name="category_data" xml:space="preserve">
<value>Daten</value>
</data>
<data name="category_database" xml:space="preserve">
<value>Database Configurations</value>
</data>
<data name="category_date" xml:space="preserve">
<value>Datums Einstellungen</value>
</data>
<data name="category_font" xml:space="preserve">
<value>Font Configurations</value>
</data>
<data name="category_form" xml:space="preserve">
<value>Form Einstellungen</value>
</data>
<data name="category_id" xml:space="preserve">
<value>ID</value>
</data>
<data name="category_other" xml:space="preserve">
<value>Other Configurations</value>
</data>
<data name="category_view" xml:space="preserve">
<value>ViewConfigurations</value>
</data>
<data name="desc_backcolor" xml:space="preserve">
<value>Gibt die Hintergrundfarbe des Elements an.</value>
</data>
<data name="desc_caption" xml:space="preserve">
<value>Gibt den Beschreibungstext dieses Elements an.</value>
</data>
<data name="desc_columntitle" xml:space="preserve">
<value>Gibt den Spaltentitel des Elements an.</value>
</data>
<data name="desc_col_title" xml:space="preserve">
<value>Gibt den Spaltentitel des Elements an.</value>
</data>
<data name="desc_defaultvalue" xml:space="preserve">
<value>Gibt den Standardwert dieses Elements an.</value>
</data>
<data name="desc_description" xml:space="preserve">
<value>Gibt die Beschreibung des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden</value>
</data>
<data name="desc_fontcolor" xml:space="preserve">
<value>Gibt die Schriftfarbe an.</value>
</data>
<data name="desc_fontstyle" xml:space="preserve">
<value>Gibt die Schriftart an.</value>
</data>
<data name="desc_format" xml:space="preserve">
<value>Gibt das Format des Textes an.</value>
</data>
<data name="desc_formid" xml:space="preserve">
<value>Gibt die Form-ID der zu öffnenden Form an.</value>
</data>
<data name="desc_fromdate" xml:space="preserve">
<value>Der Name eines Elements von dem das End-Datum gelesen wird.</value>
</data>
<data name="desc_id" xml:space="preserve">
<value>Gibt die eindeutige ID des Elements an.</value>
</data>
<data name="desc_location" xml:space="preserve">
<value>Gibt die Position des Elements an.</value>
</data>
<data name="desc_multiline" xml:space="preserve">
<value>Gibt an, ob das Feld mehrzeilig sein soll.</value>
</data>
<data name="desc_name" xml:space="preserve">
<value>Gibt den internen Namen des Elements an.</value>
</data>
<data name="desc_place" xml:space="preserve">
<value>Gibt den Ort des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden</value>
</data>
<data name="desc_readonly" xml:space="preserve">
<value>Gibt an, ob dieses Element nur lesbar ist.</value>
</data>
<data name="desc_required" xml:space="preserve">
<value>Gibt an ob dieses Element benötigt wird um die Eingabe abzuschließen.</value>
</data>
<data name="desc_screenid" xml:space="preserve">
<value>Gibt die Screen-ID der zu öffnenden Form an.</value>
</data>
<data name="desc_showcolumn" xml:space="preserve">
<value>Gibt an, ob das Feld als Spalte im Grid angezeigt wird.</value>
</data>
<data name="desc_size" xml:space="preserve">
<value>Gibt die Größe des Elements an</value>
</data>
<data name="desc_sqlcommand" xml:space="preserve">
<value>Gibt die Datenbank-Abfrage für dieses Element an. Es können @RECORD_ID und @FORM_ID als Platzhalter verwendet werden.</value>
</data>
<data name="desc_staticlist" xml:space="preserve">
<value>Eine Liste von statischen Werten, die durch ';' getrennt sind. Überschreibt die Daten aus 'Datenbank-Einstellungen'</value>
</data>
<data name="desc_subject" xml:space="preserve">
<value>Gibt den Betreff des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden</value>
</data>
<data name="desc_subject2" xml:space="preserve">
<value>Gibt den optionalen zweiten Betreff des Termins an. Dynamische Werte aus anderen Controls können mit der Syntax [%controlname] eingefügt werden</value>
</data>
<data name="desc_tabindex" xml:space="preserve">
<value>Gibt die Reihenfolge an, in der das Element durch die Tabulatortaste aktiviert wird.</value>
</data>
<data name="desc_tabstop" xml:space="preserve">
<value>Gibt an, ob das Element durch die Tabulartortaste aktiviert werden soll.</value>
</data>
<data name="desc_todate" xml:space="preserve">
<value>Der Name eines Elements von dem das Start-Datum gelesen wird.</value>
</data>
</root>

27
app/DD-Record-Organiser/frmMain.Designer.vb generated
View File

@@ -22,16 +22,15 @@ Partial Class frmMain
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMain))
Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components)
Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon()
Me.Timer1 = New System.Windows.Forms.Timer()
Me.DD_DMSDataSet = New DD_Record_Organiser.DD_DMSDataSet()
Me.VWPMO_WF_USER_ACTIVEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.VWPMO_WF_USER_ACTIVEBindingSource = New System.Windows.Forms.BindingSource()
Me.VWPMO_WF_USER_ACTIVETableAdapter = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.VWPMO_WF_USER_ACTIVETableAdapter()
Me.TableAdapterManager = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.TableAdapterManager()
Me.ribbonMain = New DevExpress.XtraBars.Ribbon.RibbonControl()
Me.MainMenu = New DevExpress.XtraBars.Ribbon.ApplicationMenu(Me.components)
Me.MainMenu = New DevExpress.XtraBars.Ribbon.ApplicationMenu()
Me.itemInfo = New DevExpress.XtraBars.BarButtonItem()
Me.itemSettings = New DevExpress.XtraBars.BarButtonItem()
Me.itemExit = New DevExpress.XtraBars.BarButtonItem()
@@ -60,6 +59,7 @@ Partial Class frmMain
Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.groupQuickAccessForm = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.pageForms = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.groupQuickAccessForm2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.pageAdmin = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroupProgram = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroupTask = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
@@ -67,11 +67,10 @@ Partial Class frmMain
Me.RibbonPageGroupWindream = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
Me.DefaultLookAndFeel1 = New DevExpress.LookAndFeel.DefaultLookAndFeel(Me.components)
Me.DefaultLookAndFeel1 = New DevExpress.LookAndFeel.DefaultLookAndFeel()
Me.BarButtonItem11 = New DevExpress.XtraBars.BarButtonItem()
Me.TimerClose3Minutes = New System.Windows.Forms.Timer(Me.components)
Me.TimerClose3Minutes = New System.Windows.Forms.Timer()
Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.groupQuickAccessForm2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
CType(Me.DD_DMSDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.VWPMO_WF_USER_ACTIVEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ribbonMain, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -212,7 +211,7 @@ Partial Class frmMain
'BarButtonItem1
'
resources.ApplyResources(Me.BarButtonItem1, "BarButtonItem1")
Me.BarButtonItem1.Glyph = CType(resources.GetObject("BarButtonItem1.Glyph"), System.Drawing.Image)
Me.BarButtonItem1.Glyph = Global.DD_Record_Organiser.My.Resources.Resources.calendar_32x32
Me.BarButtonItem1.Id = 11
Me.BarButtonItem1.Name = "BarButtonItem1"
Me.BarButtonItem1.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.Large
@@ -373,6 +372,11 @@ Partial Class frmMain
Me.pageForms.Name = "pageForms"
resources.ApplyResources(Me.pageForms, "pageForms")
'
'groupQuickAccessForm2
'
Me.groupQuickAccessForm2.Name = "groupQuickAccessForm2"
resources.ApplyResources(Me.groupQuickAccessForm2, "groupQuickAccessForm2")
'
'pageAdmin
'
Me.pageAdmin.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroupProgram, Me.RibbonPageGroupTask, Me.RibbonPageGroupMenue, Me.RibbonPageGroupWindream, Me.RibbonPageGroup1})
@@ -455,11 +459,6 @@ Partial Class frmMain
Me.RibbonPageGroup3.Name = "RibbonPageGroup3"
resources.ApplyResources(Me.RibbonPageGroup3, "RibbonPageGroup3")
'
'groupQuickAccessForm2
'
Me.groupQuickAccessForm2.Name = "groupQuickAccessForm2"
resources.ApplyResources(Me.groupQuickAccessForm2, "groupQuickAccessForm2")
'
'frmMain
'
Me.Appearance.BackColor = CType(resources.GetObject("frmMain.Appearance.BackColor"), System.Drawing.Color)

54
app/DD-Record-Organiser/frmMain.resx
View File

@@ -1216,48 +1216,6 @@
<data name="BarButtonItem1.Caption" xml:space="preserve">
<value>Kalender</value>
</data>
<data name="BarButtonItem1.Glyph" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAB10RVh0VGl0
bGUAQ2FsZW5kYXI7U2NoZWR1bGVyO1ZpZXeFqTJSAAAIT0lEQVRYR6WXeVSU1xnGXRKTaGLSffm3f7Q9
+bOnqcmJNWmNmGoVE40iYRcB2UGRRRQRZBGNKKisgQBWOK5RqycqAqKI9dj1HMM2+z7MDMwwDJt9+r53
5htmirQ57ZzzO/f9Zrj3ed5733vvx4LnfXIO1yzILqjmcBGx2MNC/uK/ff6fvt5PRt4pbhYlZx3vIBCT
criLnpcQPNA3YfE36DvnI/3AzpmXY9NLcf9JPwK3p4OeXyOkjF54Di/6sOzf+r5BsAmGf58zKwu7tm54
vyco8FHPto1grq19D1VRu+D4J3BgbSAurF6Jrs3r0PXR79BJdGz6EB2BH+LuxrVo3xiA9g1rcOf3a3B7
/Rq0rlzh17fp7V/i5trf4EbA+7i6etXjllXvfECabNprYlF30CaLvu4Y7NebYb/aBGXdUZQH70DBiTbs
XhWAvsoijFyow8j5WtjaamBtJf5QDevZM7C0nIal+RSGv6jAcONJ9JXm+vX928EMGE+XwUAM5GXgym/f
s5ImzwbPtHCx+N7m9bBfa4Lp6F4YDqfg78nBKNsSgorGG0j41So8jvkE2tw4aPbFQpMdA3XWTqgzd0C5
JwrK3ZFQpEdCnhoOeXIYeoPX+/Xt/DgAAzu3oT/qEyhzknF51Tu8LK/4GeAptX/ZAENhMvQFSXiaHoac
lb/Ghp/8HBFvvom/JgZBkxND4juhyoyGKmMHVCxOwoq0CMhTwiFLDoUsMRR/Dg1E1op3Rd/Qn/4MD7eu
E+J9kVugyEzExXdXsIGlrCsZeOHOhgCMXiIDhxKhz0+ALi8eppN5MFcVwVi+fzbrvdFQZkhZR0CRSuKU
tSwpFEMJIRiKD8ZgXDCUuanQHNpLGSehL2oL+sI34+vwjyHPiMf5t99iA8v8DNxat5rWuB66g/FCXHtg
l3u6KWs1iUtZe6fck7VcZB0CWfynGCLhwdggDMQEoT96q8i6P2ILCZN42Ed4GrIJsrRYtL71izkGXjxa
143pmWeYmPYwNQPX1DO4KHZNEvQ8zkxOEzNwThAUO0VMLTHm0zokXNOwM+Nu+Leskuts4FU/A2W19zBJ
AvwHflBnh2uKBmF4kCmMSjinMOKDTTAJ69gkbAS3jMXBTAj4+8yia2xAOleEgSWlNfdE1v7OSZRcs5Bt
jDtPwOpw0UAuDNvHYR51wmJ30Xf825RX0C3qFhxm7LPwbxmFX/oZ4K2wpKSqU0yzW3QKTVf+gkZihDKa
L64+9whVZ3vJyLg31podMBSnQ1+UBrPBDH1hKnQFqTCTuHnUbXZ3wRU2sJzgw0gYeKn4TIdYYzbA09tw
6QkaLj4RHeaLT7X0orKlB3qL3RurTQ4STSHRZJh1Jujyk6A9mAjTiAtGgmckLf8yG3jd18DLhafuisKS
1tVgHYeeGKbs5otVJKYyOqAzj3pjxqQ1eTFqjW5I3ECYRyeQcvDSXAMFFe2i6HhquZhq2v5EPCLnznnj
8ob7ON7QDY3R5o2VBjs0++MFRq0B6pw4qLJjYbCRecJEy5B84CIb4AvKa+CV/BN3hAGpiKrP9aKKMNqc
88bHPu/Gsfp7JGr1xnIyoCZBdRaJagxQZu6Ekg4vnjU9GTCSgaT9F9jAt3wNLD1Yfkusv1S9GvMYQetp
ccwbK/SjkBMKvcUbyw2j0Gv00KkNBLUqD2RAZ3WKZUjIPc8Gvi0Z4K2wNO+zr4QBsV3IQGVzD0429UBH
QvPFR6o7UErIdcPeWKYjQ3w/0DGtU+rFBSWjE1NrcQp4GeKz2yQD/G4gDCzbf+ymqH4z7WsulBOND8S6
stB8ccnpuygmlAabNx7S0iyIIzoMGoVeXE58R2hIXDPsFDMRl9XKBr7ja+DVfWU3RQGaSJy3DBeTwmgX
jjVmuxBR6K00zVbItBbKdFig1NtoYAcGNSOCAY0NahLWKHRQy3VQybXUEiTOCAOZ59jAd/0MZJf+UVQ/
bxculKNUUGW1XWJdS2tmp7fkDGVa5c60qLIdhcSgdgQFlbeQX3FLGBiM2y5gcXEx0buAmmpHNTwmliFm
71wDr2UWXxfVb7Dxfh3HkZrOWdGqDu/0FtF5IUQp24LK2zhUcRv9ahvyqYjzy79CH8UDMfTyEb0NKpkW
/TvoRiSUJjJA8FLs3HOWDXzP18DyjMNXRQFK28VdtRJUQB7EWnrWU20Z80ytu1VRllKmHCslSJhR8EFF
z9FuA98n+LVMbIXle+iCMJKwljrz4Lzd1GYaXLTuAcWgIhMayDOokmKFgAQ8sdxkh5zEZrFDRq2M6orP
iajdLWzgB74GXucLwkhTL/aynjpQKzFEy8BLIdONUMzwd1R0PgwIaPqpHjjup9aNDf1UF9zy8ijYQHrz
HANv8AXxNf2B8xm9YHgYm3HjmKHreZraabqip+h6nqILa5Kho5ta2wQd34TVRYzTVTxOZ4mToS09RtC5
YmLoCu/9hw6RaU1s4Id+BhJy2nC86TGO1D9CWX0vSuuI2l6U1DxEcU0Pis48QNHpByg8fR8Fp7pxiMiv
IE52I+/kPeSd6ML+8k7kHu/EvmMdyCGyy+4S7cg6wtxBRukd7PusA58m1PkZELsgNrNl/HL3IG4+Vgpu
SG2vO77WKxMxtxJXeoYE4vnh7PN/orX9KYJiq1yk6d2G4jLaElmyNXrPF6boPc1Upc1UKE20Vo00XURq
AyJSG4kGhKcwnyM8uR5hSfUIZRLrBCEJtZSdh/gaBMfXIngXtUxcDbbHVSMo5oz5g8CMUNL0eyfkgP9R
4Duaj0h2J8H7VYK3ji9cSBI8pb78yIcfe+CYx+TXMc6etcWHA54Jrgf+4Xnwev0vvOQDP/NYnDBpLlj4
LyAMut4SBqhSAAAAAElFTkSuQmCC
</value>
</data>
<data name="BarButtonItem3.Caption" xml:space="preserve">
<value>Entitäten Designer</value>
</data>
@@ -3031,6 +2989,12 @@ Konfiguration</value>
<data name="&gt;&gt;pageForms.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;groupQuickAccessForm2.Name" xml:space="preserve">
<value>groupQuickAccessForm2</value>
</data>
<data name="&gt;&gt;groupQuickAccessForm2.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;pageAdmin.Name" xml:space="preserve">
<value>pageAdmin</value>
</data>
@@ -3091,12 +3055,6 @@ Konfiguration</value>
<data name="&gt;&gt;RibbonPageGroup3.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;groupQuickAccessForm2.Name" xml:space="preserve">
<value>groupQuickAccessForm2</value>
</data>
<data name="&gt;&gt;groupQuickAccessForm2.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;$this.Name" xml:space="preserve">
<value>frmMain</value>
</data>

56
app/DD-Record-Organiser/frmMain.vb
View File

@@ -67,6 +67,9 @@ Public Class frmMain
'Dim splash As New frmSplash()
'splash.ShowDialog()
' MainForm Hintergrund laden
SetBackgroundImage()
Me.Text = Application.ProductName
LabelVersion.Caption = String.Format("Version {0}", My.Application.Info.Version.ToString)
LabelUser.Caption = Environment.UserName
@@ -151,28 +154,20 @@ Public Class frmMain
"CHANGED_WHEN, MENU_IMG, SHORT_TITLE, LANGUAGE, " & _
"'CONSTR_MENUE' + CONVERT(VARCHAR(5), GUID) as OBECTNAME FROM TBPMO_FORM_CONSTRUCTOR where GUID in (SELECT CONSTRUCT_ID FROM TBPMO_CONSTRUCTOR_USER WHERE HOME_MENUE = 0 AND USER_ID = {2}) ORDER BY SEQUENCE_MENU", USER_LANGUAGE, CURRENT_SCREEN_ID, USER_GUID)
Dim dt As DataTable = ClassDatabase.Return_Datatable(SQL2)
Dim image2 As Bitmap = LoadNoImage()
Try
If Not IsNothing(groupQuickAccessForm) Then
Do While 0 < groupQuickAccessForm.ItemLinks.Count
groupQuickAccessForm.ItemLinks.Remove(groupQuickAccessForm.ItemLinks(0))
Loop
End If
Catch ex As Exception
End Try
If dt.Rows.Count <> 0 Then
For Each row As DataRow In dt.Rows
If Not IsDBNull(row.Item("MENU_IMG")) Then
Dim image As Bitmap = Nothing
If IsDBNull(row.Item("MENU_IMG")) Then
image = My.Resources.ResourceManager.GetObject("changechartlegendalignment_32x32")
Else
Dim bimg() As Byte = row.Item("MENU_IMG")
Dim bitmap As Bitmap = ByteArrayToBitmap(bimg)
image2 = bitmap
image = bitmap
End If
Dim title = row.Item("FORM_TITLE")
If title = "CAPTION (OBJ) NOT TRANSLATED" Then
Dim objectname = row.Item("OBECTNAME")
@@ -191,11 +186,12 @@ Public Class frmMain
item.RibbonStyle = RibbonItemStyles.Large
item.Caption = title
item.Tag = tag
item.Glyph = image2
item.Glyph = image
item.LargeGlyph = image
AddHandler item.ItemClick, AddressOf ToolbarButtonItemClick
groupQuickAccessForm2.ItemLinks.Add(item)
Next
End If
@@ -373,24 +369,16 @@ Public Class frmMain
Next
End Sub
Delegate Sub SetWindowTitleDelegate(t As String)
Public Sub SetWindowTitle(t As String)
If Me.InvokeRequired Then
Dim d As New SetWindowTitleDelegate(AddressOf SetWindowTitle)
Me.Invoke(d, New Object() {t})
Else
Me.Text = t
End If
End Sub
Private Sub SetBackgroundImage()
Dim SQL As String = "SELECT BACKGROUND_IMAGE FROM TBDD_MODULES WHERE NAME = 'Record-Organizer'"
Dim bimage() As Byte = ClassDatabase.Execute_Scalar(SQL)
Delegate Sub SetWindowBackgroundDelegate(i As Bitmap)
Public Sub SetWindowBackground(i As Bitmap)
If Me.InvokeRequired Then
Dim d As New SetWindowBackgroundDelegate(AddressOf SetWindowBackground)
Me.Invoke(d, New Object() {i})
Else
Me.BackgroundImage = i
If Not IsDBNull(bimage) Then
Dim image As Bitmap = ByteArrayToBitmap(bimage)
Me.BackgroundImage = image
Me.BackgroundImageLayout = ImageLayout.Center
End If
End Sub
@@ -625,7 +613,7 @@ Public Class frmMain
'If USER_LANGUAGE = "de-DE" Then
' MsgBox("Global Indexer wird nun geschlossen, weil keine neue Lizenzdaten eingegeben wurden!", MsgBoxStyle.Information)
'Else
MsgBox("Global Indexer will now be closed, cause no new license was updated!", MsgBoxStyle.Information)
MsgBox("Record Organizer will now be closed, cause no new license was updated!", MsgBoxStyle.Information)
'End If
Me.Close()
Else

1
app/DD-Record-Organiser/frmSplash.vb
View File

@@ -83,6 +83,7 @@ Public NotInheritable Class frmSplash
System.Threading.Thread.Sleep(500)
bw.ReportProgress(CalcProgress(5), "Initializing Frontend")
' InitInterface wurde in frmMain integriert
'Init.InitInterface(mainForm)
System.Threading.Thread.Sleep(500)