jj 21.03.2016 level designer 1 window, updated translations
This commit is contained in:
JenneJ
parent
b141334661
commit
8a528a424f
@ -34,11 +34,36 @@ Module ClassControlProperties
|
||||
' +++++ ABSTRACT CLASSES +++++
|
||||
Public MustInherit Class BaseProperties
|
||||
Private _id As Integer
|
||||
Private _type As String
|
||||
Private _size As Size
|
||||
Private _location As Point
|
||||
Private _name As String
|
||||
Private _hint As String
|
||||
|
||||
<LocalizedCategoryAttribute("category_info")>
|
||||
<LocalizedDescriptionAttribute("desc_id")>
|
||||
<ReadOnlyAttribute(True)>
|
||||
Public Property ID() As Integer
|
||||
Get
|
||||
Return _id
|
||||
End Get
|
||||
Set(value As Integer)
|
||||
_id = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<LocalizedCategoryAttribute("category_info")>
|
||||
<LocalizedDescriptionAttribute("desc_type")>
|
||||
<ReadOnlyAttribute(True)>
|
||||
Public Property ControlType() As String
|
||||
Get
|
||||
Return _type
|
||||
End Get
|
||||
Set(value As String)
|
||||
_type = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<LocalizedCategoryAttribute("category_view")>
|
||||
<LocalizedDescriptionAttribute("desc_hint")>
|
||||
Public Property Hint() As String
|
||||
@ -50,18 +75,6 @@ Module ClassControlProperties
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<LocalizedCategoryAttribute("category_id")>
|
||||
<LocalizedDescriptionAttribute("desc_id")>
|
||||
<ReadOnlyAttribute(True)>
|
||||
Public Property ID() As Integer
|
||||
Get
|
||||
Return _id
|
||||
End Get
|
||||
Set(value As Integer)
|
||||
_id = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<LocalizedCategoryAttribute("category_view")>
|
||||
<LocalizedDescriptionAttribute("desc_size")>
|
||||
Public Property Size() As Size
|
||||
|
||||
@ -211,11 +211,6 @@
|
||||
<Private>True</Private>
|
||||
</Reference>
|
||||
<Reference Include="PresentationCore" />
|
||||
<Reference Include="SnapPanelControl, Version=1.0.5491.24234, Culture=neutral, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>..\..\lib\SnapPanelControl\SnapPanelControl.dll</HintPath>
|
||||
<Private>True</Private>
|
||||
</Reference>
|
||||
<Reference Include="System" />
|
||||
<Reference Include="System.Data" />
|
||||
<Reference Include="System.Deployment" />
|
||||
@ -1232,6 +1227,12 @@
|
||||
<None Include="Resources\138_PushPin_32x42_721.png" />
|
||||
<Content Include="Resources\138_PushPin_48x48_72.png" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<ProjectReference Include="..\SnapPanelControl\SnapPanelControl.vbproj">
|
||||
<Project>{9B1BBAC7-F595-43BA-8B54-CF2B595847CD}</Project>
|
||||
<Name>SnapPanelControl</Name>
|
||||
</ProjectReference>
|
||||
</ItemGroup>
|
||||
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
|
||||
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
|
||||
Other similar extension points exist, see Microsoft.Common.targets.
|
||||
|
||||
@ -224,21 +224,21 @@
|
||||
frm.Show()
|
||||
|
||||
|
||||
Dim frm2 As New frmTool_ControlDesigner
|
||||
frm2 = frmTool_ControlDesigner.Instance
|
||||
If My.Settings.User_DesignPanels_areChild = True Then
|
||||
frm2.MdiParent = MAIN_FORM
|
||||
End If
|
||||
'Dim frm2 As New frmTool_ControlDesigner
|
||||
'frm2 = frmTool_ControlDesigner.Instance
|
||||
'If My.Settings.User_DesignPanels_areChild = True Then
|
||||
' frm2.MdiParent = MAIN_FORM
|
||||
'End If
|
||||
|
||||
frm2.Show()
|
||||
'frm2.Show()
|
||||
|
||||
Dim frm3 As New frmTool_ControlProperties
|
||||
frm3 = frmTool_ControlProperties.Instance
|
||||
If My.Settings.User_DesignPanels_areChild = True Then
|
||||
frm3.MdiParent = MAIN_FORM
|
||||
End If
|
||||
'Dim frm3 As New frmTool_ControlProperties
|
||||
'frm3 = frmTool_ControlProperties.Instance
|
||||
'If My.Settings.User_DesignPanels_areChild = True Then
|
||||
' frm3.MdiParent = MAIN_FORM
|
||||
'End If
|
||||
|
||||
frm3.Show()
|
||||
'frm3.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
@ -1,9 +1,10 @@
|
||||
DevExpress.XtraEditors.DateEdit, DevExpress.XtraEditors.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraVerticalGrid.VGridControl, DevExpress.XtraVerticalGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraPdfViewer.PdfViewer, DevExpress.XtraPdfViewer.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.Navigation.TileNavPane, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraPdfViewer.PdfViewer, DevExpress.XtraPdfViewer.v14.2, Version=14.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraNavBar.NavBarControl, DevExpress.XtraNavBar.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraPdfViewer.PdfViewer, DevExpress.XtraPdfViewer.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.DateEdit, DevExpress.XtraEditors.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraVerticalGrid.VGridControl, DevExpress.XtraVerticalGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.Docking.DockManager, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.Navigation.TileNavPane, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
|
||||
@ -119,11 +119,11 @@ Namespace My.Resources
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die ID ähnelt.
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die Information ähnelt.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property category_id() As String
|
||||
Friend Shared ReadOnly Property category_info() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("category_id", resourceCulture)
|
||||
Return ResourceManager.GetString("category_info", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
@ -405,5 +405,14 @@ Namespace My.Resources
|
||||
Return ResourceManager.GetString("desc_todate", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die Der Typ des Elements ähnelt.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property desc_type() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("desc_type", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
End Class
|
||||
End Namespace
|
||||
|
||||
@ -135,8 +135,8 @@
|
||||
<data name="category_form" xml:space="preserve">
|
||||
<value>Form Configuration</value>
|
||||
</data>
|
||||
<data name="category_id" xml:space="preserve">
|
||||
<value>ID</value>
|
||||
<data name="category_info" xml:space="preserve">
|
||||
<value>Information</value>
|
||||
</data>
|
||||
<data name="category_other" xml:space="preserve">
|
||||
<value>Other Configuration</value>
|
||||
@ -231,4 +231,7 @@
|
||||
<data name="desc_todate" xml:space="preserve">
|
||||
<value>The appointment's end-date. Dynamic values from other controls can be inserted with the syntax [%controlname].</value>
|
||||
</data>
|
||||
<data name="desc_type" xml:space="preserve">
|
||||
<value>The element's type</value>
|
||||
</data>
|
||||
</root>
|
||||
@ -135,8 +135,8 @@
|
||||
<data name="category_form" xml:space="preserve">
|
||||
<value>Form Einstellungen</value>
|
||||
</data>
|
||||
<data name="category_id" xml:space="preserve">
|
||||
<value>ID</value>
|
||||
<data name="category_info" xml:space="preserve">
|
||||
<value>Information</value>
|
||||
</data>
|
||||
<data name="category_other" xml:space="preserve">
|
||||
<value>Andere Einstellungen</value>
|
||||
@ -231,4 +231,7 @@
|
||||
<data name="desc_todate" xml:space="preserve">
|
||||
<value>Der Name eines Elements von dem das Start-Datum gelesen wird.</value>
|
||||
</data>
|
||||
<data name="desc_type" xml:space="preserve">
|
||||
<value>Der Typ des Elements</value>
|
||||
</data>
|
||||
</root>
|
||||
976
app/DD-Record-Organiser/cx4mqlti.wsf
Normal file
976
app/DD-Record-Organiser/cx4mqlti.wsf
Normal file
@ -0,0 +1,976 @@
|
||||
Public Class frmLevel_Designer
|
||||
#Region "+++++ Konstanten +++++"
|
||||
'Private akt_ctrl As Control
|
||||
Private Shared _Instance As frmLevel_Designer = Nothing
|
||||
Private Mouse_Moving As Boolean = False
|
||||
Private Mouse_Down As Boolean = False
|
||||
Private Current_Properties As Object = Nothing
|
||||
|
||||
Private LastCursor As Point = Nothing
|
||||
#End Region
|
||||
Dim formloaded As Boolean = False
|
||||
Public Shared Function Instance() As frmLevel_Designer
|
||||
If _Instance Is Nothing OrElse _Instance.IsDisposed = True Then
|
||||
_Instance = New frmLevel_Designer
|
||||
End If
|
||||
_Instance.BringToFront()
|
||||
Return _Instance
|
||||
End Function
|
||||
|
||||
Public Sub SetFormTitle(title As String)
|
||||
Me.Text = "Formdesigner: " & title
|
||||
End Sub
|
||||
|
||||
Public Sub SetFormName(name As String)
|
||||
Me.lblFormName.Text = "Name: " & name & " - Form-ID: " & CURRENT_FORM_ID
|
||||
End Sub
|
||||
|
||||
|
||||
#Region "+++++ Drag Drop Funktionen +++++"
|
||||
|
||||
Public Sub ControlDragDrop(type As String, Parent As GroupBox)
|
||||
Try
|
||||
Dim r As New System.Random()
|
||||
Dim def_font_family As String = DefaultFont.Name
|
||||
Dim def_font_color As Integer = DefaultForeColor.ToArgb
|
||||
Dim def_font_style As Integer = 0
|
||||
Dim def_font_size As Integer = 8
|
||||
|
||||
Dim defaultCaption As String = "Bezeichner definieren"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
defaultCaption = "Define Identifier"
|
||||
End If
|
||||
|
||||
Dim defaultCalendarCaption As String = "Zu Kalender hinzufügen"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
defaultCalendarCaption = "Add to Calendar"
|
||||
End If
|
||||
|
||||
Dim random As String = ShortGUID()
|
||||
'Dim random As Integer = r.Next(8, 100)
|
||||
Select Case type
|
||||
Case "lbl"
|
||||
CtrlBuilder.AddLabel(0, "lbl" & random, defaultCaption, 0, 0, def_font_family, def_font_color, def_font_size, def_font_style, "", True, Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case "txt"
|
||||
CtrlBuilder.AddTextBox(0, "txt" & random, 0, 0, def_font_family, def_font_color, def_font_size, def_font_style, 0, True, 0, 0, False, False, False, "String", True, Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case "cmb"
|
||||
CtrlBuilder.AddComboBox(0, "cmb" & random, 0, 0, def_font_family, def_font_color, def_font_size, def_font_style, 0, True, 0, 0, "String", True, False, False, "", "", Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case "dtp"
|
||||
CtrlBuilder.AddDateTimePicker(0, "dtp" & random, 0, 0, def_font_family, def_font_size, def_font_style, 0, False, 0, 0, False, False, True, Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case "dgv"
|
||||
CtrlBuilder.AddDataGridView(0, "dgv" & random, 0, 0, 0, 0, True, False, False, "dgv" & random, Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case "chk"
|
||||
CtrlBuilder.AddCheckBox(0, "chk" & random, defaultCaption, False, 0, 0, def_font_family, def_font_color, def_font_size, def_font_style, 0, False, 0, 0, True, False, False, Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case "rb"
|
||||
CtrlBuilder.AddRadioButton(0, "rb" & random, defaultCaption, False, 0, 0, def_font_family, def_font_color, def_font_size, def_font_style, 0, False, 0, 0, True, False, False, Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
|
||||
Case "pb"
|
||||
CtrlBuilder.AddPictureBox(0, "pb" & random, 0, 0, 0, 0, True, False, False, Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case "gb"
|
||||
CtrlBuilder.AddGroupBox(0, "gb" & random, defaultCaption, 0, 0, 0, 0, ColorToInt(SystemColors.Control), def_font_color, def_font_family, def_font_size, def_font_style, True, Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case "f_addappointment"
|
||||
CtrlBuilder.FunctionAddAppointment(0, "f_addappointment" & random, defaultCalendarCaption, 0, 0, 0, 0, True, Parent)
|
||||
|
||||
If ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl) = True Then
|
||||
Dim ControlId = GetControlID_for_Name(CtrlBuilder.CurrentControl.Name, CURRENT_FORM_ID)
|
||||
ClassFunctionCommands.InsertFunction(ControlId, "ADDAPPOINTMENT")
|
||||
End If
|
||||
Case "f_addformdata"
|
||||
CtrlBuilder.FunctionAddFormData(0, "f_addformdata" & random, "Add Form Data", 0, 0, 0, 0, True, Parent)
|
||||
|
||||
If ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl) = True Then
|
||||
Dim ControlId = GetControlID_for_Name(CtrlBuilder.CurrentControl.Name, CURRENT_FORM_ID)
|
||||
ClassFunctionCommands.InsertFunction(ControlId, "ADDFORMDATA")
|
||||
End If
|
||||
Case "lstbxcheck"
|
||||
CtrlBuilder.AddCheckedListBox(0, "chlb" & random, 0, 0, def_font_family, def_font_color, def_font_size, def_font_style, 0, True, 0, 0, True, False, False, "", "", Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case "lstbx"
|
||||
CtrlBuilder.AddListBox(0, "lbx" & random, 0, 0, def_font_family, def_font_color, def_font_size, def_font_style, 0, True, 0, 0, True, False, False, "", "", Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case Else
|
||||
MsgBox("Event '" & type & "' nicht definiert")
|
||||
End Select
|
||||
Catch ex As Exception
|
||||
MsgBox("unexpected Error in ControlDragDrop: " & vbNewLine, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub Groupbox_DragDrop(sender As Object, e As DragEventArgs)
|
||||
Dim type As String = e.Data.GetData(DataFormats.Text)
|
||||
Dim GroupBox As GroupBox = CType(sender, GroupBox)
|
||||
|
||||
ControlDragDrop(type, GroupBox)
|
||||
End Sub
|
||||
|
||||
Private Sub pnlDesigner_DragDrop(sender As Object, e As DragEventArgs)
|
||||
Dim type As String = e.Data.GetData(DataFormats.Text)
|
||||
|
||||
ControlDragDrop(type, Nothing)
|
||||
End Sub
|
||||
|
||||
Private Sub pnlDesigner_DragEnter(sender As Object, e As DragEventArgs)
|
||||
' Check the format of the data being dropped.
|
||||
If (e.Data.GetDataPresent(DataFormats.Text)) Then
|
||||
' Display the copy cursor.
|
||||
e.Effect = DragDropEffects.Copy
|
||||
Else
|
||||
' Display the no-drop cursor.
|
||||
e.Effect = DragDropEffects.None
|
||||
End If
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
#Region "+++++ Form Events +++++"
|
||||
Private Sub frmLevel_Designer_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
|
||||
Try
|
||||
Dim sw
|
||||
|
||||
sw = Stopwatch.StartNew()
|
||||
ClassWindowLocation.SaveFormLocationSize(Me, 1, CURRENT_SCREEN_ID, "frmLevel_Designer")
|
||||
sw.Stop()
|
||||
Console.WriteLine(String.Format("SaveFormLocationSize took {0}ms", sw.ElapsedMilliseconds))
|
||||
|
||||
sw = Stopwatch.StartNew()
|
||||
My.Settings.Save()
|
||||
sw.Stop()
|
||||
Console.WriteLine(String.Format("My.Settings.Save took {0}ms", sw.ElapsedMilliseconds))
|
||||
|
||||
sw = Stopwatch.StartNew()
|
||||
RebuildView()
|
||||
sw.Stop()
|
||||
Console.WriteLine(String.Format("RebuildView took {0}ms", sw.ElapsedMilliseconds))
|
||||
|
||||
Dim wid As Integer = Me.Width
|
||||
Dim update_sizepnl As String = "UPDATE TBPMO_FORM_VIEW SET HEIGHT = " & pnlDesigner.Height & ",WIDTH = " & wid & " where FORM_ID = " & CURRENT_FORM_ID & " and SCREEN_ID = " & CURRENT_SCREEN_ID
|
||||
ClassDatabase.Execute_non_Query(update_sizepnl)
|
||||
'frmTool_ControlProperties.Instance.Close()
|
||||
'frmTool_ControlDesigner.Instance.Close()
|
||||
|
||||
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub frmLevel_Designer_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
ClassWindowLocation.LoadFormLocationSize(Me, 1, CURRENT_SCREEN_ID, "frmLevel_Designer")
|
||||
|
||||
' ADDED 18.11
|
||||
CtrlBuilder = New ClassControlBuilder(pnlDesigner,
|
||||
AddressOf Control_MouseDown,
|
||||
AddressOf Control_MouseUp,
|
||||
AddressOf Control_MouseMove,
|
||||
AddressOf Control_Click,
|
||||
AddressOf Groupbox_DragDrop)
|
||||
|
||||
If ClassDatabase.Init = True Then
|
||||
LoadFormProperties()
|
||||
LoadControls()
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub HandleToolTip(sender As Object, e As EventArgs)
|
||||
Console.WriteLine("show tooltip")
|
||||
End Sub
|
||||
#End Region
|
||||
|
||||
#Region "+++++ Load Funktionen +++++"
|
||||
Public Sub LoadFormProperties()
|
||||
Dim NAME_SQL As String = "SELECT NAME FROM TBPMO_FORM WHERE GUID = " & CURRENT_FORM_ID
|
||||
Dim formviewid = ClassDatabase.Execute_Scalar("SELECT GUID FROM TBPMO_FORM_VIEW WHERE FORM_ID = " & CURRENT_FORM_ID & " AND SCREEN_ID = " & CURRENT_SCREEN_ID)
|
||||
Dim TITLE_SQL As String = "SELECT CAPTION FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = 'FORMVIEW_TITLE" & formviewid & "' and SCREEN_ID = " & CURRENT_SCREEN_ID & " AND LANGUAGE_TYPE = '" & USER_LANGUAGE & "'"
|
||||
Dim Height = ClassDatabase.Execute_Scalar("SELECT HEIGHT FROM TBPMO_FORM_VIEW WHERE FORM_ID = " & CURRENT_FORM_ID & " and SCREEN_ID = " & CURRENT_SCREEN_ID)
|
||||
Dim width = ClassDatabase.Execute_Scalar("SELECT WIDTH FROM TBPMO_FORM_VIEW WHERE FORM_ID = " & CURRENT_FORM_ID & " and SCREEN_ID = " & CURRENT_SCREEN_ID)
|
||||
Dim name = ClassDatabase.Execute_Scalar(NAME_SQL)
|
||||
Dim title = ClassDatabase.Execute_Scalar(TITLE_SQL)
|
||||
' Check_Document_Config(CURRENT_FORM_ID)
|
||||
If Not IsDBNull(Height) Then
|
||||
If Height > 100 Then
|
||||
Me.pnlDesigner.Height = Height
|
||||
End If
|
||||
'If Not IsDBNull(width) Then
|
||||
If width > 500 Then
|
||||
' Me.Width = width
|
||||
End If
|
||||
|
||||
'End If
|
||||
End If
|
||||
SetFormName(name)
|
||||
SetFormTitle(title)
|
||||
End Sub
|
||||
|
||||
Public Sub LoadControls()
|
||||
Dim sql = String.Format("SELECT T.*, dbo.FNPMO_GET_CONTROL_CAPTION ('{0}', {1},T.CONTROL_ID) AS 'CAPTION' FROM VWPMO_CONTROL_SCREEN T" & _
|
||||
" where T.FORM_ID = {2} and T.SCREEN_ID = {3}", USER_LANGUAGE, CURRENT_SCREEN_ID, CURRENT_FORM_ID, CURRENT_SCREEN_ID)
|
||||
Dim dt As DataTable = ClassDatabase.Return_Datatable(sql)
|
||||
|
||||
For Each dr As DataRow In dt.Rows
|
||||
|
||||
Dim parent As GroupBox = Nothing
|
||||
If (dr.Item("CONTROL_PARENT_ID") <> 0) Then
|
||||
Dim parentname As String = Get_Name_for_ControlID(dr.Item("CONTROL_PARENT_ID"), CURRENT_FORM_ID)
|
||||
parent = CtrlBuilder.GetControlByName(parentname)
|
||||
End If
|
||||
|
||||
Select Case dr.Item("CTRLTYPE_ID")
|
||||
Case 1 ' Label
|
||||
CtrlBuilder.AddLabel(dr.Item("CONTROL_ID"),
|
||||
dr.Item("CONTROL_NAME"),
|
||||
dr.Item("CAPTION"),
|
||||
dr.Item("CTRLSCR_X_LOC"),
|
||||
dr.Item("CTRLSCR_Y_LOC"),
|
||||
dr.Item("CTRLSCR_FONT_FAMILY"),
|
||||
dr.Item("CTRLSCR_FONT_COLOR"),
|
||||
dr.Item("CTRLSCR_FONT_SIZE"),
|
||||
dr.Item("CTRLSCR_FONT_STYLE"),
|
||||
dr.Item("CONTROL_SQLCOMMAND_1"),
|
||||
False,
|
||||
parent,
|
||||
True)
|
||||
Case 2 ' TextBox
|
||||
CtrlBuilder.AddTextBox(dr.Item("CONTROL_ID"),
|
||||
dr.Item("CONTROL_NAME"),
|
||||
dr.Item("CTRLSCR_X_LOC"),
|
||||
dr.Item("CTRLSCR_Y_LOC"),
|
||||
dr.Item("CTRLSCR_FONT_FAMILY"),
|
||||
dr.Item("CTRLSCR_FONT_COLOR"),
|
||||
dr.Item("CTRLSCR_FONT_SIZE"),
|
||||
dr.Item("CTRLSCR_FONT_STYLE"),
|
||||
dr.Item("CTRLSCR_TAB_INDEX"),
|
||||
dr.Item("CTRLSCR_TAB_STOP"),
|
||||
dr.Item("CTRLSCR_WIDTH"),
|
||||
dr.Item("CTRLSCR_HEIGHT"),
|
||||
dr.Item("CONTROL_MULTILINE"),
|
||||
dr.Item("CONTROL_READ_ONLY"),
|
||||
dr.Item("CONTROL_REQUIRED"),
|
||||
dr.Item("CONTROL_FORMAT_TYPE"),
|
||||
False,
|
||||
parent,
|
||||
True)
|
||||
Case 3 ' ComboBox
|
||||
CtrlBuilder.AddComboBox(dr.Item("CONTROL_ID"),
|
||||
dr.Item("CONTROL_NAME"),
|
||||
dr.Item("CTRLSCR_X_LOC"),
|
||||
dr.Item("CTRLSCR_Y_LOC"),
|
||||
dr.Item("CTRLSCR_FONT_FAMILY"),
|
||||
dr.Item("CTRLSCR_FONT_COLOR"),
|
||||
dr.Item("CTRLSCR_FONT_SIZE"),
|
||||
dr.Item("CTRLSCR_FONT_STYLE"),
|
||||
dr.Item("CTRLSCR_TAB_INDEX"),
|
||||
dr.Item("CTRLSCR_TAB_STOP"),
|
||||
dr.Item("CTRLSCR_WIDTH"),
|
||||
dr.Item("CTRLSCR_HEIGHT"),
|
||||
dr.Item("CONTROL_FORMAT_TYPE"),
|
||||
False,
|
||||
dr.Item("CONTROL_READ_ONLY"),
|
||||
dr.Item("CONTROL_REQUIRED"),
|
||||
dr.Item("CONTROL_STATIC_LIST"),
|
||||
dr.Item("CONTROL_SQLCOMMAND_1"),
|
||||
parent,
|
||||
True)
|
||||
Case 4 ' DateTimePicker
|
||||
CtrlBuilder.AddDateTimePicker(dr.Item("CONTROL_ID"),
|
||||
dr.Item("CONTROL_NAME"),
|
||||
dr.Item("CTRLSCR_X_LOC"),
|
||||
dr.Item("CTRLSCR_Y_LOC"),
|
||||
dr.Item("CTRLSCR_FONT_FAMILY"),
|
||||
dr.Item("CTRLSCR_FONT_SIZE"),
|
||||
dr.Item("CTRLSCR_FONT_STYLE"),
|
||||
dr.Item("CTRLSCR_TAB_INDEX"),
|
||||
dr.Item("CTRLSCR_TAB_STOP"),
|
||||
dr.Item("CTRLSCR_WIDTH"),
|
||||
dr.Item("CTRLSCR_HEIGHT"),
|
||||
dr.Item("CONTROL_READ_ONLY"),
|
||||
dr.Item("CONTROL_REQUIRED"),
|
||||
False,
|
||||
parent,
|
||||
True)
|
||||
Case 5 ' GroupBox
|
||||
CtrlBuilder.AddGroupBox(dr.Item("CONTROL_ID"),
|
||||
dr.Item("CONTROL_NAME"),
|
||||
dr.Item("CTRLSCR_CAPTION"),
|
||||
dr.Item("CTRLSCR_X_LOC"),
|
||||
dr.Item("CTRLSCR_Y_LOC"),
|
||||
dr.Item("CTRLSCR_WIDTH"),
|
||||
dr.Item("CTRLSCR_HEIGHT"),
|
||||
dr.Item("CTRLSCR_BACK_COLOR"),
|
||||
dr.Item("CTRLSCR_FONT_COLOR"),
|
||||
dr.Item("CTRLSCR_FONT_FAMILY"),
|
||||
dr.Item("CTRLSCR_FONT_SIZE"),
|
||||
dr.Item("CTRLSCR_FONT_STYLE"),
|
||||
False,
|
||||
parent,
|
||||
True)
|
||||
Case 6 ' PictureBox
|
||||
CtrlBuilder.AddPictureBox(dr.Item("CONTROL_ID"),
|
||||
dr.Item("CONTROL_NAME"),
|
||||
dr.Item("CTRLSCR_X_LOC"),
|
||||
dr.Item("CTRLSCR_Y_LOC"),
|
||||
dr.Item("CTRLSCR_WIDTH"),
|
||||
dr.Item("CTRLSCR_HEIGHT"),
|
||||
False,
|
||||
dr.Item("CONTROL_READ_ONLY"),
|
||||
dr.Item("CONTROL_REQUIRED"),
|
||||
parent,
|
||||
True)
|
||||
Case 7 ' DataGridView
|
||||
CtrlBuilder.AddDataGridView(dr.Item("CONTROL_ID"),
|
||||
dr.Item("CONTROL_NAME"),
|
||||
dr.Item("CTRLSCR_X_LOC"),
|
||||
dr.Item("CTRLSCR_Y_LOC"),
|
||||
dr.Item("CTRLSCR_WIDTH"),
|
||||
dr.Item("CTRLSCR_HEIGHT"),
|
||||
False,
|
||||
dr.Item("CONTROL_READ_ONLY"),
|
||||
dr.Item("CONTROL_REQUIRED"),
|
||||
dr.Item("CONTROL_COL_NAME"),
|
||||
parent,
|
||||
True)
|
||||
Case 10 ' Checkbox
|
||||
Dim Checked As Boolean
|
||||
If IsDBNull(dr.Item("CONTROL_DEF_VALUE")) Then
|
||||
Checked = False
|
||||
Else
|
||||
Checked = StrToBool(dr.Item("CONTROL_DEF_VALUE"))
|
||||
End If
|
||||
CtrlBuilder.AddCheckBox(dr.Item("CONTROL_ID"),
|
||||
dr.Item("CONTROL_NAME"),
|
||||
dr.Item("CTRLSCR_CAPTION"),
|
||||
Checked,
|
||||
dr.Item("CTRLSCR_X_LOC"),
|
||||
dr.Item("CTRLSCR_Y_LOC"),
|
||||
dr.Item("CTRLSCR_FONT_FAMILY"),
|
||||
dr.Item("CTRLSCR_FONT_COLOR"),
|
||||
dr.Item("CTRLSCR_FONT_SIZE"),
|
||||
dr.Item("CTRLSCR_FONT_STYLE"),
|
||||
dr.Item("CTRLSCR_TAB_INDEX"),
|
||||
dr.Item("CTRLSCR_TAB_STOP"),
|
||||
dr.Item("CTRLSCR_WIDTH"),
|
||||
dr.Item("CTRLSCR_HEIGHT"),
|
||||
False,
|
||||
dr.Item("CONTROL_READ_ONLY"),
|
||||
dr.Item("CONTROL_REQUIRED"),
|
||||
parent,
|
||||
True)
|
||||
Case 8 'AddAppointment Button
|
||||
CtrlBuilder.FunctionAddAppointment(dr.Item("CONTROL_ID"),
|
||||
dr.Item("CONTROL_NAME"),
|
||||
dr.Item("CTRLSCR_CAPTION"),
|
||||
dr.Item("CTRLSCR_X_LOC"),
|
||||
dr.Item("CTRLSCR_Y_LOC"),
|
||||
dr.Item("CTRLSCR_WIDTH"),
|
||||
dr.Item("CTRLSCR_HEIGHT"),
|
||||
False,
|
||||
parent,
|
||||
True)
|
||||
Case 9 'AddFormData
|
||||
CtrlBuilder.FunctionAddFormData(dr.Item("CONTROL_ID"),
|
||||
dr.Item("CONTROL_NAME"),
|
||||
dr.Item("CTRLSCR_CAPTION"),
|
||||
dr.Item("CTRLSCR_X_LOC"),
|
||||
dr.Item("CTRLSCR_Y_LOC"),
|
||||
dr.Item("CTRLSCR_WIDTH"),
|
||||
dr.Item("CTRLSCR_HEIGHT"),
|
||||
False,
|
||||
parent,
|
||||
True)
|
||||
|
||||
Case 11 ' RadioButton
|
||||
Dim Checked As Boolean
|
||||
If IsDBNull(dr.Item("CONTROL_DEF_VALUE")) Then
|
||||
Checked = False
|
||||
Else
|
||||
Checked = StrToBool(dr.Item("CONTROL_DEF_VALUE"))
|
||||
End If
|
||||
CtrlBuilder.AddRadioButton(dr.Item("CONTROL_ID"),
|
||||
dr.Item("CONTROL_NAME"),
|
||||
dr.Item("CTRLSCR_CAPTION"),
|
||||
Checked,
|
||||
dr.Item("CTRLSCR_X_LOC"),
|
||||
dr.Item("CTRLSCR_Y_LOC"),
|
||||
dr.Item("CTRLSCR_FONT_FAMILY"),
|
||||
dr.Item("CTRLSCR_FONT_COLOR"),
|
||||
dr.Item("CTRLSCR_FONT_SIZE"),
|
||||
dr.Item("CTRLSCR_FONT_STYLE"),
|
||||
dr.Item("CTRLSCR_TAB_INDEX"),
|
||||
dr.Item("CTRLSCR_TAB_STOP"),
|
||||
dr.Item("CTRLSCR_WIDTH"),
|
||||
dr.Item("CTRLSCR_HEIGHT"),
|
||||
False,
|
||||
dr.Item("CONTROL_READ_ONLY"),
|
||||
dr.Item("CONTROL_REQUIRED"),
|
||||
parent,
|
||||
True)
|
||||
Case 12 'CheckedListBox
|
||||
CtrlBuilder.AddCheckedListBox(dr.Item("CONTROL_ID"),
|
||||
dr.Item("CONTROL_NAME"),
|
||||
dr.Item("CTRLSCR_X_LOC"),
|
||||
dr.Item("CTRLSCR_Y_LOC"),
|
||||
dr.Item("CTRLSCR_FONT_FAMILY"),
|
||||
dr.Item("CTRLSCR_FONT_COLOR"),
|
||||
dr.Item("CTRLSCR_FONT_SIZE"),
|
||||
dr.Item("CTRLSCR_FONT_STYLE"),
|
||||
dr.Item("CTRLSCR_TAB_INDEX"),
|
||||
dr.Item("CTRLSCR_TAB_STOP"),
|
||||
dr.Item("CTRLSCR_WIDTH"),
|
||||
dr.Item("CTRLSCR_HEIGHT"),
|
||||
False,
|
||||
dr.Item("CONTROL_READ_ONLY"),
|
||||
dr.Item("CONTROL_REQUIRED"),
|
||||
dr.Item("CONTROL_STATIC_LIST"),
|
||||
dr.Item("CONTROL_SQLCOMMAND_1"),
|
||||
parent,
|
||||
True)
|
||||
Case 13 'ListBox
|
||||
CtrlBuilder.AddListBox(dr.Item("CONTROL_ID"),
|
||||
dr.Item("CONTROL_NAME"),
|
||||
dr.Item("CTRLSCR_X_LOC"),
|
||||
dr.Item("CTRLSCR_Y_LOC"),
|
||||
dr.Item("CTRLSCR_FONT_FAMILY"),
|
||||
dr.Item("CTRLSCR_FONT_COLOR"),
|
||||
dr.Item("CTRLSCR_FONT_SIZE"),
|
||||
dr.Item("CTRLSCR_FONT_STYLE"),
|
||||
dr.Item("CTRLSCR_TAB_INDEX"),
|
||||
dr.Item("CTRLSCR_TAB_STOP"),
|
||||
dr.Item("CTRLSCR_WIDTH"),
|
||||
dr.Item("CTRLSCR_HEIGHT"),
|
||||
False,
|
||||
dr.Item("CONTROL_READ_ONLY"),
|
||||
dr.Item("CONTROL_REQUIRED"),
|
||||
dr.Item("CONTROL_STATIC_LIST"),
|
||||
dr.Item("CONTROL_SQLCOMMAND_1"),
|
||||
parent,
|
||||
True)
|
||||
End Select
|
||||
Next
|
||||
End Sub
|
||||
|
||||
|
||||
#End Region
|
||||
|
||||
#Region "+++++ Mouse Events +++++"
|
||||
Private Sub Control_Click(sender As Object, e As EventArgs)
|
||||
Dim control As Control = DirectCast(sender, Control)
|
||||
|
||||
' Aktuelles Control highlighten
|
||||
control.BringToFront()
|
||||
CtrlBuilder.SetAllActiveColor()
|
||||
|
||||
' GUID des aktuellen Controls speichern
|
||||
CURRENT_CONTROL_ID = ClassControlCommands.GetControlGuid(CtrlBuilder.CurrentControl.Name)
|
||||
|
||||
' Control Eigenschaften laden
|
||||
'frmTool_ControlProperties.Instance.pgControlProperties.Enabled = True
|
||||
pgControlProperties.Enabled = True
|
||||
|
||||
'frmTool_ControlProperties.Instance.LoadControlProperties(CtrlBuilder.CurrentControl)
|
||||
'frmTool_ControlProperties.Instance.LoadControlPropertiesNeu(CtrlBuilder.CurrentControl)
|
||||
LoadControlPropertiesNeu(CtrlBuilder.CurrentControl)
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub Control_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseDown
|
||||
' Check to see if the correct button has been pressed
|
||||
If e.Button = Windows.Forms.MouseButtons.Left Then
|
||||
CtrlBuilder.CurrentControl = sender
|
||||
CtrlBuilder.BeginLocation = e.Location
|
||||
|
||||
' Set the mode flag to signal the MouseMove event handler that it
|
||||
' needs to now calculate new positions for our control
|
||||
Mouse_Moving = True
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub ControlButton_MouseDown(sender As Object, e As MouseEventArgs) Handles btntextbox.MouseDown,
|
||||
btnlabel.MouseDown,
|
||||
btndtp.MouseDown,
|
||||
btncmb.MouseDown,
|
||||
btnCheckbox.MouseDown,
|
||||
btnpb.MouseDown,
|
||||
btngb.MouseDown,
|
||||
btn_addtocal.MouseDown,
|
||||
btn_addformdata.MouseDown,
|
||||
btnRadioButton.MouseDown,
|
||||
btnListBoxCheckable.MouseDown,
|
||||
btnListBox.MouseDown
|
||||
Mouse_Down = True
|
||||
End Sub
|
||||
|
||||
Private Sub ControlButton_MouseMove(sender As Object, e As MouseEventArgs) Handles btntextbox.MouseMove,
|
||||
btnlabel.MouseMove,
|
||||
btndtp.MouseMove,
|
||||
btncmb.MouseMove,
|
||||
btnCheckbox.MouseMove,
|
||||
btnpb.MouseMove,
|
||||
btngb.MouseMove,
|
||||
btn_addtocal.MouseMove,
|
||||
btn_addformdata.MouseMove,
|
||||
btnRadioButton.MouseMove,
|
||||
btnListBoxCheckable.MouseMove,
|
||||
btnListBox.MouseMove
|
||||
|
||||
If Mouse_Down = True Then
|
||||
Dim control As Control = DirectCast(sender, Control)
|
||||
control.DoDragDrop(control.Tag, DragDropEffects.Copy)
|
||||
End If
|
||||
Mouse_Down = False
|
||||
End Sub
|
||||
|
||||
Private Sub Control_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseUp
|
||||
' The button was released, so we're going back to Static mode.
|
||||
If Mouse_Moving = True Then
|
||||
Mouse_Moving = False
|
||||
'end_location = e.Location
|
||||
CtrlBuilder.EndLocation = e.Location
|
||||
|
||||
'frmTool_ControlProperties.Instance.UpdateControlLocation(CtrlBuilder.CurrentControl)
|
||||
UpdateControlLocation(CtrlBuilder.CurrentControl)
|
||||
ClassControlCommands.UpdateControlPosition(CtrlBuilder.CurrentControl.Location.X,
|
||||
CtrlBuilder.CurrentControl.Location.Y,
|
||||
CtrlBuilder.CurrentControl)
|
||||
|
||||
'Save_Control()
|
||||
End If
|
||||
' Restore the cursor image to the way we found it when the mouse
|
||||
' button was pressed
|
||||
MyBase.Cursor = Cursors.Default
|
||||
End Sub
|
||||
Private Sub Control_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove
|
||||
Try
|
||||
If CtrlBuilder.CurrentControl Is Nothing Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If Mouse_Moving = True Then
|
||||
Me.Cursor = Cursors.Hand
|
||||
Me.Refresh()
|
||||
|
||||
Dim control As Control = DirectCast(sender, Control)
|
||||
Dim NowCursor As Point = CtrlBuilder.GetCursorPosition()
|
||||
|
||||
' Wenn das Control in einer GroupBox steckt
|
||||
If ParentIsGroupBox(control) Then
|
||||
Dim p As Control = control.Parent
|
||||
Dim newPos As Point = New Point(NowCursor.X - p.Location.X - e.Location.X,
|
||||
NowCursor.Y - p.Location.Y - e.Location.Y)
|
||||
|
||||
' Verhindert, dass das Control links+oben außerhalb der Groupbox geschoben wird = unerreichbar
|
||||
If newPos.X < 0 Or newPos.Y < 0 Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
' Verhindert, dass das Control rechts+unten außerhalb der Groupbox geschoben wird = unerreichbar
|
||||
If (newPos.X + control.Size.Width) > p.Size.Width Or (newPos.Y + control.Size.Height) > p.Size.Height Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If Point.op_Inequality(NowCursor, LastCursor) Then
|
||||
control.Location = newPos
|
||||
LastCursor = NowCursor
|
||||
End If
|
||||
|
||||
Else
|
||||
' Alle normalen Controls
|
||||
control.Location = New Point(NowCursor.X - CtrlBuilder.BeginLocation.X,
|
||||
NowCursor.Y - CtrlBuilder.BeginLocation.Y)
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "MovableLabel_MouseMove")
|
||||
Mouse_Moving = False
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
#End Region
|
||||
|
||||
Private Sub Control_PressTab(sender As Object, e As PreviewKeyDownEventArgs)
|
||||
'NOOP
|
||||
End Sub
|
||||
|
||||
Private Function RebuildView()
|
||||
Try
|
||||
'Dim sql = "EXECUTE PRPMO_CREATE_SQL " & CURRENT_FORM_ID
|
||||
'ClassDatabase.Execute_non_Query_Async(sql)
|
||||
'Dim sql2 = "EXECUTE PRPMO_CREATE_TEMP_VIEWS"
|
||||
'ClassDatabase.Execute_non_Query_Async(sql2)
|
||||
'Return True
|
||||
|
||||
Dim noerror As Boolean = False
|
||||
Dim sql = "EXECUTE PRPMO_CREATE_SQL " & CURRENT_FORM_ID
|
||||
noerror = ClassDatabase.Execute_non_Query_withConn(sql, 1)
|
||||
sql = "EXECUTE PRPMO_CREATE_TEMP_VIEWS"
|
||||
noerror = ClassDatabase.Execute_non_Query_withConn(sql, 1)
|
||||
Return noerror
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in btnexecute_CreateViewSql:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
Return False
|
||||
End Try
|
||||
End Function
|
||||
|
||||
|
||||
Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
|
||||
If RebuildView() = True Then
|
||||
MsgBox("The Views have been created successful.", MsgBoxStyle.Information)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub frmLevel_Designer_Shown(sender As Object, e As EventArgs) Handles Me.Shown
|
||||
formloaded = True
|
||||
End Sub
|
||||
|
||||
Public Sub LoadControlPropertiesNeu(ctrl As Control)
|
||||
Try
|
||||
|
||||
Dim controlId = DirectCast(ctrl.Tag, ClassControlMetadata).Id
|
||||
Dim sql As String = String.Format("SELECT * FROM VWPMO_CONTROL_SCREEN WHERE CONTROL_ID = {0}", ControlId)
|
||||
'Dim sqlHint As String = String.Format("SELECT HINT FROM TBPMO_CONTROL_LANGUAGE WHERE CONTROL_SCREEN_ID = {0} AND LANGUAGE_TYPE = '{1}'", controlId, USER_LANGUAGE)
|
||||
Dim sqlHint = String.Format("SELECT HINT FROM TBPMO_CONTROL_LANGUAGE WHERE CONTROL_SCREEN_ID = (SELECT GUID FROM TBPMO_CONTROL_SCREEN WHERE CONTROL_ID = {0} AND SCREEN_ID = {1}) AND LANGUAGE_TYPE = '{2}'", controlId, CURRENT_SCREEN_ID, USER_LANGUAGE)
|
||||
|
||||
Dim dt As DataTable = ClassDatabase.Return_Datatable(sql)
|
||||
Dim hint As String = ClassConverter.ToStringOrDefault(ClassDatabase.Execute_Scalar(sqlHint), Nothing)
|
||||
|
||||
Dim props As Object = Nothing
|
||||
Dim r As DataRow = Nothing
|
||||
Dim type As String = Nothing
|
||||
|
||||
If dt.Rows.Count <> 1 Then
|
||||
MsgBox("Unexpected behaviour in LoadControlProperties: No Control could be loaded!" & vbNewLine & "Tag.ControlID: " & ControlId.ToString, MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
r = dt.Rows(0)
|
||||
type = r.Item("CTRLTYPE_NAME")
|
||||
|
||||
'Props Object initialisieren
|
||||
Select Case type
|
||||
Case "Label" : props = New LabelProperties()
|
||||
Case "Textbox" : props = New TextBoxProperties()
|
||||
Case "Combobox" : props = New ComboBoxProperties()
|
||||
Case "Checkbox" : props = New CheckBoxProperties()
|
||||
Case "RadioButton" : props = New RadioButtonProperties()
|
||||
Case "Datepicker" : props = New DateTimePickerProperties()
|
||||
Case "Datagridview" : props = New DataGridViewProperties()
|
||||
Case "Groupbox" : props = New GroupBoxProperties()
|
||||
Case "Picturebox" : props = New PictureBoxProperties()
|
||||
Case "ListBox" : props = New ComboBoxProperties()
|
||||
Case "CheckedListBox" : props = New ComboBoxProperties()
|
||||
Case "F_AddAppointment" : props = New FunctionAddAppointment()
|
||||
Case "F_AddFormData" : props = New FunctionAddFormData()
|
||||
End Select
|
||||
|
||||
'Generische Properties laden
|
||||
props.ID = r.Item("CONTROL_ID")
|
||||
props.Name = r.Item("CONTROL_NAME")
|
||||
props.Size = New Size(r.Item("CTRLSCR_WIDTH"), r.Item("CTRLSCR_HEIGHT"))
|
||||
props.Location = New Point(r.Item("CTRLSCR_X_LOC"), r.Item("CTRLSCR_Y_LOC"))
|
||||
props.Hint = hint
|
||||
|
||||
'Control-spezifische Properties laden
|
||||
Select Case type
|
||||
Case "Label"
|
||||
props.Type = "Label"
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
props.ColumnTitle = r.Item("CONTROL_COL_NAME")
|
||||
props.Caption = r.Item("CTRLSCR_CAPTION")
|
||||
props.SQLCommand = New SQLValue(NotNull(r.Item("CONTROL_SQLCOMMAND_1"), ""))
|
||||
|
||||
Case "Textbox"
|
||||
props.Type = "Textbox"
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
props.ColumnTitle = r.Item("CONTROL_COL_NAME")
|
||||
props.DefaultValue = ClassConverter.ToStringOrDefault(r.Item("CONTROL_DEF_VALUE"))
|
||||
props.Format = NotNull([Enum].Parse(GetType(EnumFormatOptions), r.Item("CONTROL_FORMAT_TYPE")), EnumFormatOptions.String)
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
props.TabStop = r.Item("CTRLSCR_TAB_STOP")
|
||||
props.TabIndex = r.Item("CTRLSCR_TAB_INDEX")
|
||||
props.ShowColumn = NotNull(CBool(r.Item("CONTROL_SHOW_COLUMN")), True)
|
||||
props.Multiline = r.Item("CONTROL_MULTILINE")
|
||||
props.SQLCommand = New SQLValue(NotNull(r.Item("CONTROL_SQLCOMMAND_1"), ""))
|
||||
|
||||
Case "Combobox"
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
props.ColumnTitle = r.Item("CONTROL_COL_NAME")
|
||||
props.DefaultValue = ClassConverter.ToStringOrDefault(r.Item("CONTROL_DEF_VALUE"))
|
||||
props.MasterDataId = r.Item("CTRLSCR_MASTER_DATA_ID")
|
||||
props.Format = NotNull([Enum].Parse(GetType(EnumFormatOptions), r.Item("CONTROL_FORMAT_TYPE")), EnumFormatOptions.String)
|
||||
props.StaticList = NotNull(r.Item("CONTROL_STATIC_LIST"), "")
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
props.TabStop = r.Item("CTRLSCR_TAB_STOP")
|
||||
props.TabIndex = r.Item("CTRLSCR_TAB_INDEX")
|
||||
props.ShowColumn = NotNull(CBool(r.Item("CONTROL_SHOW_COLUMN")), True)
|
||||
props.SQLCommand = New SQLValue(NotNull(r.Item("CONTROL_SQLCOMMAND_1"), ""))
|
||||
|
||||
Case "Checkbox"
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
props.ColumnTitle = r.Item("CONTROL_COL_NAME")
|
||||
props.Caption = r.Item("CTRLSCR_CAPTION")
|
||||
props.DefaultValue = ClassConverter.ToBooleanOrDefault(r.Item("CONTROL_DEF_VALUE"))
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
props.ShowColumn = NotNull(CBool(r.Item("CONTROL_SHOW_COLUMN")), True)
|
||||
props.TabStop = r.Item("CTRLSCR_TAB_STOP")
|
||||
props.TabIndex = r.Item("CTRLSCR_TAB_INDEX")
|
||||
|
||||
Case "RadioButton"
|
||||
props.ColumnTitle = r.Item("CONTROL_COL_NAME")
|
||||
props.Caption = r.Item("CTRLSCR_CAPTION")
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
|
||||
Case "Datepicker"
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
props.ColumnTitle = r.Item("CONTROL_COL_NAME")
|
||||
Dim i = r.Item("CONTROL_DEF_VALUE")
|
||||
props.DefaultValue = NotNull(r.Item("CONTROL_DEF_VALUE"), EnumDateTimePickerDefaultValueOptions.Empty)
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
props.ShowColumn = NotNull(CBool(r.Item("CONTROL_SHOW_COLUMN")), True)
|
||||
props.TabStop = r.Item("CTRLSCR_TAB_STOP")
|
||||
props.TabIndex = r.Item("CTRLSCR_TAB_INDEX")
|
||||
|
||||
Case "Datagridview"
|
||||
' Keine zusätzliche Properties
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
props.ColumnTitle = ClassConverter.ToStringOrDefault(r.Item("CONTROL_COL_NAME"), ctrl.Name)
|
||||
props.ShowColumn = ClassConverter.ToBooleanOrDefault(r.Item("CONTROL_SHOW_COLUMN"), True)
|
||||
props.SQLCommand = New SQLValue(NotNull(r.Item("CONTROL_SQLCOMMAND_1"), ""))
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
|
||||
Case "Groupbox"
|
||||
props.Caption = r.Item("CTRLSCR_CAPTION")
|
||||
props.BackColor = IntToColor(r.Item("CTRLSCR_BACK_COLOR"))
|
||||
|
||||
Case "Picturebox"
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
|
||||
Case "ListBox"
|
||||
props.StaticList = ClassConverter.ToStringOrDefault(r.Item("CONTROL_STATIC_LIST"))
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
props.ColumnTitle = ClassConverter.ToStringOrDefault(r.Item("CONTROL_COL_NAME"), ctrl.Name)
|
||||
props.ShowColumn = ClassConverter.ToBooleanOrDefault(r.Item("CONTROL_SHOW_COLUMN"), True)
|
||||
|
||||
Case "CheckedListBox"
|
||||
props.StaticList = ClassConverter.ToStringOrDefault(r.Item("CONTROL_STATIC_LIST"))
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
props.ColumnTitle = ClassConverter.ToStringOrDefault(r.Item("CONTROL_COL_NAME"), ctrl.Name)
|
||||
props.ShowColumn = ClassConverter.ToBooleanOrDefault(r.Item("CONTROL_SHOW_COLUMN"), True)
|
||||
|
||||
Case "F_AddAppointment"
|
||||
props.Caption() = r.Item("CTRLSCR_CAPTION")
|
||||
|
||||
Dim f = ClassFunctionCommands.LoadFunction(controlId)
|
||||
Dim FromDateId, ToDateId, SubjectString, Subject2String, PlaceString, DescString
|
||||
|
||||
FromDateId = f.Item("INTEGER1")
|
||||
If IsDBNull(FromDateId) OrElse FromDateId = 0 Then
|
||||
props.FromDate = ""
|
||||
Else
|
||||
props.FromDate = Get_Name_for_ControlID(FromDateId, CURRENT_FORM_ID)
|
||||
End If
|
||||
|
||||
ToDateId = f.Item("INTEGER2")
|
||||
If IsDBNull(ToDateId) OrElse ToDateId = 0 Then
|
||||
props.ToDate = ""
|
||||
Else
|
||||
props.ToDate = Get_Name_for_ControlID(ToDateId, CURRENT_FORM_ID)
|
||||
End If
|
||||
|
||||
SubjectString = f.Item("STRING1")
|
||||
If IsDBNull(SubjectString) OrElse String.IsNullOrEmpty(SubjectString) Then
|
||||
props.Subject = ""
|
||||
Else
|
||||
props.Subject = SubjectString
|
||||
End If
|
||||
|
||||
Subject2String = f.Item("STRING2")
|
||||
If IsDBNull(Subject2String) OrElse String.IsNullOrEmpty(Subject2String) Then
|
||||
props.Subject2 = ""
|
||||
Else
|
||||
props.Subject2 = Subject2String
|
||||
End If
|
||||
|
||||
PlaceString = f.Item("STRING3")
|
||||
If IsDBNull(PlaceString) OrElse String.IsNullOrEmpty(PlaceString) Then
|
||||
props.Place = ""
|
||||
Else
|
||||
props.Place = PlaceString
|
||||
End If
|
||||
|
||||
DescString = f.Item("STRING4")
|
||||
If IsDBNull(DescString) OrElse String.IsNullOrEmpty(DescString) Then
|
||||
props.Description = ""
|
||||
Else
|
||||
props.Description = DescString
|
||||
End If
|
||||
|
||||
|
||||
Case "F_AddFormData"
|
||||
props.Caption = r.Item("CTRLSCR_CAPTION")
|
||||
|
||||
Dim f = ClassFunctionCommands.LoadFunction(controlId)
|
||||
|
||||
Dim FormId = f.Item("INTEGER1")
|
||||
props.FormID = NotNullInt(FormId, 0)
|
||||
|
||||
Dim ScreenId = f.Item("INTEGER2")
|
||||
props.ScreenID = NotNullInt(ScreenId, 0)
|
||||
|
||||
End Select
|
||||
|
||||
CURRENT_CONTROL_ID = r.Item("CONTROL_ID")
|
||||
' Aktuelle Control Eigenschaften anzeigen
|
||||
Me.pgControlProperties.SelectedObject = props
|
||||
' Fenster Titel aktualisieren
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in LoadControlProperties" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Sub UpdateControlLocation(ctrl As Control)
|
||||
Current_Properties = Me.pgControlProperties.SelectedObject
|
||||
|
||||
If Current_Properties IsNot Nothing Then
|
||||
Current_Properties.Location = ctrl.Location
|
||||
Me.pgControlProperties.SelectedObject = Current_Properties
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Public Function SaveControlProperties(ctrl As Control, properties As Object) As Boolean
|
||||
If ClassControlCommands.UpdateControl(ctrl, properties) Then
|
||||
LoadControlPropertiesNeu(ctrl)
|
||||
Return True
|
||||
Else
|
||||
MsgBox("Fehler beim Speichern der Elementeigenschaften.", MsgBoxStyle.Critical)
|
||||
Return False
|
||||
End If
|
||||
End Function
|
||||
|
||||
Private Sub btnSaveControl_Click(sender As Object, e As EventArgs) Handles btnSaveControl.Click
|
||||
If SaveControlProperties(CtrlBuilder.CurrentControl, pgControlProperties.SelectedObject) Then
|
||||
lblStatus.Text = "Änderungen gespeichert - " & Now
|
||||
lblStatus.Visible = True
|
||||
Else
|
||||
lblStatus.Visible = False
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btnDeleteControl_Click(sender As Object, e As EventArgs) Handles btnDeleteControl.Click
|
||||
If MsgBox("Wollen Sie das Element wirklich löschen?", MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
||||
If IsGroupBox(CtrlBuilder.CurrentControl) Then
|
||||
Dim parentID As Integer = GetControlID_for_Name(CtrlBuilder.CurrentControl.Name, CURRENT_FORM_ID)
|
||||
Dim SQL = "SELECT GUID FROM TBPMO_CONTROL WHERE PARENT_CONTROL_ID = " & parentID
|
||||
Dim dt As DataTable = ClassDatabase.Return_Datatable(SQL)
|
||||
|
||||
For Each dr As DataRow In dt.Rows
|
||||
Dim id As Integer = dr.Item(0)
|
||||
ClassControlCommands.DeleteControl(id)
|
||||
Next
|
||||
|
||||
End If
|
||||
|
||||
If ClassControlCommands.DeleteControl() = True Then
|
||||
'MsgBox("Element gelöscht, Elemente werden neu geladen.", MsgBoxStyle.Information)
|
||||
CtrlBuilder.ClearControls()
|
||||
frmLevel_Designer.Instance.LoadControls()
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub pgControlProperties_PropertyValueChanged(s As Object, e As PropertyValueChangedEventArgs)
|
||||
|
||||
Dim oldValue As Object = e.OldValue
|
||||
Dim newValue As Object = e.ChangedItem.Value
|
||||
Dim currentProperty As String = e.ChangedItem.Label
|
||||
Dim ctrl As Control = CtrlBuilder.CurrentControl
|
||||
|
||||
Select Case currentProperty
|
||||
Case "Location"
|
||||
ctrl.Location = newValue
|
||||
Case "X"
|
||||
ctrl.Location = New Point(newValue, ctrl.Location.Y)
|
||||
Case "Y"
|
||||
ctrl.Location = New Point(ctrl.Location.X, newValue)
|
||||
Case "Size"
|
||||
ctrl.Size = newValue
|
||||
Case "Width"
|
||||
ctrl.Size = New Size(newValue, ctrl.Size.Height)
|
||||
Case "Height"
|
||||
ctrl.Size = New Size(ctrl.Size.Width, newValue)
|
||||
Case "Name"
|
||||
ctrl.Name = newValue
|
||||
Case "Caption"
|
||||
ctrl.Text = newValue
|
||||
Case "Font"
|
||||
ctrl.Font = newValue
|
||||
Case "FontColor"
|
||||
ctrl.ForeColor = newValue
|
||||
Case "BackColor"
|
||||
ctrl.BackColor = newValue
|
||||
End Select
|
||||
|
||||
lblStatus.Text = "Ausstehende Änderungen"
|
||||
lblStatus.Visible = True
|
||||
End Sub
|
||||
End Class
|
||||
40
app/DD-Record-Organiser/frmConfig_Basic.Designer.vb
generated
40
app/DD-Record-Organiser/frmConfig_Basic.Designer.vb
generated
@ -78,15 +78,16 @@ Partial Class frmConfig_Basic
|
||||
'
|
||||
'TabControl1
|
||||
'
|
||||
resources.ApplyResources(Me.TabControl1, "TabControl1")
|
||||
Me.TabControl1.Controls.Add(Me.TabPage1)
|
||||
Me.TabControl1.Controls.Add(Me.TabPage2)
|
||||
Me.TabControl1.Controls.Add(Me.TabPage3)
|
||||
resources.ApplyResources(Me.TabControl1, "TabControl1")
|
||||
Me.TabControl1.Name = "TabControl1"
|
||||
Me.TabControl1.SelectedIndex = 0
|
||||
'
|
||||
'TabPage1
|
||||
'
|
||||
resources.ApplyResources(Me.TabPage1, "TabPage1")
|
||||
Me.TabPage1.Controls.Add(Me.chkbxUserAut)
|
||||
Me.TabPage1.Controls.Add(Me.Label5)
|
||||
Me.TabPage1.Controls.Add(Me.cmbDatenbank)
|
||||
@ -99,7 +100,6 @@ Partial Class frmConfig_Basic
|
||||
Me.TabPage1.Controls.Add(Me.txtUser)
|
||||
Me.TabPage1.Controls.Add(Me.txtPasswort)
|
||||
Me.TabPage1.Controls.Add(Me.BtnConnect)
|
||||
resources.ApplyResources(Me.TabPage1, "TabPage1")
|
||||
Me.TabPage1.Name = "TabPage1"
|
||||
Me.TabPage1.UseVisualStyleBackColor = True
|
||||
'
|
||||
@ -116,8 +116,8 @@ Partial Class frmConfig_Basic
|
||||
'
|
||||
'cmbDatenbank
|
||||
'
|
||||
Me.cmbDatenbank.FormattingEnabled = True
|
||||
resources.ApplyResources(Me.cmbDatenbank, "cmbDatenbank")
|
||||
Me.cmbDatenbank.FormattingEnabled = True
|
||||
Me.cmbDatenbank.Name = "cmbDatenbank"
|
||||
'
|
||||
'Label4
|
||||
@ -149,32 +149,33 @@ Partial Class frmConfig_Basic
|
||||
'
|
||||
'txtServer
|
||||
'
|
||||
Me.txtServer.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
resources.ApplyResources(Me.txtServer, "txtServer")
|
||||
Me.txtServer.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
Me.txtServer.Name = "txtServer"
|
||||
'
|
||||
'txtUser
|
||||
'
|
||||
Me.txtUser.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
resources.ApplyResources(Me.txtUser, "txtUser")
|
||||
Me.txtUser.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
Me.txtUser.Name = "txtUser"
|
||||
'
|
||||
'txtPasswort
|
||||
'
|
||||
Me.txtPasswort.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
resources.ApplyResources(Me.txtPasswort, "txtPasswort")
|
||||
Me.txtPasswort.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
Me.txtPasswort.Name = "txtPasswort"
|
||||
Me.txtPasswort.UseSystemPasswordChar = True
|
||||
'
|
||||
'BtnConnect
|
||||
'
|
||||
Me.BtnConnect.Image = Global.DD_Record_Organiser.My.Resources.Resources.database_go1
|
||||
resources.ApplyResources(Me.BtnConnect, "BtnConnect")
|
||||
Me.BtnConnect.Image = Global.DD_Record_Organiser.My.Resources.Resources.database_go1
|
||||
Me.BtnConnect.Name = "BtnConnect"
|
||||
Me.BtnConnect.UseVisualStyleBackColor = True
|
||||
'
|
||||
'TabPage2
|
||||
'
|
||||
resources.ApplyResources(Me.TabPage2, "TabPage2")
|
||||
Me.TabPage2.Controls.Add(Me.GroupBox4)
|
||||
Me.TabPage2.Controls.Add(Me.GroupBox3)
|
||||
Me.TabPage2.Controls.Add(Me.GroupBox2)
|
||||
@ -183,15 +184,14 @@ Partial Class frmConfig_Basic
|
||||
Me.TabPage2.Controls.Add(Me.Button1)
|
||||
Me.TabPage2.Controls.Add(Me.btnApplicationFolder)
|
||||
Me.TabPage2.Controls.Add(Me.LinkLabel1)
|
||||
resources.ApplyResources(Me.TabPage2, "TabPage2")
|
||||
Me.TabPage2.Name = "TabPage2"
|
||||
Me.TabPage2.UseVisualStyleBackColor = True
|
||||
'
|
||||
'GroupBox4
|
||||
'
|
||||
resources.ApplyResources(Me.GroupBox4, "GroupBox4")
|
||||
Me.GroupBox4.Controls.Add(Me.Button3)
|
||||
Me.GroupBox4.Controls.Add(Me.cmbLanguage)
|
||||
resources.ApplyResources(Me.GroupBox4, "GroupBox4")
|
||||
Me.GroupBox4.Name = "GroupBox4"
|
||||
Me.GroupBox4.TabStop = False
|
||||
'
|
||||
@ -203,17 +203,17 @@ Partial Class frmConfig_Basic
|
||||
'
|
||||
'cmbLanguage
|
||||
'
|
||||
resources.ApplyResources(Me.cmbLanguage, "cmbLanguage")
|
||||
Me.cmbLanguage.FormattingEnabled = True
|
||||
Me.cmbLanguage.Items.AddRange(New Object() {resources.GetString("cmbLanguage.Items"), resources.GetString("cmbLanguage.Items1")})
|
||||
resources.ApplyResources(Me.cmbLanguage, "cmbLanguage")
|
||||
Me.cmbLanguage.Name = "cmbLanguage"
|
||||
'
|
||||
'GroupBox3
|
||||
'
|
||||
resources.ApplyResources(Me.GroupBox3, "GroupBox3")
|
||||
Me.GroupBox3.Controls.Add(Me.Label7)
|
||||
Me.GroupBox3.Controls.Add(Me.cmbConstructor)
|
||||
Me.GroupBox3.Controls.Add(Me.CheckBox1)
|
||||
resources.ApplyResources(Me.GroupBox3, "GroupBox3")
|
||||
Me.GroupBox3.Name = "GroupBox3"
|
||||
Me.GroupBox3.TabStop = False
|
||||
'
|
||||
@ -224,8 +224,8 @@ Partial Class frmConfig_Basic
|
||||
'
|
||||
'cmbConstructor
|
||||
'
|
||||
Me.cmbConstructor.FormattingEnabled = True
|
||||
resources.ApplyResources(Me.cmbConstructor, "cmbConstructor")
|
||||
Me.cmbConstructor.FormattingEnabled = True
|
||||
Me.cmbConstructor.Name = "cmbConstructor"
|
||||
'
|
||||
'CheckBox1
|
||||
@ -239,11 +239,11 @@ Partial Class frmConfig_Basic
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
resources.ApplyResources(Me.GroupBox2, "GroupBox2")
|
||||
Me.GroupBox2.Controls.Add(Me.CheckBoxWD_ShowEnitityDocs)
|
||||
Me.GroupBox2.Controls.Add(Me.chkbxloadWDDocs)
|
||||
Me.GroupBox2.Controls.Add(Me.Label6)
|
||||
Me.GroupBox2.Controls.Add(Me.txtwdSearch_Count)
|
||||
resources.ApplyResources(Me.GroupBox2, "GroupBox2")
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.TabStop = False
|
||||
'
|
||||
@ -271,8 +271,8 @@ Partial Class frmConfig_Basic
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.chkboxQuickMenue)
|
||||
resources.ApplyResources(Me.GroupBox1, "GroupBox1")
|
||||
Me.GroupBox1.Controls.Add(Me.chkboxQuickMenue)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.TabStop = False
|
||||
'
|
||||
@ -290,15 +290,15 @@ Partial Class frmConfig_Basic
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.Image = Global.DD_Record_Organiser.My.Resources.Resources.folder_go
|
||||
resources.ApplyResources(Me.Button1, "Button1")
|
||||
Me.Button1.Image = Global.DD_Record_Organiser.My.Resources.Resources.folder_go
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnApplicationFolder
|
||||
'
|
||||
Me.btnApplicationFolder.Image = Global.DD_Record_Organiser.My.Resources.Resources.folder_go
|
||||
resources.ApplyResources(Me.btnApplicationFolder, "btnApplicationFolder")
|
||||
Me.btnApplicationFolder.Image = Global.DD_Record_Organiser.My.Resources.Resources.folder_go
|
||||
Me.btnApplicationFolder.Name = "btnApplicationFolder"
|
||||
Me.btnApplicationFolder.UseVisualStyleBackColor = True
|
||||
'
|
||||
@ -310,6 +310,7 @@ Partial Class frmConfig_Basic
|
||||
'
|
||||
'TabPage3
|
||||
'
|
||||
resources.ApplyResources(Me.TabPage3, "TabPage3")
|
||||
Me.TabPage3.Controls.Add(Me.Label9)
|
||||
Me.TabPage3.Controls.Add(Me.DataGridView1)
|
||||
Me.TabPage3.Controls.Add(Me.btnSaveExclusionFiles)
|
||||
@ -317,7 +318,6 @@ Partial Class frmConfig_Basic
|
||||
Me.TabPage3.Controls.Add(Me.txtScanFolderWatch)
|
||||
Me.TabPage3.Controls.Add(Me.Label8)
|
||||
Me.TabPage3.Controls.Add(Me.btnstartstop2)
|
||||
resources.ApplyResources(Me.TabPage3, "TabPage3")
|
||||
Me.TabPage3.Name = "TabPage3"
|
||||
Me.TabPage3.UseVisualStyleBackColor = True
|
||||
'
|
||||
@ -328,9 +328,9 @@ Partial Class frmConfig_Basic
|
||||
'
|
||||
'DataGridView1
|
||||
'
|
||||
resources.ApplyResources(Me.DataGridView1, "DataGridView1")
|
||||
DataGridViewCellStyle1.BackColor = System.Drawing.Color.Aqua
|
||||
Me.DataGridView1.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
|
||||
resources.ApplyResources(Me.DataGridView1, "DataGridView1")
|
||||
Me.DataGridView1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.DataGridView1.Name = "DataGridView1"
|
||||
'
|
||||
@ -348,8 +348,8 @@ Partial Class frmConfig_Basic
|
||||
'
|
||||
'txtScanFolderWatch
|
||||
'
|
||||
Me.txtScanFolderWatch.BackColor = System.Drawing.Color.LemonChiffon
|
||||
resources.ApplyResources(Me.txtScanFolderWatch, "txtScanFolderWatch")
|
||||
Me.txtScanFolderWatch.BackColor = System.Drawing.Color.LemonChiffon
|
||||
Me.txtScanFolderWatch.Name = "txtScanFolderWatch"
|
||||
'
|
||||
'Label8
|
||||
@ -359,8 +359,8 @@ Partial Class frmConfig_Basic
|
||||
'
|
||||
'btnstartstop2
|
||||
'
|
||||
Me.btnstartstop2.Image = Global.DD_Record_Organiser.My.Resources.Resources.bell_go
|
||||
resources.ApplyResources(Me.btnstartstop2, "btnstartstop2")
|
||||
Me.btnstartstop2.Image = Global.DD_Record_Organiser.My.Resources.Resources.bell_go
|
||||
Me.btnstartstop2.Name = "btnstartstop2"
|
||||
Me.btnstartstop2.UseVisualStyleBackColor = True
|
||||
'
|
||||
|
||||
@ -117,44 +117,74 @@
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="TabPage1.Text" xml:space="preserve">
|
||||
<value>Database Connection</value>
|
||||
</data>
|
||||
<data name="TabPage2.Text" xml:space="preserve">
|
||||
<value>Configurations</value>
|
||||
</data>
|
||||
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
<data name="chkbxUserAut.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="chkbxUserAut.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>156, 17</value>
|
||||
</data>
|
||||
<data name="chkbxUserAut.Text" xml:space="preserve">
|
||||
<value>Windows-Authentication</value>
|
||||
</data>
|
||||
<data name="Label5.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Label5.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>143, 13</value>
|
||||
</data>
|
||||
<data name="Label5.Text" xml:space="preserve">
|
||||
<value>Current ConnectionString:</value>
|
||||
</data>
|
||||
<data name="Label4.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Label4.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>58, 13</value>
|
||||
</data>
|
||||
<data name="Label4.Text" xml:space="preserve">
|
||||
<value>Database:</value>
|
||||
</data>
|
||||
<data name="Label1.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Label2.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Label2.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>61, 13</value>
|
||||
</data>
|
||||
<data name="Label2.Text" xml:space="preserve">
|
||||
<value>Username:</value>
|
||||
</data>
|
||||
<data name="Label3.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="GroupBox4.Text" xml:space="preserve">
|
||||
<value>current language:</value>
|
||||
<data name="Label3.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>59, 13</value>
|
||||
</data>
|
||||
<data name="Label3.Text" xml:space="preserve">
|
||||
<value>Password:</value>
|
||||
</data>
|
||||
<data name="BtnConnect.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="BtnConnect.Text" xml:space="preserve">
|
||||
<value>Establish Database Connection</value>
|
||||
</data>
|
||||
<data name="TabPage1.Text" xml:space="preserve">
|
||||
<value>Database Connection</value>
|
||||
</data>
|
||||
<data name="Button3.Text" xml:space="preserve">
|
||||
<value>Change language</value>
|
||||
</data>
|
||||
<data name="GroupBox3.Text" xml:space="preserve">
|
||||
<value>formulars open:</value>
|
||||
<data name="GroupBox4.Text" xml:space="preserve">
|
||||
<value>current language:</value>
|
||||
</data>
|
||||
<data name="Label7.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="Label7.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>179, 13</value>
|
||||
</data>
|
||||
@ -170,8 +200,8 @@
|
||||
<data name="CheckBox1.Text" xml:space="preserve">
|
||||
<value>run calendar as child</value>
|
||||
</data>
|
||||
<data name="GroupBox2.Text" xml:space="preserve">
|
||||
<value>Windream-Configuration:</value>
|
||||
<data name="GroupBox3.Text" xml:space="preserve">
|
||||
<value>formulars open:</value>
|
||||
</data>
|
||||
<data name="CheckBoxWD_ShowEnitityDocs.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
@ -200,8 +230,8 @@
|
||||
<data name="Label6.Text" xml:space="preserve">
|
||||
<value>max. result# windream-search:</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Text" xml:space="preserve">
|
||||
<value>menue configs</value>
|
||||
<data name="GroupBox2.Text" xml:space="preserve">
|
||||
<value>Windream-Configuration:</value>
|
||||
</data>
|
||||
<data name="chkboxQuickMenue.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
@ -212,9 +242,18 @@
|
||||
<data name="chkboxQuickMenue.Text" xml:space="preserve">
|
||||
<value>show quick menues</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Text" xml:space="preserve">
|
||||
<value>menue configs</value>
|
||||
</data>
|
||||
<data name="chkLogErrorsOnly.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Button1.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="btnApplicationFolder.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="LinkLabel1.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
@ -224,14 +263,26 @@
|
||||
<data name="LinkLabel1.Text" xml:space="preserve">
|
||||
<value>Link Support-Portal Digital Data</value>
|
||||
</data>
|
||||
<data name="BtnConnect.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
<data name="TabPage2.Text" xml:space="preserve">
|
||||
<value>Configurations</value>
|
||||
</data>
|
||||
<data name="Button1.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
<data name="Label9.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>397, 13</value>
|
||||
</data>
|
||||
<data name="btnApplicationFolder.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
<data name="Label9.Text" xml:space="preserve">
|
||||
<value>Set the filenames/filename parts that should be excluded from Folderwatch:</value>
|
||||
</data>
|
||||
<data name="btnSaveExclusionFiles.Text" xml:space="preserve">
|
||||
<value>Save</value>
|
||||
</data>
|
||||
<data name="Label8.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>285, 13</value>
|
||||
</data>
|
||||
<data name="Label8.Text" xml:space="preserve">
|
||||
<value>Set the directory that should be used for Scan2Folder:</value>
|
||||
</data>
|
||||
<data name="btnstartstop2.Text" xml:space="preserve">
|
||||
<value>Start Folderwatch</value>
|
||||
</data>
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
@ -612,9 +663,6 @@
|
||||
mf8BAK//A8C3/wPgtf8DwLb/AIC2/wAAtf8AALX/AAC2/8ABtP/AA7D/8A+u/w==
|
||||
</value>
|
||||
</data>
|
||||
<data name="$this.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="$this.Text" xml:space="preserve">
|
||||
<value>User Basic Configuration</value>
|
||||
</data>
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
333
app/DD-Record-Organiser/frmLevel_Designer.Designer.vb
generated
333
app/DD-Record-Organiser/frmLevel_Designer.Designer.vb
generated
@ -24,18 +24,69 @@ Partial Class frmLevel_Designer
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmLevel_Designer))
|
||||
Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
|
||||
Me.pnlDesigner = New SnapPanelControl.SnapPanel()
|
||||
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
|
||||
Me.tsstatus = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
|
||||
Me.lblFormName = New System.Windows.Forms.ToolStripLabel()
|
||||
Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
|
||||
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
|
||||
Me.tsstatus = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.TabControl1 = New System.Windows.Forms.TabControl()
|
||||
Me.pageProperties = New System.Windows.Forms.TabPage()
|
||||
Me.pgControlProperties = New System.Windows.Forms.PropertyGrid()
|
||||
Me.StatusStrip2 = New System.Windows.Forms.StatusStrip()
|
||||
Me.lblStatus = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.ToolStrip2 = New System.Windows.Forms.ToolStrip()
|
||||
Me.btnSaveControl = New System.Windows.Forms.ToolStripButton()
|
||||
Me.btnDeleteControl = New System.Windows.Forms.ToolStripButton()
|
||||
Me.pageControls = New System.Windows.Forms.TabPage()
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.btn_addformdata = New System.Windows.Forms.Button()
|
||||
Me.btn_addtocal = New System.Windows.Forms.Button()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.btnListBox = New System.Windows.Forms.Button()
|
||||
Me.btnListBoxCheckable = New System.Windows.Forms.Button()
|
||||
Me.btnRadioButton = New System.Windows.Forms.Button()
|
||||
Me.btngb = New System.Windows.Forms.Button()
|
||||
Me.btnpb = New System.Windows.Forms.Button()
|
||||
Me.btnTabelle = New System.Windows.Forms.Button()
|
||||
Me.btnCheckbox = New System.Windows.Forms.Button()
|
||||
Me.btndtp = New System.Windows.Forms.Button()
|
||||
Me.btncmb = New System.Windows.Forms.Button()
|
||||
Me.btntextbox = New System.Windows.Forms.Button()
|
||||
Me.btnlabel = New System.Windows.Forms.Button()
|
||||
Me.OFDWindreamsuche = New System.Windows.Forms.OpenFileDialog()
|
||||
Me.ttTooltip = New System.Windows.Forms.ToolTip(Me.components)
|
||||
Me.StatusStrip1.SuspendLayout()
|
||||
CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SplitContainer1.Panel1.SuspendLayout()
|
||||
Me.SplitContainer1.Panel2.SuspendLayout()
|
||||
Me.SplitContainer1.SuspendLayout()
|
||||
Me.ToolStrip1.SuspendLayout()
|
||||
Me.StatusStrip1.SuspendLayout()
|
||||
Me.TabControl1.SuspendLayout()
|
||||
Me.pageProperties.SuspendLayout()
|
||||
Me.StatusStrip2.SuspendLayout()
|
||||
Me.ToolStrip2.SuspendLayout()
|
||||
Me.pageControls.SuspendLayout()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'SplitContainer1
|
||||
'
|
||||
resources.ApplyResources(Me.SplitContainer1, "SplitContainer1")
|
||||
Me.SplitContainer1.Name = "SplitContainer1"
|
||||
'
|
||||
'SplitContainer1.Panel1
|
||||
'
|
||||
Me.SplitContainer1.Panel1.Controls.Add(Me.pnlDesigner)
|
||||
Me.SplitContainer1.Panel1.Controls.Add(Me.ToolStrip1)
|
||||
Me.SplitContainer1.Panel1.Controls.Add(Me.StatusStrip1)
|
||||
'
|
||||
'SplitContainer1.Panel2
|
||||
'
|
||||
Me.SplitContainer1.Panel2.Controls.Add(Me.TabControl1)
|
||||
'
|
||||
'pnlDesigner
|
||||
'
|
||||
Me.pnlDesigner.AllowDrop = True
|
||||
@ -46,18 +97,6 @@ Partial Class frmLevel_Designer
|
||||
Me.pnlDesigner.Name = "pnlDesigner"
|
||||
Me.pnlDesigner.ShowGrid = True
|
||||
'
|
||||
'StatusStrip1
|
||||
'
|
||||
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsstatus})
|
||||
resources.ApplyResources(Me.StatusStrip1, "StatusStrip1")
|
||||
Me.StatusStrip1.Name = "StatusStrip1"
|
||||
'
|
||||
'tsstatus
|
||||
'
|
||||
Me.tsstatus.Image = Global.DD_Record_Organiser.My.Resources.Resources.lightbulb
|
||||
Me.tsstatus.Name = "tsstatus"
|
||||
resources.ApplyResources(Me.tsstatus, "tsstatus")
|
||||
'
|
||||
'ToolStrip1
|
||||
'
|
||||
Me.ToolStrip1.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
|
||||
@ -77,6 +116,218 @@ Partial Class frmLevel_Designer
|
||||
resources.ApplyResources(Me.ToolStripButton1, "ToolStripButton1")
|
||||
Me.ToolStripButton1.Name = "ToolStripButton1"
|
||||
'
|
||||
'StatusStrip1
|
||||
'
|
||||
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsstatus})
|
||||
resources.ApplyResources(Me.StatusStrip1, "StatusStrip1")
|
||||
Me.StatusStrip1.Name = "StatusStrip1"
|
||||
'
|
||||
'tsstatus
|
||||
'
|
||||
Me.tsstatus.Image = Global.DD_Record_Organiser.My.Resources.Resources.lightbulb
|
||||
Me.tsstatus.Name = "tsstatus"
|
||||
resources.ApplyResources(Me.tsstatus, "tsstatus")
|
||||
'
|
||||
'TabControl1
|
||||
'
|
||||
Me.TabControl1.Controls.Add(Me.pageProperties)
|
||||
Me.TabControl1.Controls.Add(Me.pageControls)
|
||||
resources.ApplyResources(Me.TabControl1, "TabControl1")
|
||||
Me.TabControl1.Name = "TabControl1"
|
||||
Me.TabControl1.SelectedIndex = 0
|
||||
'
|
||||
'pageProperties
|
||||
'
|
||||
Me.pageProperties.Controls.Add(Me.pgControlProperties)
|
||||
Me.pageProperties.Controls.Add(Me.StatusStrip2)
|
||||
Me.pageProperties.Controls.Add(Me.ToolStrip2)
|
||||
resources.ApplyResources(Me.pageProperties, "pageProperties")
|
||||
Me.pageProperties.Name = "pageProperties"
|
||||
Me.pageProperties.UseVisualStyleBackColor = True
|
||||
'
|
||||
'pgControlProperties
|
||||
'
|
||||
resources.ApplyResources(Me.pgControlProperties, "pgControlProperties")
|
||||
Me.pgControlProperties.Name = "pgControlProperties"
|
||||
'
|
||||
'StatusStrip2
|
||||
'
|
||||
Me.StatusStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.lblStatus})
|
||||
resources.ApplyResources(Me.StatusStrip2, "StatusStrip2")
|
||||
Me.StatusStrip2.Name = "StatusStrip2"
|
||||
'
|
||||
'lblStatus
|
||||
'
|
||||
Me.lblStatus.Image = Global.DD_Record_Organiser.My.Resources.Resources.flag_green
|
||||
Me.lblStatus.Name = "lblStatus"
|
||||
resources.ApplyResources(Me.lblStatus, "lblStatus")
|
||||
'
|
||||
'ToolStrip2
|
||||
'
|
||||
Me.ToolStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.btnSaveControl, Me.btnDeleteControl})
|
||||
resources.ApplyResources(Me.ToolStrip2, "ToolStrip2")
|
||||
Me.ToolStrip2.Name = "ToolStrip2"
|
||||
'
|
||||
'btnSaveControl
|
||||
'
|
||||
Me.btnSaveControl.Image = Global.DD_Record_Organiser.My.Resources.Resources.save_16xLG
|
||||
resources.ApplyResources(Me.btnSaveControl, "btnSaveControl")
|
||||
Me.btnSaveControl.Name = "btnSaveControl"
|
||||
'
|
||||
'btnDeleteControl
|
||||
'
|
||||
Me.btnDeleteControl.Image = Global.DD_Record_Organiser.My.Resources.Resources.action_Cancel_16xLG
|
||||
resources.ApplyResources(Me.btnDeleteControl, "btnDeleteControl")
|
||||
Me.btnDeleteControl.Name = "btnDeleteControl"
|
||||
'
|
||||
'pageControls
|
||||
'
|
||||
Me.pageControls.Controls.Add(Me.GroupBox2)
|
||||
Me.pageControls.Controls.Add(Me.GroupBox1)
|
||||
resources.ApplyResources(Me.pageControls, "pageControls")
|
||||
Me.pageControls.Name = "pageControls"
|
||||
Me.pageControls.UseVisualStyleBackColor = True
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.btn_addformdata)
|
||||
Me.GroupBox2.Controls.Add(Me.btn_addtocal)
|
||||
resources.ApplyResources(Me.GroupBox2, "GroupBox2")
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.TabStop = False
|
||||
'
|
||||
'btn_addformdata
|
||||
'
|
||||
resources.ApplyResources(Me.btn_addformdata, "btn_addformdata")
|
||||
Me.btn_addformdata.Image = Global.DD_Record_Organiser.My.Resources.Resources.AddMark_10580
|
||||
Me.btn_addformdata.Name = "btn_addformdata"
|
||||
Me.btn_addformdata.TabStop = False
|
||||
Me.btn_addformdata.Tag = "f_addformdata"
|
||||
Me.btn_addformdata.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_addtocal
|
||||
'
|
||||
resources.ApplyResources(Me.btn_addtocal, "btn_addtocal")
|
||||
Me.btn_addtocal.Image = Global.DD_Record_Organiser.My.Resources.Resources.AddTable_5632
|
||||
Me.btn_addtocal.Name = "btn_addtocal"
|
||||
Me.btn_addtocal.TabStop = False
|
||||
Me.btn_addtocal.Tag = "f_addappointment"
|
||||
Me.btn_addtocal.UseVisualStyleBackColor = True
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.btnListBox)
|
||||
Me.GroupBox1.Controls.Add(Me.btnListBoxCheckable)
|
||||
Me.GroupBox1.Controls.Add(Me.btnRadioButton)
|
||||
Me.GroupBox1.Controls.Add(Me.btngb)
|
||||
Me.GroupBox1.Controls.Add(Me.btnpb)
|
||||
Me.GroupBox1.Controls.Add(Me.btnTabelle)
|
||||
Me.GroupBox1.Controls.Add(Me.btnCheckbox)
|
||||
Me.GroupBox1.Controls.Add(Me.btndtp)
|
||||
Me.GroupBox1.Controls.Add(Me.btncmb)
|
||||
Me.GroupBox1.Controls.Add(Me.btntextbox)
|
||||
Me.GroupBox1.Controls.Add(Me.btnlabel)
|
||||
resources.ApplyResources(Me.GroupBox1, "GroupBox1")
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.TabStop = False
|
||||
'
|
||||
'btnListBox
|
||||
'
|
||||
resources.ApplyResources(Me.btnListBox, "btnListBox")
|
||||
Me.btnListBox.Image = Global.DD_Record_Organiser.My.Resources.Resources.ListBox_686_24
|
||||
Me.btnListBox.Name = "btnListBox"
|
||||
Me.btnListBox.Tag = "lstbx"
|
||||
Me.btnListBox.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnListBoxCheckable
|
||||
'
|
||||
resources.ApplyResources(Me.btnListBoxCheckable, "btnListBoxCheckable")
|
||||
Me.btnListBoxCheckable.Image = Global.DD_Record_Organiser.My.Resources.Resources.ListBox_686_24
|
||||
Me.btnListBoxCheckable.Name = "btnListBoxCheckable"
|
||||
Me.btnListBoxCheckable.Tag = "lstbxcheck"
|
||||
Me.btnListBoxCheckable.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnRadioButton
|
||||
'
|
||||
resources.ApplyResources(Me.btnRadioButton, "btnRadioButton")
|
||||
Me.btnRadioButton.Image = Global.DD_Record_Organiser.My.Resources.Resources.RadioButton_701
|
||||
Me.btnRadioButton.Name = "btnRadioButton"
|
||||
Me.btnRadioButton.TabStop = False
|
||||
Me.btnRadioButton.Tag = "rb"
|
||||
Me.btnRadioButton.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btngb
|
||||
'
|
||||
resources.ApplyResources(Me.btngb, "btngb")
|
||||
Me.btngb.Image = Global.DD_Record_Organiser.My.Resources.Resources.GroupBox_680
|
||||
Me.btngb.Name = "btngb"
|
||||
Me.btngb.TabStop = False
|
||||
Me.btngb.Tag = "gb"
|
||||
Me.btngb.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnpb
|
||||
'
|
||||
resources.ApplyResources(Me.btnpb, "btnpb")
|
||||
Me.btnpb.Image = Global.DD_Record_Organiser.My.Resources.Resources.ImageListControl_683
|
||||
Me.btnpb.Name = "btnpb"
|
||||
Me.btnpb.TabStop = False
|
||||
Me.btnpb.Tag = "pb"
|
||||
Me.btnpb.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnTabelle
|
||||
'
|
||||
resources.ApplyResources(Me.btnTabelle, "btnTabelle")
|
||||
Me.btnTabelle.Image = Global.DD_Record_Organiser.My.Resources.Resources.Table_748
|
||||
Me.btnTabelle.Name = "btnTabelle"
|
||||
Me.btnTabelle.TabStop = False
|
||||
Me.btnTabelle.Tag = "dgv"
|
||||
Me.btnTabelle.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnCheckbox
|
||||
'
|
||||
resources.ApplyResources(Me.btnCheckbox, "btnCheckbox")
|
||||
Me.btnCheckbox.Image = Global.DD_Record_Organiser.My.Resources.Resources.CheckBox_669
|
||||
Me.btnCheckbox.Name = "btnCheckbox"
|
||||
Me.btnCheckbox.TabStop = False
|
||||
Me.btnCheckbox.Tag = "chk"
|
||||
Me.btnCheckbox.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btndtp
|
||||
'
|
||||
resources.ApplyResources(Me.btndtp, "btndtp")
|
||||
Me.btndtp.Image = Global.DD_Record_Organiser.My.Resources.Resources.DateOrTimePicker_675
|
||||
Me.btndtp.Name = "btndtp"
|
||||
Me.btndtp.TabStop = False
|
||||
Me.btndtp.Tag = "dtp"
|
||||
Me.btndtp.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btncmb
|
||||
'
|
||||
resources.ApplyResources(Me.btncmb, "btncmb")
|
||||
Me.btncmb.Image = Global.DD_Record_Organiser.My.Resources.Resources.ComboBox_672
|
||||
Me.btncmb.Name = "btncmb"
|
||||
Me.btncmb.TabStop = False
|
||||
Me.btncmb.Tag = "cmb"
|
||||
Me.btncmb.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btntextbox
|
||||
'
|
||||
resources.ApplyResources(Me.btntextbox, "btntextbox")
|
||||
Me.btntextbox.Image = Global.DD_Record_Organiser.My.Resources.Resources.TextBox_708
|
||||
Me.btntextbox.Name = "btntextbox"
|
||||
Me.btntextbox.TabStop = False
|
||||
Me.btntextbox.Tag = "txt"
|
||||
Me.btntextbox.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnlabel
|
||||
'
|
||||
resources.ApplyResources(Me.btnlabel, "btnlabel")
|
||||
Me.btnlabel.Image = Global.DD_Record_Organiser.My.Resources.Resources.Label_684
|
||||
Me.btnlabel.Name = "btnlabel"
|
||||
Me.btnlabel.TabStop = False
|
||||
Me.btnlabel.Tag = "lbl"
|
||||
Me.btnlabel.UseVisualStyleBackColor = True
|
||||
'
|
||||
'OFDWindreamsuche
|
||||
'
|
||||
resources.ApplyResources(Me.OFDWindreamsuche, "OFDWindreamsuche")
|
||||
@ -84,27 +335,63 @@ Partial Class frmLevel_Designer
|
||||
'
|
||||
'frmLevel_Designer
|
||||
'
|
||||
Me.AllowDrop = True
|
||||
resources.ApplyResources(Me, "$this")
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.Controls.Add(Me.pnlDesigner)
|
||||
Me.Controls.Add(Me.ToolStrip1)
|
||||
Me.Controls.Add(Me.StatusStrip1)
|
||||
Me.Controls.Add(Me.SplitContainer1)
|
||||
Me.Name = "frmLevel_Designer"
|
||||
Me.StatusStrip1.ResumeLayout(False)
|
||||
Me.StatusStrip1.PerformLayout()
|
||||
Me.SplitContainer1.Panel1.ResumeLayout(False)
|
||||
Me.SplitContainer1.Panel1.PerformLayout()
|
||||
Me.SplitContainer1.Panel2.ResumeLayout(False)
|
||||
CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.SplitContainer1.ResumeLayout(False)
|
||||
Me.ToolStrip1.ResumeLayout(False)
|
||||
Me.ToolStrip1.PerformLayout()
|
||||
Me.StatusStrip1.ResumeLayout(False)
|
||||
Me.StatusStrip1.PerformLayout()
|
||||
Me.TabControl1.ResumeLayout(False)
|
||||
Me.pageProperties.ResumeLayout(False)
|
||||
Me.pageProperties.PerformLayout()
|
||||
Me.StatusStrip2.ResumeLayout(False)
|
||||
Me.StatusStrip2.PerformLayout()
|
||||
Me.ToolStrip2.ResumeLayout(False)
|
||||
Me.ToolStrip2.PerformLayout()
|
||||
Me.pageControls.ResumeLayout(False)
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip
|
||||
Friend WithEvents pnlDesigner As SnapPanelControl.SnapPanel
|
||||
Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip
|
||||
Friend WithEvents lblFormName As System.Windows.Forms.ToolStripLabel
|
||||
Friend WithEvents ToolStripButton1 As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents OFDWindreamsuche As System.Windows.Forms.OpenFileDialog
|
||||
Friend WithEvents tsstatus As System.Windows.Forms.ToolStripStatusLabel
|
||||
Friend WithEvents ttTooltip As System.Windows.Forms.ToolTip
|
||||
Friend WithEvents SplitContainer1 As System.Windows.Forms.SplitContainer
|
||||
Friend WithEvents TabControl1 As System.Windows.Forms.TabControl
|
||||
Friend WithEvents pageControls As System.Windows.Forms.TabPage
|
||||
Friend WithEvents pageProperties As System.Windows.Forms.TabPage
|
||||
Friend WithEvents StatusStrip2 As System.Windows.Forms.StatusStrip
|
||||
Friend WithEvents ToolStrip2 As System.Windows.Forms.ToolStrip
|
||||
Friend WithEvents btnSaveControl As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents btnDeleteControl As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents lblStatus As System.Windows.Forms.ToolStripStatusLabel
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents btnListBox As System.Windows.Forms.Button
|
||||
Friend WithEvents btnListBoxCheckable As System.Windows.Forms.Button
|
||||
Friend WithEvents btnRadioButton As System.Windows.Forms.Button
|
||||
Friend WithEvents btngb As System.Windows.Forms.Button
|
||||
Friend WithEvents btnpb As System.Windows.Forms.Button
|
||||
Friend WithEvents btnTabelle As System.Windows.Forms.Button
|
||||
Friend WithEvents btnCheckbox As System.Windows.Forms.Button
|
||||
Friend WithEvents btndtp As System.Windows.Forms.Button
|
||||
Friend WithEvents btncmb As System.Windows.Forms.Button
|
||||
Friend WithEvents btntextbox As System.Windows.Forms.Button
|
||||
Friend WithEvents btnlabel As System.Windows.Forms.Button
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents btn_addformdata As System.Windows.Forms.Button
|
||||
Friend WithEvents btn_addtocal As System.Windows.Forms.Button
|
||||
Friend WithEvents pgControlProperties As System.Windows.Forms.PropertyGrid
|
||||
Friend WithEvents pnlDesigner As SnapPanelControl.SnapPanel
|
||||
End Class
|
||||
|
||||
@ -118,65 +118,31 @@
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="grpbxDocumentView.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1092, 201</value>
|
||||
</data>
|
||||
<data name="grpbxDocumentView.Text" xml:space="preserve">
|
||||
<value>Document View - Configuration</value>
|
||||
</data>
|
||||
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
<data name="Label6.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Label5.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Label4.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Label3.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Label2.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="btnWindreamsuche.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Label1.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="Label1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>98, 13</value>
|
||||
</data>
|
||||
<data name="Label1.Text" xml:space="preserve">
|
||||
<value>windream-search:</value>
|
||||
</data>
|
||||
<data name="chkbxdocview.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="chkbxdocview.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>949, 10</value>
|
||||
</data>
|
||||
<data name="chkbxdocview.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>140, 17</value>
|
||||
</data>
|
||||
<data name="chkbxdocview.Text" xml:space="preserve">
|
||||
<value>windream view active?</value>
|
||||
</data>
|
||||
<data name="ToolStripButton1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>118, 22</value>
|
||||
</data>
|
||||
<data name="ToolStripButton1.Text" xml:space="preserve">
|
||||
<value>Create views new</value>
|
||||
</data>
|
||||
<data name="btnsavedocView.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
<data name="btnSaveControl.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>51, 22</value>
|
||||
</data>
|
||||
<data name="btnsavedocView.Text" xml:space="preserve">
|
||||
<data name="btnSaveControl.Text" xml:space="preserve">
|
||||
<value>Save</value>
|
||||
</data>
|
||||
<data name="$this.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
<data name="btnDeleteControl.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>60, 22</value>
|
||||
</data>
|
||||
<data name="btnDeleteControl.Text" xml:space="preserve">
|
||||
<value>Delete</value>
|
||||
</data>
|
||||
<data name="pageProperties.Text" xml:space="preserve">
|
||||
<value>Properties</value>
|
||||
</data>
|
||||
<data name="GroupBox2.Text" xml:space="preserve">
|
||||
<value>Functions</value>
|
||||
</data>
|
||||
<data name="btnTabelle.Text" xml:space="preserve">
|
||||
<value>Table</value>
|
||||
</data>
|
||||
</root>
|
||||
@ -118,68 +118,38 @@
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
<data name="pnlDesigner.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
|
||||
<data name="SplitContainer1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
|
||||
<value>Fill</value>
|
||||
</data>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="SplitContainer1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 0</value>
|
||||
</data>
|
||||
<data name="pnlDesigner.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
|
||||
<value>Fill</value>
|
||||
</data>
|
||||
<data name="pnlDesigner.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 25</value>
|
||||
</data>
|
||||
<data name="pnlDesigner.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1092, 544</value>
|
||||
<value>788, 544</value>
|
||||
</data>
|
||||
<assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
<data name="pnlDesigner.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>2</value>
|
||||
<value>4</value>
|
||||
</data>
|
||||
<data name=">>pnlDesigner.Name" xml:space="preserve">
|
||||
<value>pnlDesigner</value>
|
||||
</data>
|
||||
<data name=">>pnlDesigner.Type" xml:space="preserve">
|
||||
<value>SnapPanelControl.SnapPanel, SnapPanelControl, Version=1.0.5491.24234, Culture=neutral, PublicKeyToken=null</value>
|
||||
<value>SnapPanelControl.SnapPanel, SnapPanelControl, Version=1.0.5910.28047, Culture=neutral, PublicKeyToken=null</value>
|
||||
</data>
|
||||
<data name=">>pnlDesigner.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
<value>SplitContainer1.Panel1</value>
|
||||
</data>
|
||||
<data name=">>pnlDesigner.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<data name="tsstatus.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>137, 17</value>
|
||||
</data>
|
||||
<data name="tsstatus.Text" xml:space="preserve">
|
||||
<value>ToolStripStatusLabel1</value>
|
||||
</data>
|
||||
<data name="tsstatus.Visible" type="System.Boolean, mscorlib">
|
||||
<value>False</value>
|
||||
</data>
|
||||
<data name="StatusStrip1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 569</value>
|
||||
</data>
|
||||
<data name="StatusStrip1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1092, 22</value>
|
||||
</data>
|
||||
<data name="StatusStrip1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="StatusStrip1.Text" xml:space="preserve">
|
||||
<value>StatusStrip1</value>
|
||||
</data>
|
||||
<data name=">>StatusStrip1.Name" xml:space="preserve">
|
||||
<value>StatusStrip1</value>
|
||||
</data>
|
||||
<data name=">>StatusStrip1.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.StatusStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>StatusStrip1.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>StatusStrip1.ZOrder" xml:space="preserve">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>134, 17</value>
|
||||
</metadata>
|
||||
@ -202,7 +172,7 @@
|
||||
<value>0, 0</value>
|
||||
</data>
|
||||
<data name="ToolStrip1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1092, 25</value>
|
||||
<value>788, 25</value>
|
||||
</data>
|
||||
<data name="ToolStrip1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>3</value>
|
||||
@ -217,11 +187,797 @@
|
||||
<value>System.Windows.Forms.ToolStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>ToolStrip1.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
<value>SplitContainer1.Panel1</value>
|
||||
</data>
|
||||
<data name=">>ToolStrip1.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<data name="tsstatus.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>137, 17</value>
|
||||
</data>
|
||||
<data name="tsstatus.Text" xml:space="preserve">
|
||||
<value>ToolStripStatusLabel1</value>
|
||||
</data>
|
||||
<data name="tsstatus.Visible" type="System.Boolean, mscorlib">
|
||||
<value>False</value>
|
||||
</data>
|
||||
<data name="StatusStrip1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 569</value>
|
||||
</data>
|
||||
<data name="StatusStrip1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>788, 22</value>
|
||||
</data>
|
||||
<data name="StatusStrip1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="StatusStrip1.Text" xml:space="preserve">
|
||||
<value>StatusStrip1</value>
|
||||
</data>
|
||||
<data name=">>StatusStrip1.Name" xml:space="preserve">
|
||||
<value>StatusStrip1</value>
|
||||
</data>
|
||||
<data name=">>StatusStrip1.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.StatusStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>StatusStrip1.Parent" xml:space="preserve">
|
||||
<value>SplitContainer1.Panel1</value>
|
||||
</data>
|
||||
<data name=">>StatusStrip1.ZOrder" xml:space="preserve">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name=">>SplitContainer1.Panel1.Name" xml:space="preserve">
|
||||
<value>SplitContainer1.Panel1</value>
|
||||
</data>
|
||||
<data name=">>SplitContainer1.Panel1.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.SplitterPanel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>SplitContainer1.Panel1.Parent" xml:space="preserve">
|
||||
<value>SplitContainer1</value>
|
||||
</data>
|
||||
<data name=">>SplitContainer1.Panel1.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="pgControlProperties.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
|
||||
<value>Fill</value>
|
||||
</data>
|
||||
<data name="pgControlProperties.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>3, 28</value>
|
||||
</data>
|
||||
<data name="pgControlProperties.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>286, 512</value>
|
||||
</data>
|
||||
<data name="pgControlProperties.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>3</value>
|
||||
</data>
|
||||
<data name=">>pgControlProperties.Name" xml:space="preserve">
|
||||
<value>pgControlProperties</value>
|
||||
</data>
|
||||
<data name=">>pgControlProperties.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.PropertyGrid, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>pgControlProperties.Parent" xml:space="preserve">
|
||||
<value>pageProperties</value>
|
||||
</data>
|
||||
<data name=">>pgControlProperties.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<metadata name="StatusStrip2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>609, 17</value>
|
||||
</metadata>
|
||||
<data name="lblStatus.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>137, 17</value>
|
||||
</data>
|
||||
<data name="lblStatus.Text" xml:space="preserve">
|
||||
<value>ToolStripStatusLabel1</value>
|
||||
</data>
|
||||
<data name="StatusStrip2.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>3, 540</value>
|
||||
</data>
|
||||
<data name="StatusStrip2.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>286, 22</value>
|
||||
</data>
|
||||
<data name="StatusStrip2.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name="StatusStrip2.Text" xml:space="preserve">
|
||||
<value>StatusStrip2</value>
|
||||
</data>
|
||||
<data name=">>StatusStrip2.Name" xml:space="preserve">
|
||||
<value>StatusStrip2</value>
|
||||
</data>
|
||||
<data name=">>StatusStrip2.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.StatusStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>StatusStrip2.Parent" xml:space="preserve">
|
||||
<value>pageProperties</value>
|
||||
</data>
|
||||
<data name=">>StatusStrip2.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<metadata name="ToolStrip2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>502, 17</value>
|
||||
</metadata>
|
||||
<data name="btnSaveControl.ImageTransparentColor" type="System.Drawing.Color, System.Drawing">
|
||||
<value>Magenta</value>
|
||||
</data>
|
||||
<data name="btnSaveControl.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>79, 22</value>
|
||||
</data>
|
||||
<data name="btnSaveControl.Text" xml:space="preserve">
|
||||
<value>Speichern</value>
|
||||
</data>
|
||||
<data name="btnDeleteControl.ImageTransparentColor" type="System.Drawing.Color, System.Drawing">
|
||||
<value>Magenta</value>
|
||||
</data>
|
||||
<data name="btnDeleteControl.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>71, 22</value>
|
||||
</data>
|
||||
<data name="btnDeleteControl.Text" xml:space="preserve">
|
||||
<value>Löschen</value>
|
||||
</data>
|
||||
<data name="ToolStrip2.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>3, 3</value>
|
||||
</data>
|
||||
<data name="ToolStrip2.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>286, 25</value>
|
||||
</data>
|
||||
<data name="ToolStrip2.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="ToolStrip2.Text" xml:space="preserve">
|
||||
<value>ToolStrip2</value>
|
||||
</data>
|
||||
<data name=">>ToolStrip2.Name" xml:space="preserve">
|
||||
<value>ToolStrip2</value>
|
||||
</data>
|
||||
<data name=">>ToolStrip2.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>ToolStrip2.Parent" xml:space="preserve">
|
||||
<value>pageProperties</value>
|
||||
</data>
|
||||
<data name=">>ToolStrip2.ZOrder" xml:space="preserve">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name="pageProperties.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>4, 22</value>
|
||||
</data>
|
||||
<data name="pageProperties.Padding" type="System.Windows.Forms.Padding, System.Windows.Forms">
|
||||
<value>3, 3, 3, 3</value>
|
||||
</data>
|
||||
<data name="pageProperties.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>292, 565</value>
|
||||
</data>
|
||||
<data name="pageProperties.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="pageProperties.Text" xml:space="preserve">
|
||||
<value>Eigenschaften</value>
|
||||
</data>
|
||||
<data name=">>pageProperties.Name" xml:space="preserve">
|
||||
<value>pageProperties</value>
|
||||
</data>
|
||||
<data name=">>pageProperties.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>pageProperties.Parent" xml:space="preserve">
|
||||
<value>TabControl1</value>
|
||||
</data>
|
||||
<data name=">>pageProperties.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="btn_addformdata.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 8.25pt, style=Bold</value>
|
||||
</data>
|
||||
<data name="btn_addformdata.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name="btn_addformdata.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="btn_addformdata.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>140, 24</value>
|
||||
</data>
|
||||
<data name="btn_addformdata.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>128, 31</value>
|
||||
</data>
|
||||
<data name="btn_addformdata.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="btn_addformdata.Text" xml:space="preserve">
|
||||
<value>Add Form Data</value>
|
||||
</data>
|
||||
<data name="btn_addformdata.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleRight</value>
|
||||
</data>
|
||||
<data name=">>btn_addformdata.Name" xml:space="preserve">
|
||||
<value>btn_addformdata</value>
|
||||
</data>
|
||||
<data name=">>btn_addformdata.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>btn_addformdata.Parent" xml:space="preserve">
|
||||
<value>GroupBox2</value>
|
||||
</data>
|
||||
<data name=">>btn_addformdata.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="btn_addtocal.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 8.25pt, style=Bold</value>
|
||||
</data>
|
||||
<data name="btn_addtocal.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name="btn_addtocal.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="btn_addtocal.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>12, 24</value>
|
||||
</data>
|
||||
<data name="btn_addtocal.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>122, 31</value>
|
||||
</data>
|
||||
<data name="btn_addtocal.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="btn_addtocal.Text" xml:space="preserve">
|
||||
<value>Add to Calendar</value>
|
||||
</data>
|
||||
<data name="btn_addtocal.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleRight</value>
|
||||
</data>
|
||||
<data name=">>btn_addtocal.Name" xml:space="preserve">
|
||||
<value>btn_addtocal</value>
|
||||
</data>
|
||||
<data name=">>btn_addtocal.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>btn_addtocal.Parent" xml:space="preserve">
|
||||
<value>GroupBox2</value>
|
||||
</data>
|
||||
<data name=">>btn_addtocal.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="GroupBox2.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 9.75pt, style=Bold</value>
|
||||
</data>
|
||||
<data name="GroupBox2.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>6, 249</value>
|
||||
</data>
|
||||
<data name="GroupBox2.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>274, 71</value>
|
||||
</data>
|
||||
<data name="GroupBox2.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>5</value>
|
||||
</data>
|
||||
<data name="GroupBox2.Text" xml:space="preserve">
|
||||
<value>Funktionen</value>
|
||||
</data>
|
||||
<data name=">>GroupBox2.Name" xml:space="preserve">
|
||||
<value>GroupBox2</value>
|
||||
</data>
|
||||
<data name=">>GroupBox2.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>GroupBox2.Parent" xml:space="preserve">
|
||||
<value>pageControls</value>
|
||||
</data>
|
||||
<data name=">>GroupBox2.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="btnListBox.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 8.25pt, style=Bold</value>
|
||||
</data>
|
||||
<data name="btnListBox.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name="btnListBox.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="btnListBox.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>12, 200</value>
|
||||
</data>
|
||||
<data name="btnListBox.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>122, 31</value>
|
||||
</data>
|
||||
<data name="btnListBox.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>10</value>
|
||||
</data>
|
||||
<data name="btnListBox.Text" xml:space="preserve">
|
||||
<value>ListBox</value>
|
||||
</data>
|
||||
<data name="btnListBox.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleRight</value>
|
||||
</data>
|
||||
<data name=">>btnListBox.Name" xml:space="preserve">
|
||||
<value>btnListBox</value>
|
||||
</data>
|
||||
<data name=">>btnListBox.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>btnListBox.Parent" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name=">>btnListBox.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="btnListBoxCheckable.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 8.25pt, style=Bold</value>
|
||||
</data>
|
||||
<data name="btnListBoxCheckable.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name="btnListBoxCheckable.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="btnListBoxCheckable.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>12, 164</value>
|
||||
</data>
|
||||
<data name="btnListBoxCheckable.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>122, 31</value>
|
||||
</data>
|
||||
<data name="btnListBoxCheckable.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>9</value>
|
||||
</data>
|
||||
<data name="btnListBoxCheckable.Text" xml:space="preserve">
|
||||
<value>ListBox Checkable</value>
|
||||
</data>
|
||||
<data name="btnListBoxCheckable.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleRight</value>
|
||||
</data>
|
||||
<data name=">>btnListBoxCheckable.Name" xml:space="preserve">
|
||||
<value>btnListBoxCheckable</value>
|
||||
</data>
|
||||
<data name=">>btnListBoxCheckable.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>btnListBoxCheckable.Parent" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name=">>btnListBoxCheckable.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="btnRadioButton.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 8.25pt, style=Bold</value>
|
||||
</data>
|
||||
<data name="btnRadioButton.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name="btnRadioButton.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="btnRadioButton.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>140, 92</value>
|
||||
</data>
|
||||
<data name="btnRadioButton.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>128, 31</value>
|
||||
</data>
|
||||
<data name="btnRadioButton.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>5</value>
|
||||
</data>
|
||||
<data name="btnRadioButton.Text" xml:space="preserve">
|
||||
<value>RadioButton</value>
|
||||
</data>
|
||||
<data name="btnRadioButton.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleRight</value>
|
||||
</data>
|
||||
<data name=">>btnRadioButton.Name" xml:space="preserve">
|
||||
<value>btnRadioButton</value>
|
||||
</data>
|
||||
<data name=">>btnRadioButton.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>btnRadioButton.Parent" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name=">>btnRadioButton.ZOrder" xml:space="preserve">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name="btngb.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 8.25pt, style=Bold</value>
|
||||
</data>
|
||||
<data name="btngb.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name="btngb.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="btngb.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>140, 164</value>
|
||||
</data>
|
||||
<data name="btngb.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>128, 31</value>
|
||||
</data>
|
||||
<data name="btngb.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>8</value>
|
||||
</data>
|
||||
<data name="btngb.Text" xml:space="preserve">
|
||||
<value>GroupBox</value>
|
||||
</data>
|
||||
<data name="btngb.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleRight</value>
|
||||
</data>
|
||||
<data name=">>btngb.Name" xml:space="preserve">
|
||||
<value>btngb</value>
|
||||
</data>
|
||||
<data name=">>btngb.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>btngb.Parent" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name=">>btngb.ZOrder" xml:space="preserve">
|
||||
<value>3</value>
|
||||
</data>
|
||||
<data name="btnpb.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 8.25pt, style=Bold</value>
|
||||
</data>
|
||||
<data name="btnpb.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name="btnpb.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="btnpb.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>12, 127</value>
|
||||
</data>
|
||||
<data name="btnpb.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>122, 31</value>
|
||||
</data>
|
||||
<data name="btnpb.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>6</value>
|
||||
</data>
|
||||
<data name="btnpb.Text" xml:space="preserve">
|
||||
<value>PictureBox</value>
|
||||
</data>
|
||||
<data name="btnpb.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleRight</value>
|
||||
</data>
|
||||
<data name=">>btnpb.Name" xml:space="preserve">
|
||||
<value>btnpb</value>
|
||||
</data>
|
||||
<data name=">>btnpb.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>btnpb.Parent" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name=">>btnpb.ZOrder" xml:space="preserve">
|
||||
<value>4</value>
|
||||
</data>
|
||||
<data name="btnTabelle.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 8.25pt, style=Bold</value>
|
||||
</data>
|
||||
<data name="btnTabelle.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name="btnTabelle.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="btnTabelle.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>140, 127</value>
|
||||
</data>
|
||||
<data name="btnTabelle.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>128, 31</value>
|
||||
</data>
|
||||
<data name="btnTabelle.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>7</value>
|
||||
</data>
|
||||
<data name="btnTabelle.Text" xml:space="preserve">
|
||||
<value>Tabelle</value>
|
||||
</data>
|
||||
<data name="btnTabelle.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleRight</value>
|
||||
</data>
|
||||
<data name=">>btnTabelle.Name" xml:space="preserve">
|
||||
<value>btnTabelle</value>
|
||||
</data>
|
||||
<data name=">>btnTabelle.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>btnTabelle.Parent" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name=">>btnTabelle.ZOrder" xml:space="preserve">
|
||||
<value>5</value>
|
||||
</data>
|
||||
<data name="btnCheckbox.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 8.25pt, style=Bold</value>
|
||||
</data>
|
||||
<data name="btnCheckbox.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name="btnCheckbox.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="btnCheckbox.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>140, 55</value>
|
||||
</data>
|
||||
<data name="btnCheckbox.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>128, 31</value>
|
||||
</data>
|
||||
<data name="btnCheckbox.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>3</value>
|
||||
</data>
|
||||
<data name="btnCheckbox.Text" xml:space="preserve">
|
||||
<value>CheckBox</value>
|
||||
</data>
|
||||
<data name="btnCheckbox.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleRight</value>
|
||||
</data>
|
||||
<data name=">>btnCheckbox.Name" xml:space="preserve">
|
||||
<value>btnCheckbox</value>
|
||||
</data>
|
||||
<data name=">>btnCheckbox.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>btnCheckbox.Parent" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name=">>btnCheckbox.ZOrder" xml:space="preserve">
|
||||
<value>6</value>
|
||||
</data>
|
||||
<data name="btndtp.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 8.25pt, style=Bold</value>
|
||||
</data>
|
||||
<data name="btndtp.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name="btndtp.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="btndtp.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>140, 22</value>
|
||||
</data>
|
||||
<data name="btndtp.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>128, 27</value>
|
||||
</data>
|
||||
<data name="btndtp.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="btndtp.Text" xml:space="preserve">
|
||||
<value>DatePicker</value>
|
||||
</data>
|
||||
<data name="btndtp.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleRight</value>
|
||||
</data>
|
||||
<data name=">>btndtp.Name" xml:space="preserve">
|
||||
<value>btndtp</value>
|
||||
</data>
|
||||
<data name=">>btndtp.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>btndtp.Parent" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name=">>btndtp.ZOrder" xml:space="preserve">
|
||||
<value>7</value>
|
||||
</data>
|
||||
<data name="btncmb.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 8.25pt, style=Bold</value>
|
||||
</data>
|
||||
<data name="btncmb.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name="btncmb.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="btncmb.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>12, 90</value>
|
||||
</data>
|
||||
<data name="btncmb.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>122, 31</value>
|
||||
</data>
|
||||
<data name="btncmb.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>4</value>
|
||||
</data>
|
||||
<data name="btncmb.Text" xml:space="preserve">
|
||||
<value>ComboBox</value>
|
||||
</data>
|
||||
<data name="btncmb.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleRight</value>
|
||||
</data>
|
||||
<data name=">>btncmb.Name" xml:space="preserve">
|
||||
<value>btncmb</value>
|
||||
</data>
|
||||
<data name=">>btncmb.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>btncmb.Parent" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name=">>btncmb.ZOrder" xml:space="preserve">
|
||||
<value>8</value>
|
||||
</data>
|
||||
<data name="btntextbox.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 8.25pt, style=Bold</value>
|
||||
</data>
|
||||
<data name="btntextbox.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name="btntextbox.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="btntextbox.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>13, 55</value>
|
||||
</data>
|
||||
<data name="btntextbox.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>121, 29</value>
|
||||
</data>
|
||||
<data name="btntextbox.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name="btntextbox.Text" xml:space="preserve">
|
||||
<value>TextBox</value>
|
||||
</data>
|
||||
<data name="btntextbox.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleRight</value>
|
||||
</data>
|
||||
<data name=">>btntextbox.Name" xml:space="preserve">
|
||||
<value>btntextbox</value>
|
||||
</data>
|
||||
<data name=">>btntextbox.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>btntextbox.Parent" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name=">>btntextbox.ZOrder" xml:space="preserve">
|
||||
<value>9</value>
|
||||
</data>
|
||||
<data name="btnlabel.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 8.25pt, style=Bold</value>
|
||||
</data>
|
||||
<data name="btnlabel.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name="btnlabel.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
|
||||
<value>NoControl</value>
|
||||
</data>
|
||||
<data name="btnlabel.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>12, 22</value>
|
||||
</data>
|
||||
<data name="btnlabel.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>122, 27</value>
|
||||
</data>
|
||||
<data name="btnlabel.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="btnlabel.Text" xml:space="preserve">
|
||||
<value>Label</value>
|
||||
</data>
|
||||
<data name="btnlabel.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
|
||||
<value>MiddleRight</value>
|
||||
</data>
|
||||
<data name=">>btnlabel.Name" xml:space="preserve">
|
||||
<value>btnlabel</value>
|
||||
</data>
|
||||
<data name=">>btnlabel.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>btnlabel.Parent" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name=">>btnlabel.ZOrder" xml:space="preserve">
|
||||
<value>10</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Segoe UI, 9.75pt, style=Bold</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>6, 6</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>274, 237</value>
|
||||
</data>
|
||||
<data name="GroupBox1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>4</value>
|
||||
</data>
|
||||
<data name="GroupBox1.Text" xml:space="preserve">
|
||||
<value>Control-Types (Drag and Drop)</value>
|
||||
</data>
|
||||
<data name=">>GroupBox1.Name" xml:space="preserve">
|
||||
<value>GroupBox1</value>
|
||||
</data>
|
||||
<data name=">>GroupBox1.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>GroupBox1.Parent" xml:space="preserve">
|
||||
<value>pageControls</value>
|
||||
</data>
|
||||
<data name=">>GroupBox1.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="pageControls.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>4, 22</value>
|
||||
</data>
|
||||
<data name="pageControls.Padding" type="System.Windows.Forms.Padding, System.Windows.Forms">
|
||||
<value>3, 3, 3, 3</value>
|
||||
</data>
|
||||
<data name="pageControls.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>292, 565</value>
|
||||
</data>
|
||||
<data name="pageControls.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="pageControls.Text" xml:space="preserve">
|
||||
<value>Controls</value>
|
||||
</data>
|
||||
<data name=">>pageControls.Name" xml:space="preserve">
|
||||
<value>pageControls</value>
|
||||
</data>
|
||||
<data name=">>pageControls.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>pageControls.Parent" xml:space="preserve">
|
||||
<value>TabControl1</value>
|
||||
</data>
|
||||
<data name=">>pageControls.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="TabControl1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
|
||||
<value>Fill</value>
|
||||
</data>
|
||||
<data name="TabControl1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 0</value>
|
||||
</data>
|
||||
<data name="TabControl1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>300, 591</value>
|
||||
</data>
|
||||
<data name="TabControl1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name=">>TabControl1.Name" xml:space="preserve">
|
||||
<value>TabControl1</value>
|
||||
</data>
|
||||
<data name=">>TabControl1.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>TabControl1.Parent" xml:space="preserve">
|
||||
<value>SplitContainer1.Panel2</value>
|
||||
</data>
|
||||
<data name=">>TabControl1.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name=">>SplitContainer1.Panel2.Name" xml:space="preserve">
|
||||
<value>SplitContainer1.Panel2</value>
|
||||
</data>
|
||||
<data name=">>SplitContainer1.Panel2.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.SplitterPanel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>SplitContainer1.Panel2.Parent" xml:space="preserve">
|
||||
<value>SplitContainer1</value>
|
||||
</data>
|
||||
<data name=">>SplitContainer1.Panel2.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="SplitContainer1.Panel2MinSize" type="System.Int32, mscorlib">
|
||||
<value>300</value>
|
||||
</data>
|
||||
<data name="SplitContainer1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1092, 591</value>
|
||||
</data>
|
||||
<data name="SplitContainer1.SplitterDistance" type="System.Int32, mscorlib">
|
||||
<value>788</value>
|
||||
</data>
|
||||
<data name="SplitContainer1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>4</value>
|
||||
</data>
|
||||
<data name=">>SplitContainer1.Name" xml:space="preserve">
|
||||
<value>SplitContainer1</value>
|
||||
</data>
|
||||
<data name=">>SplitContainer1.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.SplitContainer, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>SplitContainer1.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>SplitContainer1.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<metadata name="OFDWindreamsuche.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>241, 17</value>
|
||||
</metadata>
|
||||
@ -249,12 +1005,6 @@
|
||||
<data name="$this.Text" xml:space="preserve">
|
||||
<value>frmLevel_Designer</value>
|
||||
</data>
|
||||
<data name=">>tsstatus.Name" xml:space="preserve">
|
||||
<value>tsstatus</value>
|
||||
</data>
|
||||
<data name=">>tsstatus.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>lblFormName.Name" xml:space="preserve">
|
||||
<value>lblFormName</value>
|
||||
</data>
|
||||
@ -267,6 +1017,30 @@
|
||||
<data name=">>ToolStripButton1.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>tsstatus.Name" xml:space="preserve">
|
||||
<value>tsstatus</value>
|
||||
</data>
|
||||
<data name=">>tsstatus.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>lblStatus.Name" xml:space="preserve">
|
||||
<value>lblStatus</value>
|
||||
</data>
|
||||
<data name=">>lblStatus.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>btnSaveControl.Name" xml:space="preserve">
|
||||
<value>btnSaveControl</value>
|
||||
</data>
|
||||
<data name=">>btnSaveControl.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>btnDeleteControl.Name" xml:space="preserve">
|
||||
<value>btnDeleteControl</value>
|
||||
</data>
|
||||
<data name=">>btnDeleteControl.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>OFDWindreamsuche.Name" xml:space="preserve">
|
||||
<value>OFDWindreamsuche</value>
|
||||
</data>
|
||||
|
||||
@ -2,13 +2,11 @@
|
||||
#Region "+++++ Konstanten +++++"
|
||||
'Private akt_ctrl As Control
|
||||
Private Shared _Instance As frmLevel_Designer = Nothing
|
||||
Private m_Moving As Boolean = False
|
||||
Private Mouse_Moving As Boolean = False
|
||||
Private Mouse_Down As Boolean = False
|
||||
Private Current_Properties As Object = Nothing
|
||||
|
||||
Private LastCursor As Point = Nothing
|
||||
|
||||
'Private begin_location As System.Drawing.Point
|
||||
'Private end_location As System.Drawing.Point
|
||||
|
||||
'Public Shared CtrlBuilder As ClassControlBuilder
|
||||
#End Region
|
||||
Dim formloaded As Boolean = False
|
||||
Public Shared Function Instance() As frmLevel_Designer
|
||||
@ -26,77 +24,6 @@
|
||||
Public Sub SetFormName(name As String)
|
||||
Me.lblFormName.Text = "Name: " & name & " - Form-ID: " & CURRENT_FORM_ID
|
||||
End Sub
|
||||
'Public Sub Check_Document_Config(FORM_ID As Integer)
|
||||
' Try
|
||||
' Dim res = ClassDatabase.Execute_Scalar("SELECT DOCUMENT_VIEW FROM TBPMO_FORM_VIEW WHERE FORM_ID = " & CURRENT_FORM_ID & " and SCREEN_ID = " & CURRENT_SCREEN_ID)
|
||||
|
||||
' If res = True Then
|
||||
' chkbxdocview.Checked = True
|
||||
' Dim DT As DataTable = ClassDatabase.Return_Datatable("SELECT WINDREAM_SEARCH,SEARCH_PATTERN1,SEARCH_PATTERN2,SEARCH_PATTERN3,SEARCH_PATTERN4,SEARCH_PATTERN5 FROM TBPMO_FORM_VIEW WHERE FORM_ID = " & CURRENT_FORM_ID & " and SCREEN_ID = " & CURRENT_SCREEN_ID)
|
||||
' If DT.Rows.Count = 1 Then
|
||||
' If Not IsDBNull(DT.Rows(0).Item(0)) Then
|
||||
' txtWindreamsuche.Text = ClassHelper.CheckDBNull(DT.Rows(0).Item(0), "String")
|
||||
' 'Form-ID (Entity)
|
||||
' 'Record -ID
|
||||
' Dim result
|
||||
' result = ClassHelper.CheckDBNull(DT.Rows(0).Item(1), "String")
|
||||
' If result <> "" Then
|
||||
' If result.ToString.ToUpper.Contains("RECORD") Then
|
||||
' cmbSearchPattern1.SelectedIndex = 1
|
||||
' Else
|
||||
' cmbSearchPattern1.SelectedIndex = 0
|
||||
' End If
|
||||
' End If
|
||||
' result = ClassHelper.CheckDBNull(DT.Rows(0).Item(2), "String")
|
||||
' If result <> "" Then
|
||||
' If result.ToString.ToUpper.Contains("RECORD") Then
|
||||
' cmbSearchPattern2.SelectedIndex = 1
|
||||
' Else
|
||||
' cmbSearchPattern2.SelectedIndex = 0
|
||||
' End If
|
||||
' End If
|
||||
' result = ClassHelper.CheckDBNull(DT.Rows(0).Item(3), "String")
|
||||
' If result <> "" Then
|
||||
' If result.ToString.ToUpper.Contains("RECORD") Then
|
||||
' cmbSearchPattern3.SelectedIndex = 1
|
||||
' Else
|
||||
' cmbSearchPattern3.SelectedIndex = 0
|
||||
' End If
|
||||
' End If
|
||||
' result = ClassHelper.CheckDBNull(DT.Rows(0).Item(4), "String")
|
||||
' If result <> "" Then
|
||||
' If result.ToString.ToUpper.Contains("RECORD") Then
|
||||
' cmbSearchPattern4.SelectedIndex = 1
|
||||
' Else
|
||||
' cmbSearchPattern4.SelectedIndex = 0
|
||||
' End If
|
||||
' End If
|
||||
' result = ClassHelper.CheckDBNull(DT.Rows(0).Item(5), "String")
|
||||
' If result <> "" Then
|
||||
' If result.ToString.ToUpper.Contains("RECORD") Then
|
||||
' cmbSearchPattern5.SelectedIndex = 1
|
||||
' Else
|
||||
' cmbSearchPattern5.SelectedIndex = 0
|
||||
' End If
|
||||
' End If
|
||||
' 'cmbSearchPattern1.SelectedIndex = cmbSearchPattern1.FindStringExact(ClassHelper.CheckDBNull("@" & DT.Rows(0).Item(1), "String"))
|
||||
' 'cmbSearchPattern2.SelectedIndex = cmbSearchPattern2.FindStringExact(ClassHelper.CheckDBNull("@" & DT.Rows(0).Item(2), "String"))
|
||||
' 'cmbSearchPattern3.SelectedIndex = cmbSearchPattern3.FindStringExact(ClassHelper.CheckDBNull("@" & DT.Rows(0).Item(3), "String"))
|
||||
' 'cmbSearchPattern4.SelectedIndex = cmbSearchPattern4.FindStringExact(ClassHelper.CheckDBNull("@" & DT.Rows(0).Item(4), "String"))
|
||||
' 'cmbSearchPattern5.SelectedIndex = cmbSearchPattern5.FindStringExact(ClassHelper.CheckDBNull("@" & DT.Rows(0).Item(5), "String"))
|
||||
' End If
|
||||
' End If
|
||||
' Me.grpbxDocumentView.Visible = True
|
||||
' Else
|
||||
' chkbxdocview.Visible = True
|
||||
' chkbxdocview.Checked = False
|
||||
' Me.grpbxDocumentView.Visible = False
|
||||
' End If
|
||||
' Catch ex As Exception
|
||||
' MsgBox("Error in Check_Document_Config:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
' End Try
|
||||
|
||||
'End Sub
|
||||
|
||||
|
||||
#Region "+++++ Drag Drop Funktionen +++++"
|
||||
@ -109,11 +36,21 @@
|
||||
Dim def_font_style As Integer = 0
|
||||
Dim def_font_size As Integer = 8
|
||||
|
||||
Dim defaultCaption As String = "Bezeichner definieren"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
defaultCaption = "Define Identifier"
|
||||
End If
|
||||
|
||||
Dim defaultCalendarCaption As String = "Zu Kalender hinzufügen"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
defaultCalendarCaption = "Add to Calendar"
|
||||
End If
|
||||
|
||||
Dim random As String = ShortGUID()
|
||||
'Dim random As Integer = r.Next(8, 100)
|
||||
Select Case type
|
||||
Case "lbl"
|
||||
CtrlBuilder.AddLabel(0, "lbl" & random, "Bezeichnung definieren", 0, 0, def_font_family, def_font_color, def_font_size, def_font_style, "", True, Parent)
|
||||
CtrlBuilder.AddLabel(0, "lbl" & random, defaultCaption, 0, 0, def_font_family, def_font_color, def_font_size, def_font_style, "", True, Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case "txt"
|
||||
@ -133,11 +70,11 @@
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case "chk"
|
||||
CtrlBuilder.AddCheckBox(0, "chk" & random, "Bezeichn. defnieren", False, 0, 0, def_font_family, def_font_color, def_font_size, def_font_style, 0, False, 0, 0, True, False, False, Parent)
|
||||
CtrlBuilder.AddCheckBox(0, "chk" & random, defaultCaption, False, 0, 0, def_font_family, def_font_color, def_font_size, def_font_style, 0, False, 0, 0, True, False, False, Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case "rb"
|
||||
CtrlBuilder.AddRadioButton(0, "rb" & random, "Bezeichn. defnieren", False, 0, 0, def_font_family, def_font_color, def_font_size, def_font_style, 0, False, 0, 0, True, False, False, Parent)
|
||||
CtrlBuilder.AddRadioButton(0, "rb" & random, defaultCaption, False, 0, 0, def_font_family, def_font_color, def_font_size, def_font_style, 0, False, 0, 0, True, False, False, Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
|
||||
@ -146,18 +83,18 @@
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case "gb"
|
||||
CtrlBuilder.AddGroupBox(0, "gb" & random, "Bezeichn. defnieren", 0, 0, 0, 0, ColorToInt(SystemColors.Control), def_font_color, def_font_family, def_font_size, def_font_style, True, Parent)
|
||||
CtrlBuilder.AddGroupBox(0, "gb" & random, defaultCaption, 0, 0, 0, 0, ColorToInt(SystemColors.Control), def_font_color, def_font_family, def_font_size, def_font_style, True, Parent)
|
||||
' Aktuelles Control in die Datenbank speichern
|
||||
ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl)
|
||||
Case "f_addappointment"
|
||||
CtrlBuilder.FunctionAddAppointment(0, "f_addappointment" & random, "Zu Kalender hinzufügen", 0, 0, 0, 0, True, Parent)
|
||||
CtrlBuilder.FunctionAddAppointment(0, "f_addappointment" & random, defaultCalendarCaption, 0, 0, 0, 0, True, Parent)
|
||||
|
||||
If ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl) = True Then
|
||||
Dim ControlId = GetControlID_for_Name(CtrlBuilder.CurrentControl.Name, CURRENT_FORM_ID)
|
||||
ClassFunctionCommands.InsertFunction(ControlId, "ADDAPPOINTMENT")
|
||||
End If
|
||||
Case "f_addformdata"
|
||||
CtrlBuilder.FunctionAddFormData(0, "f_addformdata" & random, "Add form Data", 0, 0, 0, 0, True, Parent)
|
||||
CtrlBuilder.FunctionAddFormData(0, "f_addformdata" & random, "Add Form Data", 0, 0, 0, 0, True, Parent)
|
||||
|
||||
If ClassControlCommands.InsertControl(CtrlBuilder.CurrentControl) = True Then
|
||||
Dim ControlId = GetControlID_for_Name(CtrlBuilder.CurrentControl.Name, CURRENT_FORM_ID)
|
||||
@ -229,8 +166,8 @@
|
||||
Dim wid As Integer = Me.Width
|
||||
Dim update_sizepnl As String = "UPDATE TBPMO_FORM_VIEW SET HEIGHT = " & pnlDesigner.Height & ",WIDTH = " & wid & " where FORM_ID = " & CURRENT_FORM_ID & " and SCREEN_ID = " & CURRENT_SCREEN_ID
|
||||
ClassDatabase.Execute_non_Query(update_sizepnl)
|
||||
frmTool_ControlProperties.Instance.Close()
|
||||
frmTool_ControlDesigner.Instance.Close()
|
||||
'frmTool_ControlProperties.Instance.Close()
|
||||
'frmTool_ControlDesigner.Instance.Close()
|
||||
|
||||
|
||||
Catch ex As Exception
|
||||
@ -547,9 +484,12 @@
|
||||
CURRENT_CONTROL_ID = ClassControlCommands.GetControlGuid(CtrlBuilder.CurrentControl.Name)
|
||||
|
||||
' Control Eigenschaften laden
|
||||
frmTool_ControlProperties.Instance.pgControlProperties.Enabled = True
|
||||
'frmTool_ControlProperties.Instance.pgControlProperties.Enabled = True
|
||||
pgControlProperties.Enabled = True
|
||||
|
||||
'frmTool_ControlProperties.Instance.LoadControlProperties(CtrlBuilder.CurrentControl)
|
||||
frmTool_ControlProperties.Instance.LoadControlPropertiesNeu(CtrlBuilder.CurrentControl)
|
||||
'frmTool_ControlProperties.Instance.LoadControlPropertiesNeu(CtrlBuilder.CurrentControl)
|
||||
LoadControlPropertiesNeu(CtrlBuilder.CurrentControl)
|
||||
End Sub
|
||||
|
||||
|
||||
@ -561,20 +501,61 @@
|
||||
|
||||
' Set the mode flag to signal the MouseMove event handler that it
|
||||
' needs to now calculate new positions for our control
|
||||
m_Moving = True
|
||||
Mouse_Moving = True
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub ControlButton_MouseDown(sender As Object, e As MouseEventArgs) Handles btntextbox.MouseDown,
|
||||
btnlabel.MouseDown,
|
||||
btndtp.MouseDown,
|
||||
btncmb.MouseDown,
|
||||
btnCheckbox.MouseDown,
|
||||
btnpb.MouseDown,
|
||||
btngb.MouseDown,
|
||||
btn_addtocal.MouseDown,
|
||||
btn_addformdata.MouseDown,
|
||||
btnRadioButton.MouseDown,
|
||||
btnListBoxCheckable.MouseDown,
|
||||
btnListBox.MouseDown
|
||||
Mouse_Down = True
|
||||
End Sub
|
||||
|
||||
Private Sub ControlButton_MouseMove(sender As Object, e As MouseEventArgs) Handles btntextbox.MouseMove,
|
||||
btnlabel.MouseMove,
|
||||
btndtp.MouseMove,
|
||||
btncmb.MouseMove,
|
||||
btnCheckbox.MouseMove,
|
||||
btnpb.MouseMove,
|
||||
btngb.MouseMove,
|
||||
btn_addtocal.MouseMove,
|
||||
btn_addformdata.MouseMove,
|
||||
btnRadioButton.MouseMove,
|
||||
btnListBoxCheckable.MouseMove,
|
||||
btnListBox.MouseMove
|
||||
|
||||
If Mouse_Down Then
|
||||
Dim ctrl As Button = DirectCast(sender, Button)
|
||||
Dim type As String = ctrl.Tag.ToString()
|
||||
|
||||
ctrl.DoDragDrop(type, DragDropEffects.Copy)
|
||||
End If
|
||||
Mouse_Down = False
|
||||
End Sub
|
||||
|
||||
Private Sub Control_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseUp
|
||||
' The button was released, so we're going back to Static mode.
|
||||
If m_Moving = True Then
|
||||
m_Moving = False
|
||||
Console.WriteLine("mouseup")
|
||||
If Mouse_Moving = True Then
|
||||
Mouse_Moving = False
|
||||
'end_location = e.Location
|
||||
CtrlBuilder.EndLocation = e.Location
|
||||
|
||||
frmTool_ControlProperties.Instance.UpdateControlLocation(CtrlBuilder.CurrentControl)
|
||||
'frmTool_ControlProperties.Instance.UpdateControlLocation(CtrlBuilder.CurrentControl)
|
||||
UpdateControlLocation(CtrlBuilder.CurrentControl)
|
||||
ClassControlCommands.UpdateControlPosition(CtrlBuilder.CurrentControl.Location.X,
|
||||
CtrlBuilder.CurrentControl.Location.Y,
|
||||
CtrlBuilder.CurrentControl)
|
||||
TabControl1.SelectTab("pageProperties")
|
||||
|
||||
'Save_Control()
|
||||
End If
|
||||
@ -582,13 +563,13 @@
|
||||
' button was pressed
|
||||
MyBase.Cursor = Cursors.Default
|
||||
End Sub
|
||||
Private Sub Control_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove
|
||||
Private Sub Control_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove
|
||||
Try
|
||||
If CtrlBuilder.CurrentControl Is Nothing Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If m_Moving = True Then
|
||||
If Mouse_Moving = True Then
|
||||
Me.Cursor = Cursors.Hand
|
||||
Me.Refresh()
|
||||
|
||||
@ -624,7 +605,7 @@
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "MovableLabel_MouseMove")
|
||||
m_Moving = False
|
||||
Mouse_Moving = False
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
@ -661,74 +642,354 @@
|
||||
End If
|
||||
End Sub
|
||||
|
||||
'Private Sub btnWindreamsuche_Click(sender As Object, e As EventArgs)
|
||||
' If Not Me.txtWindreamsuche.Text = "" Then
|
||||
' Me.OFDWindreamsuche.FileName = Me.txtWindreamsuche.Text
|
||||
' End If
|
||||
|
||||
' If Me.OFDWindreamsuche.ShowDialog = Windows.Forms.DialogResult.OK Then
|
||||
' Me.txtWindreamsuche.Text = Me.OFDWindreamsuche.FileName
|
||||
' End If
|
||||
'End Sub
|
||||
'Private Sub btnsavedocView_Click(sender As Object, e As EventArgs)
|
||||
' Try
|
||||
' Dim SP1, SP2, SP3, SP4, SP5
|
||||
' If cmbSearchPattern1.SelectedIndex <> -1 Then
|
||||
' SP1 = "@" & cmbSearchPattern1.Text
|
||||
' Else
|
||||
' SP1 = ""
|
||||
' End If
|
||||
' If cmbSearchPattern2.SelectedIndex <> -1 Then
|
||||
' SP2 = "@" & cmbSearchPattern2.Text
|
||||
' Else
|
||||
' SP2 = ""
|
||||
' End If
|
||||
' If cmbSearchPattern3.SelectedIndex <> -1 Then
|
||||
' SP3 = "@" & cmbSearchPattern3.Text
|
||||
' Else
|
||||
' SP3 = ""
|
||||
' End If
|
||||
' If cmbSearchPattern4.SelectedIndex <> -1 Then
|
||||
' SP4 = "@" & cmbSearchPattern4.Text
|
||||
' Else
|
||||
' SP4 = ""
|
||||
' End If
|
||||
' If cmbSearchPattern5.SelectedIndex <> -1 Then
|
||||
' SP5 = "@" & cmbSearchPattern5.Text
|
||||
' Else
|
||||
' SP5 = ""
|
||||
' End If
|
||||
' Dim sql = "UPDATE TBPMO_FORM_VIEW SET WINDREAM_SEARCH = '" & txtWindreamsuche.Text & "',SEARCH_PATTERN1 = '" & SP1 & "',SEARCH_PATTERN2= '" & SP2 & "',SEARCH_PATTERN3= '" & SP3 & _
|
||||
' "',SEARCH_PATTERN4 = '" & SP4 & "',SEARCH_PATTERN5 = '" & SP5 & "', CHANGED_WHO = '" & Environment.UserName & "' where FORM_ID = " & CURRENT_FORM_ID & " and SCREEN_ID = " & CURRENT_SCREEN_ID
|
||||
' If ClassDatabase.Execute_non_Query(sql) = True Then
|
||||
' tsstatus.Text = "Document-View properties changed - " & Now
|
||||
' tsstatus.Visible = True
|
||||
' End If
|
||||
' Catch ex As Exception
|
||||
' MsgBox("Error in Save DocView-properties:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
' tsstatus.Visible = False
|
||||
' End Try
|
||||
|
||||
'End Sub
|
||||
|
||||
'Private Sub chkbxdocview_CheckedChanged(sender As Object, e As EventArgs)
|
||||
' If formloaded = True Then
|
||||
' Dim sql
|
||||
' If chkbxdocview.Checked = True Then
|
||||
' sql = "UPDATE TBPMO_FORM_VIEW SET DOCUMENT_VIEW = 1, CHANGED_WHO = '" & Environment.UserName & "' WHERE FORM_ID = " & CURRENT_FORM_ID & " and SCREEN_ID = " & CURRENT_SCREEN_ID
|
||||
' Else
|
||||
' sql = "UPDATE TBPMO_FORM_VIEW SET DOCUMENT_VIEW = 0, CHANGED_WHO = '" & Environment.UserName & "' WHERE FORM_ID = " & CURRENT_FORM_ID & " and SCREEN_ID = " & CURRENT_SCREEN_ID
|
||||
' End If
|
||||
' If ClassDatabase.Execute_non_Query(sql) = False Then
|
||||
' MsgBox("Fehler bei Update Document-View - Check log", MsgBoxStyle.Critical)
|
||||
' End If
|
||||
' Check_Document_Config(CURRENT_FORM_ID)
|
||||
' End If
|
||||
|
||||
'End Sub
|
||||
|
||||
|
||||
Private Sub frmLevel_Designer_Shown(sender As Object, e As EventArgs) Handles Me.Shown
|
||||
formloaded = True
|
||||
End Sub
|
||||
|
||||
Public Sub LoadControlPropertiesNeu(ctrl As Control)
|
||||
Try
|
||||
|
||||
Dim controlId = DirectCast(ctrl.Tag, ClassControlMetadata).Id
|
||||
Dim sql As String = String.Format("SELECT * FROM VWPMO_CONTROL_SCREEN WHERE CONTROL_ID = {0}", ControlId)
|
||||
'Dim sqlHint As String = String.Format("SELECT HINT FROM TBPMO_CONTROL_LANGUAGE WHERE CONTROL_SCREEN_ID = {0} AND LANGUAGE_TYPE = '{1}'", controlId, USER_LANGUAGE)
|
||||
Dim sqlHint = String.Format("SELECT HINT FROM TBPMO_CONTROL_LANGUAGE WHERE CONTROL_SCREEN_ID = (SELECT GUID FROM TBPMO_CONTROL_SCREEN WHERE CONTROL_ID = {0} AND SCREEN_ID = {1}) AND LANGUAGE_TYPE = '{2}'", controlId, CURRENT_SCREEN_ID, USER_LANGUAGE)
|
||||
|
||||
Dim dt As DataTable = ClassDatabase.Return_Datatable(sql)
|
||||
Dim hint As String = ClassConverter.ToStringOrDefault(ClassDatabase.Execute_Scalar(sqlHint), Nothing)
|
||||
|
||||
Dim props As Object = Nothing
|
||||
Dim r As DataRow = Nothing
|
||||
Dim type As String = Nothing
|
||||
|
||||
If dt.Rows.Count <> 1 Then
|
||||
MsgBox("Unexpected behaviour in LoadControlProperties: No Control could be loaded!" & vbNewLine & "Tag.ControlID: " & ControlId.ToString, MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
r = dt.Rows(0)
|
||||
type = r.Item("CTRLTYPE_NAME")
|
||||
|
||||
'Props Object initialisieren
|
||||
Select Case type
|
||||
Case "Label" : props = New LabelProperties()
|
||||
Case "Textbox" : props = New TextBoxProperties()
|
||||
Case "Combobox" : props = New ComboBoxProperties()
|
||||
Case "Checkbox" : props = New CheckBoxProperties()
|
||||
Case "RadioButton" : props = New RadioButtonProperties()
|
||||
Case "Datepicker" : props = New DateTimePickerProperties()
|
||||
Case "Datagridview" : props = New DataGridViewProperties()
|
||||
Case "Groupbox" : props = New GroupBoxProperties()
|
||||
Case "Picturebox" : props = New PictureBoxProperties()
|
||||
Case "ListBox" : props = New ComboBoxProperties()
|
||||
Case "CheckedListBox" : props = New ComboBoxProperties()
|
||||
Case "F_AddAppointment" : props = New FunctionAddAppointment()
|
||||
Case "F_AddFormData" : props = New FunctionAddFormData()
|
||||
End Select
|
||||
|
||||
'Generische Properties laden
|
||||
props.ID = r.Item("CONTROL_ID")
|
||||
props.Name = r.Item("CONTROL_NAME")
|
||||
props.Size = New Size(r.Item("CTRLSCR_WIDTH"), r.Item("CTRLSCR_HEIGHT"))
|
||||
props.Location = New Point(r.Item("CTRLSCR_X_LOC"), r.Item("CTRLSCR_Y_LOC"))
|
||||
props.Hint = hint
|
||||
|
||||
'Control-spezifische Properties laden
|
||||
Select Case type
|
||||
Case "Label"
|
||||
props.ControlType = "Label"
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
props.ColumnTitle = r.Item("CONTROL_COL_NAME")
|
||||
props.Caption = r.Item("CTRLSCR_CAPTION")
|
||||
props.SQLCommand = New SQLValue(NotNull(r.Item("CONTROL_SQLCOMMAND_1"), ""))
|
||||
|
||||
Case "Textbox"
|
||||
props.ControlType = "TextBox"
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
props.ColumnTitle = r.Item("CONTROL_COL_NAME")
|
||||
props.DefaultValue = ClassConverter.ToStringOrDefault(r.Item("CONTROL_DEF_VALUE"))
|
||||
props.Format = NotNull([Enum].Parse(GetType(EnumFormatOptions), r.Item("CONTROL_FORMAT_TYPE")), EnumFormatOptions.String)
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
props.TabStop = r.Item("CTRLSCR_TAB_STOP")
|
||||
props.TabIndex = r.Item("CTRLSCR_TAB_INDEX")
|
||||
props.ShowColumn = NotNull(CBool(r.Item("CONTROL_SHOW_COLUMN")), True)
|
||||
props.Multiline = r.Item("CONTROL_MULTILINE")
|
||||
props.SQLCommand = New SQLValue(NotNull(r.Item("CONTROL_SQLCOMMAND_1"), ""))
|
||||
|
||||
Case "Combobox"
|
||||
props.ControlType = "ComboBox"
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
props.ColumnTitle = r.Item("CONTROL_COL_NAME")
|
||||
props.DefaultValue = ClassConverter.ToStringOrDefault(r.Item("CONTROL_DEF_VALUE"))
|
||||
props.MasterDataId = r.Item("CTRLSCR_MASTER_DATA_ID")
|
||||
props.Format = NotNull([Enum].Parse(GetType(EnumFormatOptions), r.Item("CONTROL_FORMAT_TYPE")), EnumFormatOptions.String)
|
||||
props.StaticList = NotNull(r.Item("CONTROL_STATIC_LIST"), "")
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
props.TabStop = r.Item("CTRLSCR_TAB_STOP")
|
||||
props.TabIndex = r.Item("CTRLSCR_TAB_INDEX")
|
||||
props.ShowColumn = NotNull(CBool(r.Item("CONTROL_SHOW_COLUMN")), True)
|
||||
props.SQLCommand = New SQLValue(NotNull(r.Item("CONTROL_SQLCOMMAND_1"), ""))
|
||||
|
||||
Case "Checkbox"
|
||||
props.ControlType = "CheckBox"
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
props.ColumnTitle = r.Item("CONTROL_COL_NAME")
|
||||
props.Caption = r.Item("CTRLSCR_CAPTION")
|
||||
props.DefaultValue = ClassConverter.ToBooleanOrDefault(r.Item("CONTROL_DEF_VALUE"))
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
props.ShowColumn = NotNull(CBool(r.Item("CONTROL_SHOW_COLUMN")), True)
|
||||
props.TabStop = r.Item("CTRLSCR_TAB_STOP")
|
||||
props.TabIndex = r.Item("CTRLSCR_TAB_INDEX")
|
||||
|
||||
Case "RadioButton"
|
||||
props.ControlType = "RadioButton"
|
||||
props.ColumnTitle = r.Item("CONTROL_COL_NAME")
|
||||
props.Caption = r.Item("CTRLSCR_CAPTION")
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
|
||||
Case "Datepicker"
|
||||
props.ControlType = "DatePicker"
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
props.ColumnTitle = r.Item("CONTROL_COL_NAME")
|
||||
Dim i = r.Item("CONTROL_DEF_VALUE")
|
||||
props.DefaultValue = NotNull(r.Item("CONTROL_DEF_VALUE"), EnumDateTimePickerDefaultValueOptions.Empty)
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
props.ShowColumn = NotNull(CBool(r.Item("CONTROL_SHOW_COLUMN")), True)
|
||||
props.TabStop = r.Item("CTRLSCR_TAB_STOP")
|
||||
props.TabIndex = r.Item("CTRLSCR_TAB_INDEX")
|
||||
|
||||
Case "Datagridview"
|
||||
props.ControlType = "DataGridView/Table"
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
props.ColumnTitle = ClassConverter.ToStringOrDefault(r.Item("CONTROL_COL_NAME"), ctrl.Name)
|
||||
props.ShowColumn = ClassConverter.ToBooleanOrDefault(r.Item("CONTROL_SHOW_COLUMN"), True)
|
||||
props.SQLCommand = New SQLValue(NotNull(r.Item("CONTROL_SQLCOMMAND_1"), ""))
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
|
||||
Case "Groupbox"
|
||||
props.ControlType = "GroupBox"
|
||||
props.Caption = r.Item("CTRLSCR_CAPTION")
|
||||
props.BackColor = IntToColor(r.Item("CTRLSCR_BACK_COLOR"))
|
||||
|
||||
Case "Picturebox"
|
||||
props.ControlType = "PictureBox"
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
|
||||
Case "ListBox"
|
||||
props.ControlType = "ListBox"
|
||||
props.StaticList = ClassConverter.ToStringOrDefault(r.Item("CONTROL_STATIC_LIST"))
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
props.ColumnTitle = ClassConverter.ToStringOrDefault(r.Item("CONTROL_COL_NAME"), ctrl.Name)
|
||||
props.ShowColumn = ClassConverter.ToBooleanOrDefault(r.Item("CONTROL_SHOW_COLUMN"), True)
|
||||
|
||||
Case "CheckedListBox"
|
||||
props.ControlType = "CheckedListBox"
|
||||
props.StaticList = ClassConverter.ToStringOrDefault(r.Item("CONTROL_STATIC_LIST"))
|
||||
props.IsRequired = r.Item("CONTROL_REQUIRED")
|
||||
props.IsReadOnly = r.Item("CONTROL_READ_ONLY")
|
||||
props.FontColor = IntToColor(r.Item("CTRLSCR_FONT_COLOR"))
|
||||
props.Font = New Font(r.Item("CTRLSCR_FONT_FAMILY").ToString(),
|
||||
CType(r.Item("CTRLSCR_FONT_SIZE"), Single),
|
||||
CType(r.Item("CTRLSCR_FONT_STYLE"), FontStyle))
|
||||
props.ColumnTitle = ClassConverter.ToStringOrDefault(r.Item("CONTROL_COL_NAME"), ctrl.Name)
|
||||
props.ShowColumn = ClassConverter.ToBooleanOrDefault(r.Item("CONTROL_SHOW_COLUMN"), True)
|
||||
|
||||
Case "F_AddAppointment"
|
||||
props.ControlType = "Function.AddToCalendar"
|
||||
props.Caption() = r.Item("CTRLSCR_CAPTION")
|
||||
|
||||
Dim f = ClassFunctionCommands.LoadFunction(controlId)
|
||||
Dim FromDateId, ToDateId, SubjectString, Subject2String, PlaceString, DescString
|
||||
|
||||
FromDateId = f.Item("INTEGER1")
|
||||
If IsDBNull(FromDateId) OrElse FromDateId = 0 Then
|
||||
props.FromDate = ""
|
||||
Else
|
||||
props.FromDate = Get_Name_for_ControlID(FromDateId, CURRENT_FORM_ID)
|
||||
End If
|
||||
|
||||
ToDateId = f.Item("INTEGER2")
|
||||
If IsDBNull(ToDateId) OrElse ToDateId = 0 Then
|
||||
props.ToDate = ""
|
||||
Else
|
||||
props.ToDate = Get_Name_for_ControlID(ToDateId, CURRENT_FORM_ID)
|
||||
End If
|
||||
|
||||
SubjectString = f.Item("STRING1")
|
||||
If IsDBNull(SubjectString) OrElse String.IsNullOrEmpty(SubjectString) Then
|
||||
props.Subject = ""
|
||||
Else
|
||||
props.Subject = SubjectString
|
||||
End If
|
||||
|
||||
Subject2String = f.Item("STRING2")
|
||||
If IsDBNull(Subject2String) OrElse String.IsNullOrEmpty(Subject2String) Then
|
||||
props.Subject2 = ""
|
||||
Else
|
||||
props.Subject2 = Subject2String
|
||||
End If
|
||||
|
||||
PlaceString = f.Item("STRING3")
|
||||
If IsDBNull(PlaceString) OrElse String.IsNullOrEmpty(PlaceString) Then
|
||||
props.Place = ""
|
||||
Else
|
||||
props.Place = PlaceString
|
||||
End If
|
||||
|
||||
DescString = f.Item("STRING4")
|
||||
If IsDBNull(DescString) OrElse String.IsNullOrEmpty(DescString) Then
|
||||
props.Description = ""
|
||||
Else
|
||||
props.Description = DescString
|
||||
End If
|
||||
|
||||
|
||||
Case "F_AddFormData"
|
||||
Dim f = ClassFunctionCommands.LoadFunction(controlId)
|
||||
|
||||
props.ControlType = "Function.AddFormData"
|
||||
props.Caption = r.Item("CTRLSCR_CAPTION")
|
||||
|
||||
If IsDBNull(f.Item("INTEGER1")) Then
|
||||
props.FormID = 0
|
||||
Else
|
||||
props.FormID = NotNullInt(f.Item("INTEGER1"), 0)
|
||||
End If
|
||||
|
||||
If IsDBNull(f.Item("INTEGER2")) Then
|
||||
props.ScreenID = 0
|
||||
Else
|
||||
props.ScreenID = NotNullInt(f.Item("INTEGER2"), 0)
|
||||
End If
|
||||
End Select
|
||||
|
||||
CURRENT_CONTROL_ID = r.Item("CONTROL_ID")
|
||||
' Aktuelle Control Eigenschaften anzeigen
|
||||
Me.pgControlProperties.SelectedObject = props
|
||||
' Fenster Titel aktualisieren
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in LoadControlProperties" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Sub UpdateControlLocation(ctrl As Control)
|
||||
Current_Properties = Me.pgControlProperties.SelectedObject
|
||||
|
||||
If Current_Properties IsNot Nothing Then
|
||||
Current_Properties.Location = ctrl.Location
|
||||
Me.pgControlProperties.SelectedObject = Current_Properties
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Public Function SaveControlProperties(ctrl As Control, properties As Object) As Boolean
|
||||
If ClassControlCommands.UpdateControl(ctrl, properties) Then
|
||||
LoadControlPropertiesNeu(ctrl)
|
||||
Return True
|
||||
Else
|
||||
MsgBox("Fehler beim Speichern der Elementeigenschaften.", MsgBoxStyle.Critical)
|
||||
Return False
|
||||
End If
|
||||
End Function
|
||||
|
||||
Private Sub btnSaveControl_Click(sender As Object, e As EventArgs) Handles btnSaveControl.Click
|
||||
If SaveControlProperties(CtrlBuilder.CurrentControl, pgControlProperties.SelectedObject) Then
|
||||
lblStatus.Text = "Änderungen gespeichert - " & Now
|
||||
lblStatus.Visible = True
|
||||
Else
|
||||
lblStatus.Visible = False
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btnDeleteControl_Click(sender As Object, e As EventArgs) Handles btnDeleteControl.Click
|
||||
If MsgBox("Wollen Sie das Element wirklich löschen?", MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
|
||||
If IsGroupBox(CtrlBuilder.CurrentControl) Then
|
||||
Dim parentID As Integer = GetControlID_for_Name(CtrlBuilder.CurrentControl.Name, CURRENT_FORM_ID)
|
||||
Dim SQL = "SELECT GUID FROM TBPMO_CONTROL WHERE PARENT_CONTROL_ID = " & parentID
|
||||
Dim dt As DataTable = ClassDatabase.Return_Datatable(SQL)
|
||||
|
||||
For Each dr As DataRow In dt.Rows
|
||||
Dim id As Integer = dr.Item(0)
|
||||
ClassControlCommands.DeleteControl(id)
|
||||
Next
|
||||
|
||||
End If
|
||||
|
||||
If ClassControlCommands.DeleteControl() = True Then
|
||||
'MsgBox("Element gelöscht, Elemente werden neu geladen.", MsgBoxStyle.Information)
|
||||
CtrlBuilder.ClearControls()
|
||||
frmLevel_Designer.Instance.LoadControls()
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub pgControlProperties_PropertyValueChanged(s As Object, e As PropertyValueChangedEventArgs)
|
||||
|
||||
Dim oldValue As Object = e.OldValue
|
||||
Dim newValue As Object = e.ChangedItem.Value
|
||||
Dim currentProperty As String = e.ChangedItem.Label
|
||||
Dim ctrl As Control = CtrlBuilder.CurrentControl
|
||||
|
||||
Select Case currentProperty
|
||||
Case "Location"
|
||||
ctrl.Location = newValue
|
||||
Case "X"
|
||||
ctrl.Location = New Point(newValue, ctrl.Location.Y)
|
||||
Case "Y"
|
||||
ctrl.Location = New Point(ctrl.Location.X, newValue)
|
||||
Case "Size"
|
||||
ctrl.Size = newValue
|
||||
Case "Width"
|
||||
ctrl.Size = New Size(newValue, ctrl.Size.Height)
|
||||
Case "Height"
|
||||
ctrl.Size = New Size(ctrl.Size.Width, newValue)
|
||||
Case "Name"
|
||||
ctrl.Name = newValue
|
||||
Case "Caption"
|
||||
ctrl.Text = newValue
|
||||
Case "Font"
|
||||
ctrl.Font = newValue
|
||||
Case "FontColor"
|
||||
ctrl.ForeColor = newValue
|
||||
Case "BackColor"
|
||||
ctrl.BackColor = newValue
|
||||
End Select
|
||||
|
||||
lblStatus.Text = "Ausstehende Änderungen"
|
||||
lblStatus.Visible = True
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
20
app/DD-Record-Organiser/frmMain.Designer.vb
generated
20
app/DD-Record-Organiser/frmMain.Designer.vb
generated
@ -105,6 +105,7 @@ Partial Class frmMain
|
||||
'
|
||||
Me.TableAdapterManager.BackupDataSetBeforeUpdate = False
|
||||
Me.TableAdapterManager.Connection = Nothing
|
||||
Me.TableAdapterManager.TBDD_CLIENTTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBDD_CONNECTIONTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBDD_DOKUMENTARTTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBDD_EINGANGSARTENTableAdapter = Nothing
|
||||
@ -113,6 +114,7 @@ Partial Class frmMain
|
||||
Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBDD_USER_GROUPSTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBPMO_CONSTRUCTOR_USER_SQLTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBPMO_FILES_USERTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBPMO_FOLLOW_UP_EMAILTableAdapter = Nothing
|
||||
Me.TableAdapterManager.TBPMO_FOLLUPEMAIL_USERTableAdapter = Nothing
|
||||
@ -137,11 +139,11 @@ Partial Class frmMain
|
||||
'
|
||||
'ribbonMain
|
||||
'
|
||||
resources.ApplyResources(Me.ribbonMain, "ribbonMain")
|
||||
Me.ribbonMain.ApplicationButtonDropDownControl = Me.MainMenu
|
||||
Me.ribbonMain.BackColor = System.Drawing.Color.DarkGray
|
||||
Me.ribbonMain.ExpandCollapseItem.Id = 0
|
||||
Me.ribbonMain.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.ribbonMain.ExpandCollapseItem, Me.LabelMachine, Me.LabelUser, Me.LabelLoggedIn, Me.LabelVersion, Me.itemInfo, Me.itemExit, Me.BarButtonItem1, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5, Me.BarButtonItem6, Me.BarButtonItem7, Me.BarButtonItem8, Me.BarButtonItem9, Me.itemSettings, Me.BarButtonItem2, Me.BarButtonItem10, Me.BarButtonItem12, Me.BarButtonItem13, Me.BarButtonItem14, Me.BarButtonItem15, Me.BarButtonItem16, Me.BarButtonItem17, Me.BarButtonItem18})
|
||||
resources.ApplyResources(Me.ribbonMain, "ribbonMain")
|
||||
Me.ribbonMain.MaxItemId = 32
|
||||
Me.ribbonMain.Name = "ribbonMain"
|
||||
Me.ribbonMain.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.pageHome, Me.pageForms, Me.pageAdmin})
|
||||
@ -154,6 +156,10 @@ Partial Class frmMain
|
||||
Me.MainMenu.ItemLinks.Add(Me.itemInfo)
|
||||
Me.MainMenu.ItemLinks.Add(Me.itemSettings)
|
||||
Me.MainMenu.ItemLinks.Add(Me.itemExit)
|
||||
Me.MainMenu.MenuAppearance.HeaderItemAppearance.FontSizeDelta = CType(resources.GetObject("MainMenu.MenuAppearance.HeaderItemAppearance.FontSizeDelta"), Integer)
|
||||
Me.MainMenu.MenuAppearance.HeaderItemAppearance.FontStyleDelta = CType(resources.GetObject("MainMenu.MenuAppearance.HeaderItemAppearance.FontStyleDelta"), System.Drawing.FontStyle)
|
||||
Me.MainMenu.MenuAppearance.HeaderItemAppearance.GradientMode = CType(resources.GetObject("MainMenu.MenuAppearance.HeaderItemAppearance.GradientMode"), System.Drawing.Drawing2D.LinearGradientMode)
|
||||
Me.MainMenu.MenuAppearance.HeaderItemAppearance.Image = CType(resources.GetObject("MainMenu.MenuAppearance.HeaderItemAppearance.Image"), System.Drawing.Image)
|
||||
Me.MainMenu.Name = "MainMenu"
|
||||
Me.MainMenu.Ribbon = Me.ribbonMain
|
||||
'
|
||||
@ -367,6 +373,10 @@ Partial Class frmMain
|
||||
'pageForms
|
||||
'
|
||||
Me.pageForms.Appearance.BackColor = CType(resources.GetObject("pageForms.Appearance.BackColor"), System.Drawing.Color)
|
||||
Me.pageForms.Appearance.FontSizeDelta = CType(resources.GetObject("pageForms.Appearance.FontSizeDelta"), Integer)
|
||||
Me.pageForms.Appearance.FontStyleDelta = CType(resources.GetObject("pageForms.Appearance.FontStyleDelta"), System.Drawing.FontStyle)
|
||||
Me.pageForms.Appearance.GradientMode = CType(resources.GetObject("pageForms.Appearance.GradientMode"), System.Drawing.Drawing2D.LinearGradientMode)
|
||||
Me.pageForms.Appearance.Image = CType(resources.GetObject("pageForms.Appearance.Image"), System.Drawing.Image)
|
||||
Me.pageForms.Appearance.Options.UseBackColor = True
|
||||
Me.pageForms.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.groupQuickAccessForm2})
|
||||
Me.pageForms.Image = Global.DD_Record_Organiser.My.Resources.Resources.application_form
|
||||
@ -431,11 +441,11 @@ Partial Class frmMain
|
||||
'
|
||||
'RibbonStatusBar1
|
||||
'
|
||||
resources.ApplyResources(Me.RibbonStatusBar1, "RibbonStatusBar1")
|
||||
Me.RibbonStatusBar1.ItemLinks.Add(Me.LabelMachine)
|
||||
Me.RibbonStatusBar1.ItemLinks.Add(Me.LabelUser)
|
||||
Me.RibbonStatusBar1.ItemLinks.Add(Me.LabelLoggedIn)
|
||||
Me.RibbonStatusBar1.ItemLinks.Add(Me.LabelVersion)
|
||||
resources.ApplyResources(Me.RibbonStatusBar1, "RibbonStatusBar1")
|
||||
Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
|
||||
Me.RibbonStatusBar1.Ribbon = Me.ribbonMain
|
||||
'
|
||||
@ -462,10 +472,14 @@ Partial Class frmMain
|
||||
'
|
||||
'frmMain
|
||||
'
|
||||
resources.ApplyResources(Me, "$this")
|
||||
Me.Appearance.BackColor = CType(resources.GetObject("frmMain.Appearance.BackColor"), System.Drawing.Color)
|
||||
Me.Appearance.FontSizeDelta = CType(resources.GetObject("frmMain.Appearance.FontSizeDelta"), Integer)
|
||||
Me.Appearance.FontStyleDelta = CType(resources.GetObject("frmMain.Appearance.FontStyleDelta"), System.Drawing.FontStyle)
|
||||
Me.Appearance.GradientMode = CType(resources.GetObject("frmMain.Appearance.GradientMode"), System.Drawing.Drawing2D.LinearGradientMode)
|
||||
Me.Appearance.Image = CType(resources.GetObject("frmMain.Appearance.Image"), System.Drawing.Image)
|
||||
Me.Appearance.Options.UseBackColor = True
|
||||
Me.Appearance.Options.UseFont = True
|
||||
resources.ApplyResources(Me, "$this")
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.Controls.Add(Me.RibbonStatusBar1)
|
||||
Me.Controls.Add(Me.ribbonMain)
|
||||
|
||||
@ -118,7 +118,7 @@
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="NotifyIcon1.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<data name="NotifyIcon.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAEAgIUAAAEAGAD4zwAAFgAAACgAAACAAAAACgEAAAEAGAAAAAAAAAAAAEgAAABIAAAAAAAAAAAA
|
||||
AAAAAABGHqpGHqpGHqpGHqpGHqpGHqpGHqpGHqpGHqpGHqpGHqpGHqpGHqpGHqpGHqpGHqpGHqpGHqoA
|
||||
@ -1010,6 +1010,12 @@
|
||||
/////////////wA///////////////////8f////////////////////
|
||||
</value>
|
||||
</data>
|
||||
<data name="itemInfo.Caption" xml:space="preserve">
|
||||
<value>Help</value>
|
||||
</data>
|
||||
<data name="itemInfo.Description" xml:space="preserve">
|
||||
<value>Shows information about the program</value>
|
||||
</data>
|
||||
<data name="itemInfo.Glyph" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAACF0RVh0VGl0
|
||||
@ -1060,6 +1066,12 @@
|
||||
Yx8G+/8H09D4N5NlWbdRYGV2AAAAAElFTkSuQmCC
|
||||
</value>
|
||||
</data>
|
||||
<data name="itemSettings.Caption" xml:space="preserve">
|
||||
<value>Basic Settings</value>
|
||||
</data>
|
||||
<data name="itemSettings.Description" xml:space="preserve">
|
||||
<value>Shows basic settings of the program</value>
|
||||
</data>
|
||||
<data name="itemSettings.Glyph" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAACt0RVh0VGl0
|
||||
@ -1111,6 +1123,12 @@
|
||||
UVnFoWBr+TznI5VPNdUJyXP+R5GkfwMPT3OfchuhBQAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<data name="itemExit.Caption" xml:space="preserve">
|
||||
<value>Exit</value>
|
||||
</data>
|
||||
<data name="itemExit.Description" xml:space="preserve">
|
||||
<value>Exits the program</value>
|
||||
</data>
|
||||
<data name="itemExit.Glyph" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAB10RVh0VGl0
|
||||
@ -1155,51 +1173,23 @@
|
||||
yfvkPPhE1Ql+k9vzOv3/P/ifoPoeVeUDAqiG6o3/Nb1j0KB/AMYUfCkDw9hpAAAAAElFTkSuQmCC
|
||||
</value>
|
||||
</data>
|
||||
<assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
<data name="MainMenu.MenuAppearance.HeaderItemAppearance.FontSizeDelta" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="MainMenu.MenuAppearance.HeaderItemAppearance.FontStyleDelta" type="System.Drawing.FontStyle, System.Drawing">
|
||||
<value>Regular</value>
|
||||
</data>
|
||||
<data name="MainMenu.MenuAppearance.HeaderItemAppearance.GradientMode" type="System.Drawing.Drawing2D.LinearGradientMode, System.Drawing">
|
||||
<value>Horizontal</value>
|
||||
</data>
|
||||
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
<data name="MainMenu.MenuAppearance.HeaderItemAppearance.Image" type="System.Resources.ResXNullRef, System.Windows.Forms">
|
||||
<value />
|
||||
</data>
|
||||
<data name="BarButtonItem1.Caption" xml:space="preserve">
|
||||
<value>Calendar</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>Entity Designer</value>
|
||||
</data>
|
||||
@ -1756,6 +1746,18 @@
|
||||
<data name="groupQuickAccessForm.Text" xml:space="preserve">
|
||||
<value>Quick Start</value>
|
||||
</data>
|
||||
<data name="pageForms.Appearance.FontSizeDelta" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="pageForms.Appearance.FontStyleDelta" type="System.Drawing.FontStyle, System.Drawing">
|
||||
<value>Regular</value>
|
||||
</data>
|
||||
<data name="pageForms.Appearance.GradientMode" type="System.Drawing.Drawing2D.LinearGradientMode, System.Drawing">
|
||||
<value>Horizontal</value>
|
||||
</data>
|
||||
<data name="pageForms.Appearance.Image" type="System.Resources.ResXNullRef, System.Windows.Forms">
|
||||
<value />
|
||||
</data>
|
||||
<data name="pageForms.Text" xml:space="preserve">
|
||||
<value>forms - single input</value>
|
||||
</data>
|
||||
@ -1774,17 +1776,17 @@
|
||||
<data name="RibbonPageGroup1.Text" xml:space="preserve">
|
||||
<value>SQL Configuration</value>
|
||||
</data>
|
||||
<data name="ribbonMain.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1530, 150</value>
|
||||
<data name="frmMain.Appearance.FontSizeDelta" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 671</value>
|
||||
<data name="frmMain.Appearance.FontStyleDelta" type="System.Drawing.FontStyle, System.Drawing">
|
||||
<value>Regular</value>
|
||||
</data>
|
||||
<data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1530, 23</value>
|
||||
<data name="frmMain.Appearance.GradientMode" type="System.Drawing.Drawing2D.LinearGradientMode, System.Drawing">
|
||||
<value>Horizontal</value>
|
||||
</data>
|
||||
<data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1530, 694</value>
|
||||
<data name="frmMain.Appearance.Image" type="System.Resources.ResXNullRef, System.Windows.Forms">
|
||||
<value />
|
||||
</data>
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
Loading…
x
Reference in New Issue
Block a user