diff --git a/.gitignore b/.gitignore
index 3c4efe20..4ce6fdde 100644
--- a/.gitignore
+++ b/.gitignore
@@ -1,7 +1,10 @@
## Ignore Visual Studio temporary files, build results, and
## files generated by popular Visual Studio add-ons.
+##
+## Get latest from https://github.com/github/gitignore/blob/master/VisualStudio.gitignore
# User-specific files
+*.rsuser
*.suo
*.user
*.userosscache
@@ -17,16 +20,21 @@
[Rr]eleases/
x64/
x86/
+[Aa][Rr][Mm]/
+[Aa][Rr][Mm]64/
bld/
[Bb]in/
[Oo]bj/
[Ll]og/
-# Visual Studio 2015 cache/options directory
+# Visual Studio 2015/2017 cache/options directory
.vs/
# Uncomment if you have tasks that create the project's static files in wwwroot
#wwwroot/
+# Visual Studio 2017 auto generated files
+Generated\ Files/
+
# MSTest test Results
[Tt]est[Rr]esult*/
[Bb]uild[Ll]og.*
@@ -40,19 +48,28 @@ TestResult.xml
[Rr]eleasePS/
dlldata.c
-# DNX
+# Benchmark Results
+BenchmarkDotNet.Artifacts/
+
+# .NET Core
project.lock.json
project.fragment.lock.json
artifacts/
+# StyleCop
+StyleCopReport.xml
+
+# Files built by Visual Studio
*_i.c
*_p.c
-*_i.h
+*_h.h
*.ilk
*.meta
*.obj
+*.iobj
*.pch
*.pdb
+*.ipdb
*.pgc
*.pgd
*.rsp
@@ -62,6 +79,7 @@ artifacts/
*.tlh
*.tmp
*.tmp_proj
+*_wpftmp.csproj
*.log
*.vspscc
*.vssscc
@@ -90,6 +108,9 @@ ipch/
*.vspx
*.sap
+# Visual Studio Trace Files
+*.e2e
+
# TFS 2012 Local Workspace
$tf/
@@ -110,6 +131,14 @@ _TeamCity*
# DotCover is a Code Coverage Tool
*.dotCover
+# AxoCover is a Code Coverage Tool
+.axoCover/*
+!.axoCover/settings.json
+
+# Visual Studio code coverage results
+*.coverage
+*.coveragexml
+
# NCrunch
_NCrunch_*
.*crunch*.local.xml
@@ -141,9 +170,9 @@ publish/
# Publish Web Output
*.[Pp]ublish.xml
*.azurePubxml
-# TODO: Comment the next line if you want to checkin your web deploy settings
+# Note: Comment the next line if you want to checkin your web deploy settings,
# but database connection strings (with potential passwords) will be unencrypted
-#*.pubxml
+*.pubxml
*.publishproj
# Microsoft Azure Web App publish settings. Comment the next line if you want to
@@ -154,12 +183,12 @@ PublishScripts/
# NuGet Packages
*.nupkg
# The packages folder can be ignored because of Package Restore
-**/packages/*
+**/[Pp]ackages/*
# except build/, which is used as an MSBuild target.
-!**/packages/build/
+!**/[Pp]ackages/build/
# Uncomment if necessary however generally it will be regenerated when needed
-#!**/packages/repositories.config
-# NuGet v3's project.json files produces more ignoreable files
+#!**/[Pp]ackages/repositories.config
+# NuGet v3's project.json files produces more ignorable files
*.nuget.props
*.nuget.targets
@@ -176,12 +205,13 @@ AppPackages/
BundleArtifacts/
Package.StoreAssociation.xml
_pkginfo.txt
+*.appx
# Visual Studio cache files
# files ending in .cache can be ignored
*.[Cc]ache
# but keep track of directories ending in .cache
-!*.[Cc]ache/
+!?*.[Cc]ache/
# Others
ClientBin/
@@ -192,9 +222,12 @@ ClientBin/
*.jfm
*.pfx
*.publishsettings
-node_modules/
orleans.codegen.cs
+# Including strong name files can present a security risk
+# (https://github.com/github/gitignore/pull/2483#issue-259490424)
+#*.snk
+
# Since there are multiple workflows, uncomment next line to ignore bower_components
# (https://github.com/github/gitignore/pull/1529#issuecomment-104372622)
#bower_components/
@@ -209,15 +242,20 @@ _UpgradeReport_Files/
Backup*/
UpgradeLog*.XML
UpgradeLog*.htm
+ServiceFabricBackup/
+*.rptproj.bak
# SQL Server files
*.mdf
*.ldf
+*.ndf
# Business Intelligence projects
*.rdl.data
*.bim.layout
*.bim_*.settings
+*.rptproj.rsuser
+*- Backup*.rdl
# Microsoft Fakes
FakesAssemblies/
@@ -227,6 +265,7 @@ FakesAssemblies/
# Node.js Tools for Visual Studio
.ntvs_analysis.dat
+node_modules/
# Visual Studio 6 build log
*.plg
@@ -234,6 +273,9 @@ FakesAssemblies/
# Visual Studio 6 workspace options file
*.opt
+# Visual Studio 6 auto-generated workspace file (contains which files were open etc.)
+*.vbw
+
# Visual Studio LightSwitch build output
**/*.HTMLClient/GeneratedArtifacts
**/*.DesktopClient/GeneratedArtifacts
@@ -253,9 +295,46 @@ paket-files/
.idea/
*.sln.iml
-# CodeRush
-.cr/
+# CodeRush personal settings
+.cr/personal
# Python Tools for Visual Studio (PTVS)
__pycache__/
-*.pyc
\ No newline at end of file
+*.pyc
+
+# Cake - Uncomment if you are using it
+# tools/**
+# !tools/packages.config
+
+# Tabs Studio
+*.tss
+
+# Telerik's JustMock configuration file
+*.jmconfig
+
+# BizTalk build output
+*.btp.cs
+*.btm.cs
+*.odx.cs
+*.xsd.cs
+
+# OpenCover UI analysis results
+OpenCover/
+
+# Azure Stream Analytics local run output
+ASALocalRun/
+
+# MSBuild Binary and Structured Log
+*.binlog
+
+# NVidia Nsight GPU debugger configuration file
+*.nvuser
+
+# MFractors (Xamarin productivity tool) working folder
+.mfractor/
+
+# Local History for Visual Studio
+.localhistory/
+
+# BeatPulse healthcheck temp database
+healthchecksdb
\ No newline at end of file
diff --git a/Automation/App.config b/Automation/App.config
deleted file mode 100644
index 5534e287..00000000
--- a/Automation/App.config
+++ /dev/null
@@ -1,6 +0,0 @@
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Automation/Automation.vbproj b/Automation/Automation.vbproj
deleted file mode 100644
index 40c4e738..00000000
--- a/Automation/Automation.vbproj
+++ /dev/null
@@ -1,139 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {483A3DA7-6F7A-4E57-B77F-ED33F4E280C5}
- WinExe
- Automation.My.MyApplication
- Automation
- Automation
- 512
- WindowsForms
- v4.6.1
- true
-
-
- AnyCPU
- true
- full
- true
- true
- bin\Debug\
- Automation.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- AnyCPU
- pdbonly
- false
- true
- true
- bin\Release\
- Automation.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
- D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET\GdPicture.NET.14.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- Form
-
-
- Form1.vb
- Form
-
-
-
- True
- Application.myapp
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- Form1.vb
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
- {903b2d7d-3b80-4be9-8713-7447b704e1b0}
- Logging
-
-
- {5efaef9b-90b9-4f05-9f70-f79ad77fff86}
- Windows
-
-
-
-
\ No newline at end of file
diff --git a/Automation/ClassClipboard.vb b/Automation/ClassClipboard.vb
deleted file mode 100644
index 71f2f3fa..00000000
--- a/Automation/ClassClipboard.vb
+++ /dev/null
@@ -1,68 +0,0 @@
-Imports System.Runtime.InteropServices
-Public Class ClassClipboardWatcher
- Inherits NativeWindow
- Implements IDisposable
-
- Private Class Win32
-
- Public Shared Function SetClipboardViewer(ByVal hWnd As IntPtr) As IntPtr
- End Function
- End Class
-
- Const WM_DRAWCLIPBOARD As Integer = &H308
-
- Public Event ClipboardChanged As EventHandler(Of IDataObject)
- Public Shared Singleton As New ClassClipboardWatcher
-
- Private _handle As IntPtr
-
- Private Sub New()
- MyBase.CreateHandle(New CreateParams)
- _handle = Win32.SetClipboardViewer(Handle)
- End Sub
-
- Protected Overrides Sub WndProc(ByRef m As Message)
-
- Select Case m.Msg
- Case WM_DRAWCLIPBOARD
- Dim oData As IDataObject = Clipboard.GetDataObject
- RaiseEvent ClipboardChanged(Me, oData)
- End Select
- MyBase.WndProc(m)
- End Sub
-
-#Region "IDisposable Support"
- ' Für diese Klasse ist korrekte Ressourcenbereinigung besonders wichtig, da
- ' mit systemübergreifenden Ressourcen gearbeitet wird
-
- ' So ermitteln Sie überflüssige Aufrufe
- Private disposedValue As Boolean = False
-
- Protected Overridable Sub Dispose(ByVal disposing As Boolean)
- If Not disposedValue Then
- If disposing Then
- ' TODO: Verwaltete Ressourcen freigeben, wenn sie explizit
- ' aufgerufen werden
- End If
- MyBase.DestroyHandle()
- Dim H As IntPtr = Win32.SetClipboardViewer(_handle)
- End If
- disposedValue = True
- End Sub
-
- ' Dieser Code wird von Visual Basic hinzugefügt, um das Dispose-Muster
- ' richtig zu implementieren.
- Public Sub Dispose() Implements IDisposable.Dispose
- ' Sie sollten diesen Code nicht ändern, sondern stattdessen ihren
- ' Bereinigungscode oben in
- ' Dispose(ByVal disposing As Boolean) einfügen.
- Dispose(True)
- GC.SuppressFinalize(Me)
- End Sub
-
- Protected Overrides Sub Finalize()
- MyBase.Finalize()
- Dispose(False)
- End Sub
-#End Region
-End Class
diff --git a/Automation/Form1.Designer.vb b/Automation/Form1.Designer.vb
deleted file mode 100644
index bf87eeb8..00000000
--- a/Automation/Form1.Designer.vb
+++ /dev/null
@@ -1,235 +0,0 @@
-
-Partial Class Form1
- Inherits System.Windows.Forms.Form
-
- 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
-
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- Try
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- Finally
- MyBase.Dispose(disposing)
- End Try
- End Sub
-
- 'Wird vom Windows Form-Designer benötigt.
- Private components As System.ComponentModel.IContainer
-
- 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
- 'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
- 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
-
- Private Sub InitializeComponent()
- Me.components = New System.ComponentModel.Container()
- Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
- Me.TextBox1 = New System.Windows.Forms.TextBox()
- Me.Label4 = New System.Windows.Forms.Label()
- Me.Label5 = New System.Windows.Forms.Label()
- Me.Label6 = New System.Windows.Forms.Label()
- Me.Label7 = New System.Windows.Forms.Label()
- Me.TextBox9 = New System.Windows.Forms.TextBox()
- Me.TextBox10 = New System.Windows.Forms.TextBox()
- Me.TextBox11 = New System.Windows.Forms.TextBox()
- Me.TextBox12 = New System.Windows.Forms.TextBox()
- Me.Label21 = New System.Windows.Forms.Label()
- Me.TextBox6 = New System.Windows.Forms.TextBox()
- Me.TextBox7 = New System.Windows.Forms.TextBox()
- Me.TextBox8 = New System.Windows.Forms.TextBox()
- Me.ComboBox1 = New System.Windows.Forms.ComboBox()
- Me.Label1 = New System.Windows.Forms.Label()
- Me.TextBox3 = New System.Windows.Forms.TextBox()
- Me.Label3 = New System.Windows.Forms.Label()
- Me.SuspendLayout()
- '
- 'TextBox1
- '
- Me.TextBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
- Me.TextBox1.Location = New System.Drawing.Point(12, 12)
- Me.TextBox1.Name = "TextBox1"
- Me.TextBox1.Size = New System.Drawing.Size(100, 20)
- Me.TextBox1.TabIndex = 0
- Me.TextBox1.Text = "Top Left"
- '
- 'Label4
- '
- Me.Label4.AutoSize = True
- Me.Label4.Location = New System.Drawing.Point(183, 105)
- Me.Label4.Name = "Label4"
- Me.Label4.Size = New System.Drawing.Size(25, 13)
- Me.Label4.TabIndex = 6
- Me.Label4.Text = "Left"
- '
- 'Label5
- '
- Me.Label5.AutoSize = True
- Me.Label5.Location = New System.Drawing.Point(183, 183)
- Me.Label5.Name = "Label5"
- Me.Label5.Size = New System.Drawing.Size(40, 13)
- Me.Label5.TabIndex = 6
- Me.Label5.Text = "Bottom"
- '
- 'Label6
- '
- Me.Label6.AutoSize = True
- Me.Label6.Location = New System.Drawing.Point(183, 157)
- Me.Label6.Name = "Label6"
- Me.Label6.Size = New System.Drawing.Size(26, 13)
- Me.Label6.TabIndex = 6
- Me.Label6.Text = "Top"
- '
- 'Label7
- '
- Me.Label7.AutoSize = True
- Me.Label7.Location = New System.Drawing.Point(183, 131)
- Me.Label7.Name = "Label7"
- Me.Label7.Size = New System.Drawing.Size(32, 13)
- Me.Label7.TabIndex = 6
- Me.Label7.Text = "Right"
- '
- 'TextBox9
- '
- Me.TextBox9.Location = New System.Drawing.Point(231, 102)
- Me.TextBox9.Name = "TextBox9"
- Me.TextBox9.Size = New System.Drawing.Size(100, 20)
- Me.TextBox9.TabIndex = 1
- '
- 'TextBox10
- '
- Me.TextBox10.Location = New System.Drawing.Point(231, 180)
- Me.TextBox10.Name = "TextBox10"
- Me.TextBox10.Size = New System.Drawing.Size(100, 20)
- Me.TextBox10.TabIndex = 2
- '
- 'TextBox11
- '
- Me.TextBox11.Location = New System.Drawing.Point(231, 154)
- Me.TextBox11.Name = "TextBox11"
- Me.TextBox11.Size = New System.Drawing.Size(100, 20)
- Me.TextBox11.TabIndex = 3
- '
- 'TextBox12
- '
- Me.TextBox12.Location = New System.Drawing.Point(231, 128)
- Me.TextBox12.Name = "TextBox12"
- Me.TextBox12.Size = New System.Drawing.Size(100, 20)
- Me.TextBox12.TabIndex = 4
- '
- 'Label21
- '
- Me.Label21.AutoSize = True
- Me.Label21.Location = New System.Drawing.Point(183, 77)
- Me.Label21.Name = "Label21"
- Me.Label21.Size = New System.Drawing.Size(115, 13)
- Me.Label21.TabIndex = 8
- Me.Label21.Text = "CURRENT CONTROL"
- '
- 'TextBox6
- '
- Me.TextBox6.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
- Me.TextBox6.Location = New System.Drawing.Point(12, 298)
- Me.TextBox6.Name = "TextBox6"
- Me.TextBox6.Size = New System.Drawing.Size(100, 20)
- Me.TextBox6.TabIndex = 0
- Me.TextBox6.Text = "Bottom Left"
- '
- 'TextBox7
- '
- Me.TextBox7.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
- Me.TextBox7.Location = New System.Drawing.Point(255, 12)
- Me.TextBox7.Name = "TextBox7"
- Me.TextBox7.Size = New System.Drawing.Size(100, 20)
- Me.TextBox7.TabIndex = 0
- Me.TextBox7.Text = "TopRight"
- '
- 'TextBox8
- '
- Me.TextBox8.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
- Me.TextBox8.Location = New System.Drawing.Point(255, 298)
- Me.TextBox8.Name = "TextBox8"
- Me.TextBox8.Size = New System.Drawing.Size(100, 20)
- Me.TextBox8.TabIndex = 0
- Me.TextBox8.Text = "BottomRight"
- '
- 'ComboBox1
- '
- Me.ComboBox1.FormattingEnabled = True
- Me.ComboBox1.Items.AddRange(New Object() {"TopLeft", "TopRight", "BottomLeft", "BottomRight"})
- Me.ComboBox1.Location = New System.Drawing.Point(30, 102)
- Me.ComboBox1.Name = "ComboBox1"
- Me.ComboBox1.Size = New System.Drawing.Size(121, 21)
- Me.ComboBox1.TabIndex = 9
- '
- 'Label1
- '
- Me.Label1.AutoSize = True
- Me.Label1.Location = New System.Drawing.Point(27, 86)
- Me.Label1.Name = "Label1"
- Me.Label1.Size = New System.Drawing.Size(41, 13)
- Me.Label1.TabIndex = 8
- Me.Label1.Text = "Anchor"
- '
- 'TextBox3
- '
- Me.TextBox3.Location = New System.Drawing.Point(231, 206)
- Me.TextBox3.Name = "TextBox3"
- Me.TextBox3.Size = New System.Drawing.Size(100, 20)
- Me.TextBox3.TabIndex = 2
- '
- 'Label3
- '
- Me.Label3.AutoSize = True
- Me.Label3.Location = New System.Drawing.Point(183, 209)
- Me.Label3.Name = "Label3"
- Me.Label3.Size = New System.Drawing.Size(41, 13)
- Me.Label3.TabIndex = 6
- Me.Label3.Text = "Anchor"
- '
- 'Form1
- '
- Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.ClientSize = New System.Drawing.Size(367, 330)
- Me.Controls.Add(Me.ComboBox1)
- Me.Controls.Add(Me.Label1)
- Me.Controls.Add(Me.Label21)
- Me.Controls.Add(Me.Label7)
- Me.Controls.Add(Me.Label6)
- Me.Controls.Add(Me.Label3)
- Me.Controls.Add(Me.Label5)
- Me.Controls.Add(Me.Label4)
- Me.Controls.Add(Me.TextBox12)
- Me.Controls.Add(Me.TextBox3)
- Me.Controls.Add(Me.TextBox11)
- Me.Controls.Add(Me.TextBox10)
- Me.Controls.Add(Me.TextBox9)
- Me.Controls.Add(Me.TextBox6)
- Me.Controls.Add(Me.TextBox8)
- Me.Controls.Add(Me.TextBox7)
- Me.Controls.Add(Me.TextBox1)
- Me.Name = "Form1"
- Me.Text = "Form1"
- Me.ResumeLayout(False)
- Me.PerformLayout()
-
- End Sub
- Friend WithEvents Timer1 As Timer
- Friend WithEvents TextBox1 As TextBox
- Friend WithEvents Label4 As Label
- Friend WithEvents Label5 As Label
- Friend WithEvents Label6 As Label
- Friend WithEvents Label7 As Label
- Friend WithEvents TextBox9 As TextBox
- Friend WithEvents TextBox10 As TextBox
- Friend WithEvents TextBox11 As TextBox
- Friend WithEvents TextBox12 As TextBox
- Friend WithEvents Label21 As Label
- Friend WithEvents TextBox6 As TextBox
- Friend WithEvents TextBox7 As TextBox
- Friend WithEvents TextBox8 As TextBox
- Friend WithEvents ComboBox1 As ComboBox
- Friend WithEvents Label1 As Label
- Friend WithEvents TextBox3 As TextBox
- Friend WithEvents Label3 As Label
-End Class
diff --git a/Automation/Form1.resx b/Automation/Form1.resx
deleted file mode 100644
index d0d99f42..00000000
--- a/Automation/Form1.resx
+++ /dev/null
@@ -1,123 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- 17, 17
-
-
\ No newline at end of file
diff --git a/Automation/Form1.vb b/Automation/Form1.vb
deleted file mode 100644
index 0ad2f9b4..00000000
--- a/Automation/Form1.vb
+++ /dev/null
@@ -1,48 +0,0 @@
-Imports System.Runtime.InteropServices
-Imports DigitalData.Modules.Logging
-Imports DigitalData.Modules.Windows
-
-Public Class Form1
- Private Logger As Logger
- Private LogConfig As LogConfig
-
- Private Watcher As ClassClipboardWatcher
- Private Window As Window
-
- Private CurrentAnchor As Window.Anchor = Window.Anchor.TopLeft
-
- Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- Timer1.Interval = 1000
- Timer1.Enabled = True
-
- LogConfig = New LogConfig(LogConfig.PathType.AppData)
- Logger = LogConfig.GetLogger()
- Window = New Window(LogConfig)
-
- Watcher = ClassClipboardWatcher.Singleton
- AddHandler Watcher.ClipboardChanged, AddressOf Watcher_ClipboardChanged
- End Sub
-
- Private Sub Watcher_ClipboardChanged(sender As Object, e As IDataObject)
- Dim oControl As Window.RectangleInfo = Window.GetFocusedControlLocation(Handle, CurrentAnchor)
-
- TextBox9.Text = oControl.Left
- TextBox12.Text = oControl.Right
- TextBox11.Text = oControl.Top
- TextBox10.Text = oControl.Bottom
- TextBox3.Text = ComboBox1.Text.ToUpper
- End Sub
-
- Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
- Select Case ComboBox1.Text
- Case "TopLeft"
- CurrentAnchor = Window.Anchor.TopLeft
- Case "TopRight"
- CurrentAnchor = Window.Anchor.TopRight
- Case "BottomLeft"
- CurrentAnchor = Window.Anchor.BottomLeft
- Case "BottomRight"
- CurrentAnchor = Window.Anchor.BottomRight
- End Select
- End Sub
-End Class
diff --git a/Automation/My Project/Application.Designer.vb b/Automation/My Project/Application.Designer.vb
deleted file mode 100644
index 79646505..00000000
--- a/Automation/My Project/Application.Designer.vb
+++ /dev/null
@@ -1,38 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' This code was generated by a tool.
-' Runtime Version:4.0.30319.42000
-'
-' Changes to this file may cause incorrect behavior and will be lost if
-' the code is regenerated.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- 'NOTE: This file is auto-generated; do not modify it directly. To make changes,
- ' or if you encounter build errors in this file, go to the Project Designer
- ' (go to Project Properties or double-click the My Project node in
- ' Solution Explorer), and make changes on the Application tab.
- '
- Partial Friend Class MyApplication
-
- _
- Public Sub New()
- MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
- Me.IsSingleInstance = false
- Me.EnableVisualStyles = true
- Me.SaveMySettingsOnExit = true
- Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
- End Sub
-
- _
- Protected Overrides Sub OnCreateMainForm()
- Me.MainForm = Global.Automation.Form1
- End Sub
- End Class
-End Namespace
diff --git a/Automation/My Project/Application.myapp b/Automation/My Project/Application.myapp
deleted file mode 100644
index 1243847f..00000000
--- a/Automation/My Project/Application.myapp
+++ /dev/null
@@ -1,11 +0,0 @@
-
-
- true
- Form1
- false
- 0
- true
- 0
- 0
- true
-
diff --git a/Automation/My Project/AssemblyInfo.vb b/Automation/My Project/AssemblyInfo.vb
deleted file mode 100644
index da3bda89..00000000
--- a/Automation/My Project/AssemblyInfo.vb
+++ /dev/null
@@ -1,35 +0,0 @@
-Imports System
-Imports System.Reflection
-Imports System.Runtime.InteropServices
-
-' Allgemeine Informationen über eine Assembly werden über die folgenden
-' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
-' die einer Assembly zugeordnet sind.
-
-' Werte der Assemblyattribute überprüfen
-
-
-
-
-
-
-
-
-
-
-'Die folgende GUID bestimmt die ID der Typbibliothek, wenn dieses Projekt für COM verfügbar gemacht wird.
-
-
-' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
-'
-' Hauptversion
-' Nebenversion
-' Buildnummer
-' Revision
-'
-' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
-' übernehmen, indem Sie "*" eingeben:
-'
-
-
-
diff --git a/Automation/My Project/Resources.Designer.vb b/Automation/My Project/Resources.Designer.vb
deleted file mode 100644
index 3ed5a386..00000000
--- a/Automation/My Project/Resources.Designer.vb
+++ /dev/null
@@ -1,62 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' This code was generated by a tool.
-' Runtime Version:4.0.30319.42000
-'
-' Changes to this file may cause incorrect behavior and will be lost if
-' the code is regenerated.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My.Resources
-
- 'This class was auto-generated by the StronglyTypedResourceBuilder
- 'class via a tool like ResGen or Visual Studio.
- 'To add or remove a member, edit your .ResX file then rerun ResGen
- 'with the /str option, or rebuild your VS project.
- '''
- ''' A strongly-typed resource class, for looking up localized strings, etc.
- '''
- _
- Friend Module Resources
-
- Private resourceMan As Global.System.Resources.ResourceManager
-
- Private resourceCulture As Global.System.Globalization.CultureInfo
-
- '''
- ''' Returns the cached ResourceManager instance used by this class.
- '''
- _
- Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
- Get
- If Object.ReferenceEquals(resourceMan, Nothing) Then
- Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("Automation.Resources", GetType(Resources).Assembly)
- resourceMan = temp
- End If
- Return resourceMan
- End Get
- End Property
-
- '''
- ''' Overrides the current thread's CurrentUICulture property for all
- ''' resource lookups using this strongly typed resource class.
- '''
- _
- Friend Property Culture() As Global.System.Globalization.CultureInfo
- Get
- Return resourceCulture
- End Get
- Set(ByVal value As Global.System.Globalization.CultureInfo)
- resourceCulture = value
- End Set
- End Property
- End Module
-End Namespace
diff --git a/Automation/My Project/Settings.Designer.vb b/Automation/My Project/Settings.Designer.vb
deleted file mode 100644
index 8c88c5f6..00000000
--- a/Automation/My Project/Settings.Designer.vb
+++ /dev/null
@@ -1,73 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' This code was generated by a tool.
-' Runtime Version:4.0.30319.42000
-'
-' Changes to this file may cause incorrect behavior and will be lost if
-' the code is regenerated.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- _
- Partial Friend NotInheritable Class MySettings
- Inherits Global.System.Configuration.ApplicationSettingsBase
-
- Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings), MySettings)
-
-#Region "My.Settings Auto-Save Functionality"
-#If _MyType = "WindowsForms" Then
- Private Shared addedHandler As Boolean
-
- Private Shared addedHandlerLockObject As New Object
-
- _
- Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
- If My.Application.SaveMySettingsOnExit Then
- My.Settings.Save()
- End If
- End Sub
-#End If
-#End Region
-
- Public Shared ReadOnly Property [Default]() As MySettings
- Get
-
-#If _MyType = "WindowsForms" Then
- If Not addedHandler Then
- SyncLock addedHandlerLockObject
- If Not addedHandler Then
- AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
- addedHandler = True
- End If
- End SyncLock
- End If
-#End If
- Return defaultInstance
- End Get
- End Property
- End Class
-End Namespace
-
-Namespace My
-
- _
- Friend Module MySettingsProperty
-
- _
- Friend ReadOnly Property Settings() As Global.Automation.My.MySettings
- Get
- Return Global.Automation.My.MySettings.Default
- End Get
- End Property
- End Module
-End Namespace
diff --git a/Modules.Base/Base/Base.vbproj b/Base/Base.vbproj
similarity index 88%
rename from Modules.Base/Base/Base.vbproj
rename to Base/Base.vbproj
index 9a6697eb..5dfb5f21 100644
--- a/Modules.Base/Base/Base.vbproj
+++ b/Base/Base.vbproj
@@ -45,8 +45,17 @@
On
+
+
+ ..\packages\NLog.4.7.15\lib\net45\NLog.dll
+
+
+
+
+
+
@@ -105,12 +114,13 @@
My
Settings.Designer.vb
+
-
+
{903b2d7d-3b80-4be9-8713-7447b704e1b0}
Logging
diff --git a/Modules.Base/Base/BaseClass.vb b/Base/BaseClass.vb
similarity index 100%
rename from Modules.Base/Base/BaseClass.vb
rename to Base/BaseClass.vb
diff --git a/Modules.Base/Base/ECM.vb b/Base/ECM.vb
similarity index 100%
rename from Modules.Base/Base/ECM.vb
rename to Base/ECM.vb
diff --git a/Modules.Base/Base/IDB/Attributes.vb b/Base/IDB/Attributes.vb
similarity index 100%
rename from Modules.Base/Base/IDB/Attributes.vb
rename to Base/IDB/Attributes.vb
diff --git a/Modules.Base/Base/IDB/Database.vb b/Base/IDB/Database.vb
similarity index 100%
rename from Modules.Base/Base/IDB/Database.vb
rename to Base/IDB/Database.vb
diff --git a/Modules.Base/Base/IDB/FileStore.vb b/Base/IDB/FileStore.vb
similarity index 100%
rename from Modules.Base/Base/IDB/FileStore.vb
rename to Base/IDB/FileStore.vb
diff --git a/Controls.ChatAddUser/My Project/Application.Designer.vb b/Base/My Project/Application.Designer.vb
similarity index 100%
rename from Controls.ChatAddUser/My Project/Application.Designer.vb
rename to Base/My Project/Application.Designer.vb
diff --git a/Config.Test/My Project/Application.myapp b/Base/My Project/Application.myapp
similarity index 100%
rename from Config.Test/My Project/Application.myapp
rename to Base/My Project/Application.myapp
diff --git a/Modules.Base/Base/My Project/AssemblyInfo.vb b/Base/My Project/AssemblyInfo.vb
similarity index 100%
rename from Modules.Base/Base/My Project/AssemblyInfo.vb
rename to Base/My Project/AssemblyInfo.vb
diff --git a/Modules.Base/Base/My Project/Resources.Designer.vb b/Base/My Project/Resources.Designer.vb
similarity index 100%
rename from Modules.Base/Base/My Project/Resources.Designer.vb
rename to Base/My Project/Resources.Designer.vb
diff --git a/Automation/My Project/Resources.resx b/Base/My Project/Resources.resx
similarity index 100%
rename from Automation/My Project/Resources.resx
rename to Base/My Project/Resources.resx
diff --git a/Modules.Base/Base/My Project/Settings.Designer.vb b/Base/My Project/Settings.Designer.vb
similarity index 100%
rename from Modules.Base/Base/My Project/Settings.Designer.vb
rename to Base/My Project/Settings.Designer.vb
diff --git a/Automation/My Project/Settings.settings b/Base/My Project/Settings.settings
similarity index 100%
rename from Automation/My Project/Settings.settings
rename to Base/My Project/Settings.settings
diff --git a/Modules.Base/Base/README.txt b/Base/README.txt
similarity index 100%
rename from Modules.Base/Base/README.txt
rename to Base/README.txt
diff --git a/Base/packages.config b/Base/packages.config
new file mode 100644
index 00000000..208d98d7
--- /dev/null
+++ b/Base/packages.config
@@ -0,0 +1,4 @@
+
+
+
+
\ No newline at end of file
diff --git a/ChatTest/App.config b/ChatTest/App.config
deleted file mode 100644
index 40890fbc..00000000
--- a/ChatTest/App.config
+++ /dev/null
@@ -1,14 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/ChatTest/ChatTest.vbproj b/ChatTest/ChatTest.vbproj
deleted file mode 100644
index b23f8955..00000000
--- a/ChatTest/ChatTest.vbproj
+++ /dev/null
@@ -1,157 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {4A726345-FD6B-4E1C-9E5D-18C9043D7714}
- WinExe
- ChatTest.My.MyApplication
- ChatTest
- ChatTest
- 512
- WindowsForms
- v4.7.2
- true
- true
-
-
- AnyCPU
- true
- full
- true
- true
- bin\Debug\
- ChatTest.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- AnyCPU
- pdbonly
- false
- true
- true
- bin\Release\
- ChatTest.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
-
-
-
-
-
-
- False
- ..\Modules.Database\bin\Debug\DigitalData.Modules.Database.dll
-
-
-
- ..\packages\NLog.4.7.5\lib\net45\NLog.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- Form
-
-
- Form1.vb
- Form
-
-
-
- True
- Application.myapp
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- Form1.vb
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
-
- {1f278760-4f6b-42e8-b82d-01d4c8618340}
- ChatControl
-
-
- {86d27ffa-480f-481d-8d23-26deae92fe6c}
- ChatNewConv
-
-
- {903b2d7d-3b80-4be9-8713-7447b704e1b0}
- Logging
-
-
-
-
\ No newline at end of file
diff --git a/ChatTest/ChatTest.vbproj.bak b/ChatTest/ChatTest.vbproj.bak
deleted file mode 100644
index 02abdc1d..00000000
--- a/ChatTest/ChatTest.vbproj.bak
+++ /dev/null
@@ -1,156 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {4A726345-FD6B-4E1C-9E5D-18C9043D7714}
- WinExe
- ChatTest.My.MyApplication
- ChatTest
- ChatTest
- 512
- WindowsForms
- v4.7.2
- true
- true
-
-
- AnyCPU
- true
- full
- true
- true
- bin\Debug\
- ChatTest.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- AnyCPU
- pdbonly
- false
- true
- true
- bin\Release\
- ChatTest.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
-
-
-
-
-
- False
- ..\Modules.Database\bin\Debug\DigitalData.Modules.Database.dll
-
-
-
- ..\packages\NLog.4.7.5\lib\net45\NLog.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- Form
-
-
- Form1.vb
- Form
-
-
-
- True
- Application.myapp
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- Form1.vb
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
-
- {1f278760-4f6b-42e8-b82d-01d4c8618340}
- ChatControl
-
-
- {86d27ffa-480f-481d-8d23-26deae92fe6c}
- ChatNewConv
-
-
- {903b2d7d-3b80-4be9-8713-7447b704e1b0}
- Logging
-
-
-
-
\ No newline at end of file
diff --git a/ChatTest/Form1.Designer.vb b/ChatTest/Form1.Designer.vb
deleted file mode 100644
index 93ba99c3..00000000
--- a/ChatTest/Form1.Designer.vb
+++ /dev/null
@@ -1,60 +0,0 @@
- _
-Partial Class Form1
- Inherits System.Windows.Forms.Form
-
- 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
- _
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- Try
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- Finally
- MyBase.Dispose(disposing)
- End Try
- End Sub
-
- 'Wird vom Windows Form-Designer benötigt.
- Private components As System.ComponentModel.IContainer
-
- 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
- 'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
- 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
- _
- Private Sub InitializeComponent()
- Me.ChatNewConv1 = New DigitalData.Controls.ChatNewConv.ChatNewConv()
- Me.ChatControl1 = New DigitalData.Controls.ChatControl.ChatControl()
- Me.SuspendLayout()
- '
- 'ChatNewConv1
- '
- Me.ChatNewConv1.Font = New System.Drawing.Font("Tahoma", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.ChatNewConv1.Location = New System.Drawing.Point(479, 51)
- Me.ChatNewConv1.Name = "ChatNewConv1"
- Me.ChatNewConv1.Size = New System.Drawing.Size(497, 450)
- Me.ChatNewConv1.TabIndex = 1
- '
- 'ChatControl1
- '
- Me.ChatControl1.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.ChatControl1.Location = New System.Drawing.Point(12, 12)
- Me.ChatControl1.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
- Me.ChatControl1.Name = "ChatControl1"
- Me.ChatControl1.Size = New System.Drawing.Size(422, 587)
- Me.ChatControl1.TabIndex = 2
- '
- 'Form1
- '
- Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.ClientSize = New System.Drawing.Size(1044, 584)
- Me.Controls.Add(Me.ChatControl1)
- Me.Controls.Add(Me.ChatNewConv1)
- Me.Name = "Form1"
- Me.Text = "Form1"
- Me.ResumeLayout(False)
-
- End Sub
- Friend WithEvents ChatNewConv1 As DigitalData.Controls.ChatNewConv.ChatNewConv
- Friend WithEvents ChatControl1 As DigitalData.Controls.ChatControl.ChatControl
-End Class
diff --git a/ChatTest/Form1.resx b/ChatTest/Form1.resx
deleted file mode 100644
index 1af7de15..00000000
--- a/ChatTest/Form1.resx
+++ /dev/null
@@ -1,120 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
\ No newline at end of file
diff --git a/ChatTest/Form1.vb b/ChatTest/Form1.vb
deleted file mode 100644
index 6944a04f..00000000
--- a/ChatTest/Form1.vb
+++ /dev/null
@@ -1,23 +0,0 @@
-Imports DigitalData.Modules.Logging
-Imports DigitalData.Modules.Database
-
-Public Class Form1
- Private _Database As MSSQLServer
- Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
- Dim oLogConfig As New LogConfig(LogConfig.PathType.CustomPath, Application.StartupPath)
- Dim oConnectionString = "Server=sDD-VMP04-SQL17\DD_DEVELOP01;Database=IDB_TEST;User Id=sa;Password=dd;"
- Me._Database = New MSSQLServer(oLogConfig, oConnectionString)
- ChatControl1.Init(oLogConfig, oConnectionString, "Email", "JenneJ", "de-DE", Nothing)
- ChatControl1.GetConversations(10070,True)
- Dim oSQL = "SELECT GUID as UserID,NAME,USERNAME,EMAIL from TBDD_USER"
- Dim oDTUSERS As DataTable = _Database.GetDatatable(oSQL)
-
- ChatNewConv1.Init(oLogConfig, oConnectionString, 10070, "SchreiberM", "de-DE", oDTUSERS, Nothing)
- AddHandler ChatNewConv1.Conversation_Created, AddressOf onConversationCreated
-
- End Sub
- Sub onConversationCreated()
- MsgBox("Created")
- End Sub
-
-End Class
diff --git a/ChatTest/My Project/Application.Designer.vb b/ChatTest/My Project/Application.Designer.vb
deleted file mode 100644
index 38f9a231..00000000
--- a/ChatTest/My Project/Application.Designer.vb
+++ /dev/null
@@ -1,38 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' This code was generated by a tool.
-' Runtime Version:4.0.30319.42000
-'
-' Changes to this file may cause incorrect behavior and will be lost if
-' the code is regenerated.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- 'NOTE: This file is auto-generated; do not modify it directly. To make changes,
- ' or if you encounter build errors in this file, go to the Project Designer
- ' (go to Project Properties or double-click the My Project node in
- ' Solution Explorer), and make changes on the Application tab.
- '
- Partial Friend Class MyApplication
-
- _
- Public Sub New()
- MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
- Me.IsSingleInstance = false
- Me.EnableVisualStyles = true
- Me.SaveMySettingsOnExit = true
- Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
- End Sub
-
- _
- Protected Overrides Sub OnCreateMainForm()
- Me.MainForm = Global.ChatTest.Form1
- End Sub
- End Class
-End Namespace
diff --git a/ChatTest/My Project/Application.myapp b/ChatTest/My Project/Application.myapp
deleted file mode 100644
index 1243847f..00000000
--- a/ChatTest/My Project/Application.myapp
+++ /dev/null
@@ -1,11 +0,0 @@
-
-
- true
- Form1
- false
- 0
- true
- 0
- 0
- true
-
diff --git a/ChatTest/My Project/AssemblyInfo.vb b/ChatTest/My Project/AssemblyInfo.vb
deleted file mode 100644
index e68bf074..00000000
--- a/ChatTest/My Project/AssemblyInfo.vb
+++ /dev/null
@@ -1,35 +0,0 @@
-Imports System
-Imports System.Reflection
-Imports System.Runtime.InteropServices
-
-' Allgemeine Informationen über eine Assembly werden über die folgenden
-' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
-' die einer Assembly zugeordnet sind.
-
-' Werte der Assemblyattribute überprüfen
-
-
-
-
-
-
-
-
-
-
-'Die folgende GUID wird für die typelib-ID verwendet, wenn dieses Projekt für COM verfügbar gemacht wird.
-
-
-' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
-'
-' Hauptversion
-' Nebenversion
-' Buildnummer
-' Revision
-'
-' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
-' indem Sie "*" wie unten gezeigt eingeben:
-'
-
-
-
diff --git a/ChatTest/My Project/Resources.Designer.vb b/ChatTest/My Project/Resources.Designer.vb
deleted file mode 100644
index f6ce9da5..00000000
--- a/ChatTest/My Project/Resources.Designer.vb
+++ /dev/null
@@ -1,62 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' This code was generated by a tool.
-' Runtime Version:4.0.30319.42000
-'
-' Changes to this file may cause incorrect behavior and will be lost if
-' the code is regenerated.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My.Resources
-
- 'This class was auto-generated by the StronglyTypedResourceBuilder
- 'class via a tool like ResGen or Visual Studio.
- 'To add or remove a member, edit your .ResX file then rerun ResGen
- 'with the /str option, or rebuild your VS project.
- '''
- ''' A strongly-typed resource class, for looking up localized strings, etc.
- '''
- _
- Friend Module Resources
-
- Private resourceMan As Global.System.Resources.ResourceManager
-
- Private resourceCulture As Global.System.Globalization.CultureInfo
-
- '''
- ''' Returns the cached ResourceManager instance used by this class.
- '''
- _
- Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
- Get
- If Object.ReferenceEquals(resourceMan, Nothing) Then
- Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("ChatTest.Resources", GetType(Resources).Assembly)
- resourceMan = temp
- End If
- Return resourceMan
- End Get
- End Property
-
- '''
- ''' Overrides the current thread's CurrentUICulture property for all
- ''' resource lookups using this strongly typed resource class.
- '''
- _
- Friend Property Culture() As Global.System.Globalization.CultureInfo
- Get
- Return resourceCulture
- End Get
- Set(ByVal value As Global.System.Globalization.CultureInfo)
- resourceCulture = value
- End Set
- End Property
- End Module
-End Namespace
diff --git a/ChatTest/My Project/Settings.Designer.vb b/ChatTest/My Project/Settings.Designer.vb
deleted file mode 100644
index 2b89d282..00000000
--- a/ChatTest/My Project/Settings.Designer.vb
+++ /dev/null
@@ -1,73 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' This code was generated by a tool.
-' Runtime Version:4.0.30319.42000
-'
-' Changes to this file may cause incorrect behavior and will be lost if
-' the code is regenerated.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- _
- Partial Friend NotInheritable Class MySettings
- Inherits Global.System.Configuration.ApplicationSettingsBase
-
- Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings), MySettings)
-
-#Region "My.Settings Auto-Save Functionality"
-#If _MyType = "WindowsForms" Then
- Private Shared addedHandler As Boolean
-
- Private Shared addedHandlerLockObject As New Object
-
- _
- Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
- If My.Application.SaveMySettingsOnExit Then
- My.Settings.Save()
- End If
- End Sub
-#End If
-#End Region
-
- Public Shared ReadOnly Property [Default]() As MySettings
- Get
-
-#If _MyType = "WindowsForms" Then
- If Not addedHandler Then
- SyncLock addedHandlerLockObject
- If Not addedHandler Then
- AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
- addedHandler = True
- End If
- End SyncLock
- End If
-#End If
- Return defaultInstance
- End Get
- End Property
- End Class
-End Namespace
-
-Namespace My
-
- _
- Friend Module MySettingsProperty
-
- _
- Friend ReadOnly Property Settings() As Global.ChatTest.My.MySettings
- Get
- Return Global.ChatTest.My.MySettings.Default
- End Get
- End Property
- End Module
-End Namespace
diff --git a/ChatTest/packages.config b/ChatTest/packages.config
deleted file mode 100644
index e305f91b..00000000
--- a/ChatTest/packages.config
+++ /dev/null
@@ -1,4 +0,0 @@
-
-
-
-
\ No newline at end of file
diff --git a/Config.Test/Config.Test.vbproj b/Config.Test/Config.Test.vbproj
deleted file mode 100644
index b5855511..00000000
--- a/Config.Test/Config.Test.vbproj
+++ /dev/null
@@ -1,128 +0,0 @@
-
-
-
-
-
- Debug
- AnyCPU
- {B9A63193-1391-4E20-B578-0867F330396C}
- Library
- Config.Test
- Config.Test
- 512
- Windows
- v4.6.1
- {3AC096D0-A1C2-E12C-1390-A8335801FDAB};{F184B08F-C81C-45F6-A57F-5ABD9991F28F}
- 10.0
- $(MSBuildExtensionsPath32)\Microsoft\VisualStudio\v$(VisualStudioVersion)
- $(ProgramFiles)\Common Files\microsoft shared\VSTT\$(VisualStudioVersion)\UITestExtensionPackages
- False
- UnitTest
-
-
-
-
- true
- full
- true
- true
- bin\Debug\
- Config.Test.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- pdbonly
- false
- true
- true
- bin\Release\
- Config.Test.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
- ..\packages\MSTest.TestFramework.2.1.1\lib\net45\Microsoft.VisualStudio.TestPlatform.TestFramework.dll
-
-
- ..\packages\MSTest.TestFramework.2.1.1\lib\net45\Microsoft.VisualStudio.TestPlatform.TestFramework.Extensions.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- True
- Application.myapp
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
-
-
- Dieses Projekt verweist auf mindestens ein NuGet-Paket, das auf diesem Computer fehlt. Verwenden Sie die Wiederherstellung von NuGet-Paketen, um die fehlenden Dateien herunterzuladen. Weitere Informationen finden Sie unter "http://go.microsoft.com/fwlink/?LinkID=322105". Die fehlende Datei ist "{0}".
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Config.Test/My Project/Application.Designer.vb b/Config.Test/My Project/Application.Designer.vb
deleted file mode 100644
index 88dd01c7..00000000
--- a/Config.Test/My Project/Application.Designer.vb
+++ /dev/null
@@ -1,13 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' This code was generated by a tool.
-' Runtime Version:4.0.30319.42000
-'
-' Changes to this file may cause incorrect behavior and will be lost if
-' the code is regenerated.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
diff --git a/Config.Test/My Project/AssemblyInfo.vb b/Config.Test/My Project/AssemblyInfo.vb
deleted file mode 100644
index 4ed4c761..00000000
--- a/Config.Test/My Project/AssemblyInfo.vb
+++ /dev/null
@@ -1,18 +0,0 @@
-Imports System
-Imports System.Reflection
-Imports System.Runtime.InteropServices
-
-
-
-
-
-
-
-
-
-
-
-
-'
-
-
diff --git a/Config.Test/My Project/Resources.Designer.vb b/Config.Test/My Project/Resources.Designer.vb
deleted file mode 100644
index d40c03ff..00000000
--- a/Config.Test/My Project/Resources.Designer.vb
+++ /dev/null
@@ -1,62 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' This code was generated by a tool.
-' Runtime Version:4.0.30319.42000
-'
-' Changes to this file may cause incorrect behavior and will be lost if
-' the code is regenerated.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My.Resources
-
- 'This class was auto-generated by the StronglyTypedResourceBuilder
- 'class via a tool like ResGen or Visual Studio.
- 'To add or remove a member, edit your .ResX file then rerun ResGen
- 'with the /str option, or rebuild your VS project.
- '''
- ''' A strongly-typed resource class, for looking up localized strings, etc.
- '''
- _
- Friend Module Resources
-
- Private resourceMan As Global.System.Resources.ResourceManager
-
- Private resourceCulture As Global.System.Globalization.CultureInfo
-
- '''
- ''' Returns the cached ResourceManager instance used by this class.
- '''
- _
- Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
- Get
- If Object.ReferenceEquals(resourceMan, Nothing) Then
- Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("Config.Test.Resources", GetType(Resources).Assembly)
- resourceMan = temp
- End If
- Return resourceMan
- End Get
- End Property
-
- '''
- ''' Overrides the current thread's CurrentUICulture property for all
- ''' resource lookups using this strongly typed resource class.
- '''
- _
- Friend Property Culture() As Global.System.Globalization.CultureInfo
- Get
- Return resourceCulture
- End Get
- Set(ByVal value As Global.System.Globalization.CultureInfo)
- resourceCulture = value
- End Set
- End Property
- End Module
-End Namespace
diff --git a/Config.Test/My Project/Settings.Designer.vb b/Config.Test/My Project/Settings.Designer.vb
deleted file mode 100644
index a8768989..00000000
--- a/Config.Test/My Project/Settings.Designer.vb
+++ /dev/null
@@ -1,73 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' This code was generated by a tool.
-' Runtime Version:4.0.30319.42000
-'
-' Changes to this file may cause incorrect behavior and will be lost if
-' the code is regenerated.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- _
- Partial Friend NotInheritable Class MySettings
- Inherits Global.System.Configuration.ApplicationSettingsBase
-
- Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings), MySettings)
-
-#Region "My.Settings Auto-Save Functionality"
-#If _MyType = "WindowsForms" Then
- Private Shared addedHandler As Boolean
-
- Private Shared addedHandlerLockObject As New Object
-
- _
- Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
- If My.Application.SaveMySettingsOnExit Then
- My.Settings.Save()
- End If
- End Sub
-#End If
-#End Region
-
- Public Shared ReadOnly Property [Default]() As MySettings
- Get
-
-#If _MyType = "WindowsForms" Then
- If Not addedHandler Then
- SyncLock addedHandlerLockObject
- If Not addedHandler Then
- AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
- addedHandler = True
- End If
- End SyncLock
- End If
-#End If
- Return defaultInstance
- End Get
- End Property
- End Class
-End Namespace
-
-Namespace My
-
- _
- Friend Module MySettingsProperty
-
- _
- Friend ReadOnly Property Settings() As Global.Config.Test.My.MySettings
- Get
- Return Global.Config.Test.My.MySettings.Default
- End Get
- End Property
- End Module
-End Namespace
diff --git a/Config.Test/UnitTest1.vb b/Config.Test/UnitTest1.vb
deleted file mode 100644
index 9dd9a080..00000000
--- a/Config.Test/UnitTest1.vb
+++ /dev/null
@@ -1,9 +0,0 @@
-Imports System.Text
-Imports Microsoft.VisualStudio.TestTools.UnitTesting
-
- Public Class UnitTest1
-
- Public Sub TestMethod1()
- End Sub
-
-End Class
\ No newline at end of file
diff --git a/Config.Test/packages.config b/Config.Test/packages.config
deleted file mode 100644
index 6eebc361..00000000
--- a/Config.Test/packages.config
+++ /dev/null
@@ -1,5 +0,0 @@
-
-
-
-
-
\ No newline at end of file
diff --git a/Modules.Config/Config.vbproj b/Config/Config.vbproj
similarity index 96%
rename from Modules.Config/Config.vbproj
rename to Config/Config.vbproj
index 1d94a8cb..7fceb8f9 100644
--- a/Modules.Config/Config.vbproj
+++ b/Config/Config.vbproj
@@ -45,7 +45,7 @@
- ..\packages\NLog.4.7.10\lib\net45\NLog.dll
+ ..\packages\NLog.4.7.15\lib\net45\NLog.dll
@@ -118,11 +118,11 @@
{8a8f20fc-c46e-41ac-bee7-218366cfff99}
Encryption
-
+
{991d0231-4623-496d-8bd0-9ca906029cbc}
Filesystem
-
+
{903b2d7d-3b80-4be9-8713-7447b704e1b0}
Logging
diff --git a/Modules.Config/ConfigAttributes.vb b/Config/ConfigAttributes.vb
similarity index 100%
rename from Modules.Config/ConfigAttributes.vb
rename to Config/ConfigAttributes.vb
diff --git a/Modules.Config/ConfigManager.vb b/Config/ConfigManager.vb
similarity index 100%
rename from Modules.Config/ConfigManager.vb
rename to Config/ConfigManager.vb
diff --git a/Modules.Config/ConfigSample.vb b/Config/ConfigSample.vb
similarity index 100%
rename from Modules.Config/ConfigSample.vb
rename to Config/ConfigSample.vb
diff --git a/Modules.Config/ConfigUtils.vb b/Config/ConfigUtils.vb
similarity index 100%
rename from Modules.Config/ConfigUtils.vb
rename to Config/ConfigUtils.vb
diff --git a/Controls.ChatControl/My Project/Application.Designer.vb b/Config/My Project/Application.Designer.vb
similarity index 100%
rename from Controls.ChatControl/My Project/Application.Designer.vb
rename to Config/My Project/Application.Designer.vb
diff --git a/Controls.ChatAddUser/My Project/Application.myapp b/Config/My Project/Application.myapp
similarity index 100%
rename from Controls.ChatAddUser/My Project/Application.myapp
rename to Config/My Project/Application.myapp
diff --git a/Modules.Config/My Project/AssemblyInfo.vb b/Config/My Project/AssemblyInfo.vb
similarity index 100%
rename from Modules.Config/My Project/AssemblyInfo.vb
rename to Config/My Project/AssemblyInfo.vb
diff --git a/Modules.Config/My Project/Resources.Designer.vb b/Config/My Project/Resources.Designer.vb
similarity index 100%
rename from Modules.Config/My Project/Resources.Designer.vb
rename to Config/My Project/Resources.Designer.vb
diff --git a/ChatTest/My Project/Resources.resx b/Config/My Project/Resources.resx
similarity index 100%
rename from ChatTest/My Project/Resources.resx
rename to Config/My Project/Resources.resx
diff --git a/Modules.Config/My Project/Settings.Designer.vb b/Config/My Project/Settings.Designer.vb
similarity index 100%
rename from Modules.Config/My Project/Settings.Designer.vb
rename to Config/My Project/Settings.Designer.vb
diff --git a/ChatTest/My Project/Settings.settings b/Config/My Project/Settings.settings
similarity index 100%
rename from ChatTest/My Project/Settings.settings
rename to Config/My Project/Settings.settings
diff --git a/Modules.Config/SampleConfig.vb b/Config/SampleConfig.vb
similarity index 100%
rename from Modules.Config/SampleConfig.vb
rename to Config/SampleConfig.vb
diff --git a/Config/packages.config b/Config/packages.config
new file mode 100644
index 00000000..208d98d7
--- /dev/null
+++ b/Config/packages.config
@@ -0,0 +1,4 @@
+
+
+
+
\ No newline at end of file
diff --git a/ConfigCreator/App.config b/ConfigCreator/App.config
deleted file mode 100644
index 30242f85..00000000
--- a/ConfigCreator/App.config
+++ /dev/null
@@ -1,59 +0,0 @@
-
-
-
-
-
-
-
-
-
-
- Skin/Office 2019 Colorful
-
-
- Fire Brick
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- UseSegoeUI
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/ConfigCreator/Config.vb b/ConfigCreator/Config.vb
deleted file mode 100644
index bacbb3e1..00000000
--- a/ConfigCreator/Config.vb
+++ /dev/null
@@ -1,15 +0,0 @@
-Public Class Config
-
- Public Property EmailTemplate As New EmailTemplateConfig
-
- Public Class EmailTemplateConfig
- Public BaseHtml As String = ""
- Public BannerUrl As String = ""
- Public OutputPath As String = ""
- Public TrackingLink As String = ""
- Public ActiveDirectoryGroup As String = ""
- Public ActiveDirectoryRoot As String = ""
- End Class
-End Class
-
-
diff --git a/ConfigCreator/MonoRepoUtils.vbproj b/ConfigCreator/MonoRepoUtils.vbproj
deleted file mode 100644
index 06629cda..00000000
--- a/ConfigCreator/MonoRepoUtils.vbproj
+++ /dev/null
@@ -1,170 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {9D4AC920-C78E-41C3-994E-91690FF79380}
- WinExe
- DigitalData.GUIs.MonoRepoUtils.My.MyApplication
- DigitalData.GUIs.MonoRepoUtils
- DigitalData.GUIs.MonoRepoUtils
- 512
- WindowsForms
- v4.6.1
- true
- true
-
-
- AnyCPU
- true
- full
- true
- true
- bin\Debug\
- DigitalData.GUIs.MonoRepoUtils.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- AnyCPU
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.GUIs.MonoRepoUtils.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
- mail.ico
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- frmStart.vb
-
-
- Form
-
-
-
- True
- Application.myapp
- True
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- frmStart.vb
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
- {44982f9b-6116-44e2-85d0-f39650b1ef99}
- Config
-
-
- {ab6f09bf-e794-4f6a-94bb-c97c0ba84d64}
- Interfaces
-
-
- {903b2d7d-3b80-4be9-8713-7447b704e1b0}
- Logging
-
-
- {7deec36e-ea5f-4711-ad1e-fd8894f4ad77}
- DDZUGFeRDService
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/ConfigCreator/MonoRepoUtils.vbproj.bak b/ConfigCreator/MonoRepoUtils.vbproj.bak
deleted file mode 100644
index 925add12..00000000
--- a/ConfigCreator/MonoRepoUtils.vbproj.bak
+++ /dev/null
@@ -1,165 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {9D4AC920-C78E-41C3-994E-91690FF79380}
- WinExe
- DigitalData.GUIs.MonoRepoUtils.My.MyApplication
- DigitalData.GUIs.MonoRepoUtils
- DigitalData.GUIs.MonoRepoUtils
- 512
- WindowsForms
- v4.6.1
- true
- true
-
-
- AnyCPU
- true
- full
- true
- true
- bin\Debug\
- DigitalData.GUIs.MonoRepoUtils.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- AnyCPU
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.GUIs.MonoRepoUtils.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
- mail.ico
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- frmStart.vb
-
-
- Form
-
-
-
- True
- Application.myapp
- True
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- frmStart.vb
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
- {44982f9b-6116-44e2-85d0-f39650b1ef99}
- Config
-
-
- {ab6f09bf-e794-4f6a-94bb-c97c0ba84d64}
- Interfaces
-
-
- {903b2d7d-3b80-4be9-8713-7447b704e1b0}
- Logging
-
-
- {7deec36e-ea5f-4711-ad1e-fd8894f4ad77}
- DDZUGFeRDService
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/ConfigCreator/My Project/Application.Designer.vb b/ConfigCreator/My Project/Application.Designer.vb
deleted file mode 100644
index 902a4fb6..00000000
--- a/ConfigCreator/My Project/Application.Designer.vb
+++ /dev/null
@@ -1,38 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- 'HINWEIS: Diese Datei wird automatisch generiert und darf nicht direkt bearbeitet werden. Wenn Sie Änderungen vornehmen möchten
- ' oder in dieser Datei Buildfehler auftreten, wechseln Sie zum Projekt-Designer.
- ' (Wechseln Sie dazu zu den Projekteigenschaften, oder doppelklicken Sie auf den Knoten "Mein Projekt" im
- ' Projektmappen-Explorer). Nehmen Sie auf der Registerkarte "Anwendung" entsprechende Änderungen vor.
- '
- Partial Friend Class MyApplication
-
- _
- Public Sub New()
- MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
- Me.IsSingleInstance = false
- Me.EnableVisualStyles = true
- Me.SaveMySettingsOnExit = true
- Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
- End Sub
-
- _
- Protected Overrides Sub OnCreateMainForm()
- Me.MainForm = Global.DigitalData.GUIs.MonoRepoUtils.frmStart
- End Sub
- End Class
-End Namespace
diff --git a/ConfigCreator/My Project/Application.myapp b/ConfigCreator/My Project/Application.myapp
deleted file mode 100644
index a1da81d5..00000000
--- a/ConfigCreator/My Project/Application.myapp
+++ /dev/null
@@ -1,10 +0,0 @@
-
-
- true
- frmStart
- false
- 0
- true
- 0
- true
-
\ No newline at end of file
diff --git a/ConfigCreator/My Project/AssemblyInfo.vb b/ConfigCreator/My Project/AssemblyInfo.vb
deleted file mode 100644
index 1cca034b..00000000
--- a/ConfigCreator/My Project/AssemblyInfo.vb
+++ /dev/null
@@ -1,35 +0,0 @@
-Imports System
-Imports System.Reflection
-Imports System.Runtime.InteropServices
-
-' Allgemeine Informationen über eine Assembly werden über die folgenden
-' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
-' die einer Assembly zugeordnet sind.
-
-' Werte der Assemblyattribute überprüfen
-
-
-
-
-
-
-
-
-
-
-'Die folgende GUID wird für die typelib-ID verwendet, wenn dieses Projekt für COM verfügbar gemacht wird.
-
-
-' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
-'
-' Hauptversion
-' Nebenversion
-' Buildnummer
-' Revision
-'
-' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
-' indem Sie "*" wie unten gezeigt eingeben:
-'
-
-
-
diff --git a/ConfigCreator/My Project/Resources.Designer.vb b/ConfigCreator/My Project/Resources.Designer.vb
deleted file mode 100644
index 06c64bc1..00000000
--- a/ConfigCreator/My Project/Resources.Designer.vb
+++ /dev/null
@@ -1,103 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-Imports System
-
-Namespace My.Resources
-
- 'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
- '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
- 'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
- 'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
- '''
- ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
- '''
- _
- Friend Module Resources
-
- Private resourceMan As Global.System.Resources.ResourceManager
-
- Private resourceCulture As Global.System.Globalization.CultureInfo
-
- '''
- ''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
- '''
- _
- Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
- Get
- If Object.ReferenceEquals(resourceMan, Nothing) Then
- Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DigitalData.GUIs.MonoRepoUtils.Resources", GetType(Resources).Assembly)
- resourceMan = temp
- End If
- Return resourceMan
- End Get
- End Property
-
- '''
- ''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
- ''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
- '''
- _
- Friend Property Culture() As Global.System.Globalization.CultureInfo
- Get
- Return resourceCulture
- End Get
- Set
- resourceCulture = value
- End Set
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property _3trafficlightsrimmed() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("3trafficlightsrimmed", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property defaultprinter() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("defaultprinter", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property defaultprinter1() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("defaultprinter1", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property save_as() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("save as", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
- End Module
-End Namespace
diff --git a/ConfigCreator/My Project/Resources.resx b/ConfigCreator/My Project/Resources.resx
deleted file mode 100644
index 75ba9f1c..00000000
--- a/ConfigCreator/My Project/Resources.resx
+++ /dev/null
@@ -1,133 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
- ..\Resources\defaultprinter.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\defaultprinter1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\3trafficlightsrimmed.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\save as.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
\ No newline at end of file
diff --git a/ConfigCreator/My Project/Resources.resx.bak b/ConfigCreator/My Project/Resources.resx.bak
deleted file mode 100644
index 946484ad..00000000
--- a/ConfigCreator/My Project/Resources.resx.bak
+++ /dev/null
@@ -1,133 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
- ..\Resources\defaultprinter.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\defaultprinter1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\3trafficlightsrimmed.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\save as.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
\ No newline at end of file
diff --git a/ConfigCreator/My Project/Settings.Designer.vb b/ConfigCreator/My Project/Settings.Designer.vb
deleted file mode 100644
index bbd55f77..00000000
--- a/ConfigCreator/My Project/Settings.Designer.vb
+++ /dev/null
@@ -1,73 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- _
- Partial Friend NotInheritable Class MySettings
- Inherits Global.System.Configuration.ApplicationSettingsBase
-
- Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
-
-#Region "Automatische My.Settings-Speicherfunktion"
-#If _MyType = "WindowsForms" Then
- Private Shared addedHandler As Boolean
-
- Private Shared addedHandlerLockObject As New Object
-
- _
- Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
- If My.Application.SaveMySettingsOnExit Then
- My.Settings.Save()
- End If
- End Sub
-#End If
-#End Region
-
- Public Shared ReadOnly Property [Default]() As MySettings
- Get
-
-#If _MyType = "WindowsForms" Then
- If Not addedHandler Then
- SyncLock addedHandlerLockObject
- If Not addedHandler Then
- AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
- addedHandler = True
- End If
- End SyncLock
- End If
-#End If
- Return defaultInstance
- End Get
- End Property
- End Class
-End Namespace
-
-Namespace My
-
- _
- Friend Module MySettingsProperty
-
- _
- Friend ReadOnly Property Settings() As Global.DigitalData.GUIs.MonoRepoUtils.My.MySettings
- Get
- Return Global.DigitalData.GUIs.MonoRepoUtils.My.MySettings.Default
- End Get
- End Property
- End Module
-End Namespace
diff --git a/ConfigCreator/My Project/licenses.licx b/ConfigCreator/My Project/licenses.licx
deleted file mode 100644
index 1b715a09..00000000
--- a/ConfigCreator/My Project/licenses.licx
+++ /dev/null
@@ -1,4 +0,0 @@
-DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
diff --git a/ConfigCreator/My Project/licenses.licx.bak b/ConfigCreator/My Project/licenses.licx.bak
deleted file mode 100644
index 74c5a313..00000000
--- a/ConfigCreator/My Project/licenses.licx.bak
+++ /dev/null
@@ -1,5 +0,0 @@
-DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v20.1, Version=20.1.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
diff --git a/ConfigCreator/Resources/3trafficlightsrimmed.svg b/ConfigCreator/Resources/3trafficlightsrimmed.svg
deleted file mode 100644
index 42b3cdb1..00000000
--- a/ConfigCreator/Resources/3trafficlightsrimmed.svg
+++ /dev/null
@@ -1,13 +0,0 @@
-
-
\ No newline at end of file
diff --git a/ConfigCreator/Resources/defaultprinter.svg b/ConfigCreator/Resources/defaultprinter.svg
deleted file mode 100644
index 22651c89..00000000
--- a/ConfigCreator/Resources/defaultprinter.svg
+++ /dev/null
@@ -1,18 +0,0 @@
-
-
\ No newline at end of file
diff --git a/ConfigCreator/Resources/defaultprinter1.svg b/ConfigCreator/Resources/defaultprinter1.svg
deleted file mode 100644
index 22651c89..00000000
--- a/ConfigCreator/Resources/defaultprinter1.svg
+++ /dev/null
@@ -1,18 +0,0 @@
-
-
\ No newline at end of file
diff --git a/ConfigCreator/Resources/save as.svg b/ConfigCreator/Resources/save as.svg
deleted file mode 100644
index 7aa83987..00000000
--- a/ConfigCreator/Resources/save as.svg
+++ /dev/null
@@ -1,11 +0,0 @@
-
-
\ No newline at end of file
diff --git a/ConfigCreator/frmStart.Designer.vb b/ConfigCreator/frmStart.Designer.vb
deleted file mode 100644
index 50d45528..00000000
--- a/ConfigCreator/frmStart.Designer.vb
+++ /dev/null
@@ -1,629 +0,0 @@
-Imports DevExpress.XtraEditors
-
-
-Partial Class frmStart
- Inherits DevExpress.XtraBars.Ribbon.RibbonForm
-
- 'Form overrides dispose to clean up the component list.
-
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- MyBase.Dispose(disposing)
- End Sub
-
- 'Required by the Windows Form Designer
- Private components As System.ComponentModel.IContainer
-
- 'NOTE: The following procedure is required by the Windows Form Designer
- 'It can be modified using the Windows Form Designer.
- 'Do not modify it using the code editor.
-
- Private Sub InitializeComponent()
- Me.components = New System.ComponentModel.Container()
- Me.ComboBoxEdit1 = New DevExpress.XtraEditors.ComboBoxEdit()
- Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl()
- Me.MemoEdit1 = New DevExpress.XtraEditors.MemoEdit()
- Me.SimpleButton1 = New DevExpress.XtraEditors.SimpleButton()
- Me.Root = New DevExpress.XtraLayout.LayoutControlGroup()
- Me.LayoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem3 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.FluentDesignFormContainer1 = New DevExpress.XtraBars.FluentDesignSystem.FluentDesignFormContainer()
- Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
- Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage()
- Me.LayoutControl2 = New DevExpress.XtraLayout.LayoutControl()
- Me.txxTemplate = New DevExpress.XtraEditors.MemoEdit()
- Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
- Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
- Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
- Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
- Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
- Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
- Me.txtBannerUrl = New DevExpress.XtraEditors.TextEdit()
- Me.txtTrackingUrl = New DevExpress.XtraEditors.TextEdit()
- Me.txtOutputPath = New DevExpress.XtraEditors.TextEdit()
- Me.txtADGroup = New DevExpress.XtraEditors.TextEdit()
- Me.SimpleButton2 = New DevExpress.XtraEditors.SimpleButton()
- Me.txtADRoot = New DevExpress.XtraEditors.TextEdit()
- Me.LayoutControlGroup1 = New DevExpress.XtraLayout.LayoutControlGroup()
- Me.LayoutControlItem4 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem5 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem6 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem8 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem7 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem9 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem10 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.XtraTabPage1 = New DevExpress.XtraTab.XtraTabPage()
- Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
- Me.BehaviorManager1 = New DevExpress.Utils.Behaviors.BehaviorManager(Me.components)
- Me.XtraTabPage3 = New DevExpress.XtraTab.XtraTabPage()
- Me.LayoutControl3 = New DevExpress.XtraLayout.LayoutControl()
- Me.LayoutControlGroup2 = New DevExpress.XtraLayout.LayoutControlGroup()
- Me.MemoEdit2 = New DevExpress.XtraEditors.MemoEdit()
- Me.LayoutControlItem11 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.btnOpenDirectory = New DevExpress.XtraEditors.SimpleButton()
- Me.LayoutControlItem12 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.TextEdit1 = New DevExpress.XtraEditors.TextEdit()
- Me.LayoutControlItem13 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.XtraFolderBrowserDialog1 = New DevExpress.XtraEditors.XtraFolderBrowserDialog(Me.components)
- CType(Me.ComboBoxEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.LayoutControl1.SuspendLayout()
- CType(Me.MemoEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.Root, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.FluentDesignFormContainer1.SuspendLayout()
- CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.XtraTabControl1.SuspendLayout()
- Me.XtraTabPage2.SuspendLayout()
- CType(Me.LayoutControl2, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.LayoutControl2.SuspendLayout()
- CType(Me.txxTemplate.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.txtBannerUrl.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.txtTrackingUrl.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.txtOutputPath.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.txtADGroup.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.txtADRoot.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlGroup1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem8, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem9, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem10, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.XtraTabPage1.SuspendLayout()
- CType(Me.BehaviorManager1, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.XtraTabPage3.SuspendLayout()
- CType(Me.LayoutControl3, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.LayoutControl3.SuspendLayout()
- CType(Me.LayoutControlGroup2, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.MemoEdit2.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem11, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem12, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem13, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.SuspendLayout()
- '
- 'ComboBoxEdit1
- '
- Me.ComboBoxEdit1.Location = New System.Drawing.Point(117, 20)
- Me.ComboBoxEdit1.Name = "ComboBoxEdit1"
- Me.ComboBoxEdit1.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
- Me.ComboBoxEdit1.Properties.Items.AddRange(New Object() {"ZUGFERD_SERVICE"})
- Me.ComboBoxEdit1.Size = New System.Drawing.Size(733, 20)
- Me.ComboBoxEdit1.StyleController = Me.LayoutControl1
- Me.ComboBoxEdit1.TabIndex = 0
- '
- 'LayoutControl1
- '
- Me.LayoutControl1.Controls.Add(Me.MemoEdit1)
- Me.LayoutControl1.Controls.Add(Me.ComboBoxEdit1)
- Me.LayoutControl1.Controls.Add(Me.SimpleButton1)
- Me.LayoutControl1.Dock = System.Windows.Forms.DockStyle.Fill
- Me.LayoutControl1.Location = New System.Drawing.Point(0, 0)
- Me.LayoutControl1.Name = "LayoutControl1"
- Me.LayoutControl1.Root = Me.Root
- Me.LayoutControl1.Size = New System.Drawing.Size(1099, 390)
- Me.LayoutControl1.TabIndex = 1
- Me.LayoutControl1.Text = "LayoutControl1"
- '
- 'MemoEdit1
- '
- Me.MemoEdit1.Location = New System.Drawing.Point(20, 78)
- Me.MemoEdit1.Name = "MemoEdit1"
- Me.MemoEdit1.Properties.Appearance.Font = New System.Drawing.Font("Consolas", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.MemoEdit1.Properties.Appearance.Options.UseFont = True
- Me.MemoEdit1.Size = New System.Drawing.Size(1059, 292)
- Me.MemoEdit1.StyleController = Me.LayoutControl1
- Me.MemoEdit1.TabIndex = 5
- '
- 'SimpleButton1
- '
- Me.SimpleButton1.Location = New System.Drawing.Point(870, 20)
- Me.SimpleButton1.Name = "SimpleButton1"
- Me.SimpleButton1.Size = New System.Drawing.Size(209, 22)
- Me.SimpleButton1.StyleController = Me.LayoutControl1
- Me.SimpleButton1.TabIndex = 4
- Me.SimpleButton1.Text = "Get Config"
- '
- 'Root
- '
- Me.Root.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
- Me.Root.GroupBordersVisible = False
- Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.LayoutControlItem2, Me.LayoutControlItem3})
- Me.Root.Name = "Root"
- Me.Root.Size = New System.Drawing.Size(1099, 390)
- Me.Root.TextVisible = False
- '
- 'LayoutControlItem1
- '
- Me.LayoutControlItem1.Control = Me.ComboBoxEdit1
- Me.LayoutControlItem1.Location = New System.Drawing.Point(0, 0)
- Me.LayoutControlItem1.Name = "LayoutControlItem1"
- Me.LayoutControlItem1.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
- Me.LayoutControlItem1.Size = New System.Drawing.Size(850, 42)
- Me.LayoutControlItem1.Text = "Config Type"
- Me.LayoutControlItem1.TextSize = New System.Drawing.Size(85, 13)
- '
- 'LayoutControlItem2
- '
- Me.LayoutControlItem2.Control = Me.SimpleButton1
- Me.LayoutControlItem2.Location = New System.Drawing.Point(850, 0)
- Me.LayoutControlItem2.Name = "LayoutControlItem2"
- Me.LayoutControlItem2.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
- Me.LayoutControlItem2.Size = New System.Drawing.Size(229, 42)
- Me.LayoutControlItem2.TextSize = New System.Drawing.Size(0, 0)
- Me.LayoutControlItem2.TextVisible = False
- '
- 'LayoutControlItem3
- '
- Me.LayoutControlItem3.Control = Me.MemoEdit1
- Me.LayoutControlItem3.Location = New System.Drawing.Point(0, 42)
- Me.LayoutControlItem3.Name = "LayoutControlItem3"
- Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
- Me.LayoutControlItem3.Size = New System.Drawing.Size(1079, 328)
- Me.LayoutControlItem3.Text = "Config Template"
- Me.LayoutControlItem3.TextLocation = DevExpress.Utils.Locations.Top
- Me.LayoutControlItem3.TextSize = New System.Drawing.Size(85, 13)
- '
- 'FluentDesignFormContainer1
- '
- Me.FluentDesignFormContainer1.Controls.Add(Me.XtraTabControl1)
- Me.FluentDesignFormContainer1.Dock = System.Windows.Forms.DockStyle.Fill
- Me.FluentDesignFormContainer1.Location = New System.Drawing.Point(0, 160)
- Me.FluentDesignFormContainer1.Name = "FluentDesignFormContainer1"
- Me.FluentDesignFormContainer1.Size = New System.Drawing.Size(1101, 413)
- Me.FluentDesignFormContainer1.TabIndex = 2
- '
- 'XtraTabControl1
- '
- Me.XtraTabControl1.Dock = System.Windows.Forms.DockStyle.Fill
- Me.XtraTabControl1.Location = New System.Drawing.Point(0, 0)
- Me.XtraTabControl1.Name = "XtraTabControl1"
- Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPage2
- Me.XtraTabControl1.Size = New System.Drawing.Size(1101, 413)
- Me.XtraTabControl1.TabIndex = 0
- Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage2, Me.XtraTabPage1, Me.XtraTabPage3})
- '
- 'XtraTabPage2
- '
- Me.XtraTabPage2.Controls.Add(Me.LayoutControl2)
- Me.XtraTabPage2.Name = "XtraTabPage2"
- Me.XtraTabPage2.Size = New System.Drawing.Size(1099, 390)
- Me.XtraTabPage2.Text = "EmailSignature Generator"
- '
- 'LayoutControl2
- '
- Me.LayoutControl2.Controls.Add(Me.txxTemplate)
- Me.LayoutControl2.Controls.Add(Me.txtBannerUrl)
- Me.LayoutControl2.Controls.Add(Me.txtTrackingUrl)
- Me.LayoutControl2.Controls.Add(Me.txtOutputPath)
- Me.LayoutControl2.Controls.Add(Me.txtADGroup)
- Me.LayoutControl2.Controls.Add(Me.SimpleButton2)
- Me.LayoutControl2.Controls.Add(Me.txtADRoot)
- Me.LayoutControl2.Dock = System.Windows.Forms.DockStyle.Fill
- Me.LayoutControl2.Location = New System.Drawing.Point(0, 0)
- Me.LayoutControl2.Name = "LayoutControl2"
- Me.LayoutControl2.Root = Me.LayoutControlGroup1
- Me.LayoutControl2.Size = New System.Drawing.Size(1099, 390)
- Me.LayoutControl2.TabIndex = 0
- Me.LayoutControl2.Text = "LayoutControl2"
- '
- 'txxTemplate
- '
- Me.txxTemplate.Location = New System.Drawing.Point(144, 140)
- Me.txxTemplate.MenuManager = Me.RibbonControl1
- Me.txxTemplate.Name = "txxTemplate"
- Me.txxTemplate.Properties.Appearance.Font = New System.Drawing.Font("Consolas", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.txxTemplate.Properties.Appearance.Options.UseFont = True
- Me.txxTemplate.Size = New System.Drawing.Size(935, 230)
- Me.txxTemplate.StyleController = Me.LayoutControl2
- Me.txxTemplate.TabIndex = 4
- '
- 'RibbonControl1
- '
- Me.RibbonControl1.ExpandCollapseItem.Id = 0
- Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2})
- Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
- Me.RibbonControl1.MaxItemId = 4
- Me.RibbonControl1.Name = "RibbonControl1"
- Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
- Me.RibbonControl1.Size = New System.Drawing.Size(1101, 160)
- Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
- '
- 'BarButtonItem1
- '
- Me.BarButtonItem1.Caption = "Generate!"
- Me.BarButtonItem1.Id = 1
- Me.BarButtonItem1.ImageOptions.SvgImage = Global.DigitalData.GUIs.MonoRepoUtils.My.Resources.Resources.defaultprinter
- Me.BarButtonItem1.Name = "BarButtonItem1"
- '
- 'BarButtonItem2
- '
- Me.BarButtonItem2.Caption = "Speichern"
- Me.BarButtonItem2.Id = 3
- Me.BarButtonItem2.ImageOptions.SvgImage = Global.DigitalData.GUIs.MonoRepoUtils.My.Resources.Resources.save_as
- Me.BarButtonItem2.Name = "BarButtonItem2"
- '
- 'RibbonPage1
- '
- Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1})
- Me.RibbonPage1.Name = "RibbonPage1"
- Me.RibbonPage1.Text = "RibbonPage1"
- '
- 'RibbonPageGroup1
- '
- Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2)
- Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
- Me.RibbonPageGroup1.Text = "Email Einstellungen"
- '
- 'RibbonStatusBar1
- '
- Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 573)
- Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
- Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
- Me.RibbonStatusBar1.Size = New System.Drawing.Size(1101, 22)
- '
- 'txtBannerUrl
- '
- Me.txtBannerUrl.Location = New System.Drawing.Point(144, 20)
- Me.txtBannerUrl.MenuManager = Me.RibbonControl1
- Me.txtBannerUrl.Name = "txtBannerUrl"
- Me.txtBannerUrl.Size = New System.Drawing.Size(352, 20)
- Me.txtBannerUrl.StyleController = Me.LayoutControl2
- Me.txtBannerUrl.TabIndex = 5
- '
- 'txtTrackingUrl
- '
- Me.txtTrackingUrl.Location = New System.Drawing.Point(640, 20)
- Me.txtTrackingUrl.MenuManager = Me.RibbonControl1
- Me.txtTrackingUrl.Name = "txtTrackingUrl"
- Me.txtTrackingUrl.Size = New System.Drawing.Size(439, 20)
- Me.txtTrackingUrl.StyleController = Me.LayoutControl2
- Me.txtTrackingUrl.TabIndex = 6
- '
- 'txtOutputPath
- '
- Me.txtOutputPath.Location = New System.Drawing.Point(640, 60)
- Me.txtOutputPath.MenuManager = Me.RibbonControl1
- Me.txtOutputPath.Name = "txtOutputPath"
- Me.txtOutputPath.Size = New System.Drawing.Size(439, 20)
- Me.txtOutputPath.StyleController = Me.LayoutControl2
- Me.txtOutputPath.TabIndex = 7
- '
- 'txtADGroup
- '
- Me.txtADGroup.Location = New System.Drawing.Point(144, 60)
- Me.txtADGroup.MenuManager = Me.RibbonControl1
- Me.txtADGroup.Name = "txtADGroup"
- Me.txtADGroup.Size = New System.Drawing.Size(352, 20)
- Me.txtADGroup.StyleController = Me.LayoutControl2
- Me.txtADGroup.TabIndex = 8
- '
- 'SimpleButton2
- '
- Me.SimpleButton2.ImageOptions.Location = DevExpress.XtraEditors.ImageLocation.MiddleLeft
- Me.SimpleButton2.ImageOptions.SvgImage = Global.DigitalData.GUIs.MonoRepoUtils.My.Resources.Resources.defaultprinter1
- Me.SimpleButton2.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16)
- Me.SimpleButton2.Location = New System.Drawing.Point(508, 92)
- Me.SimpleButton2.Name = "SimpleButton2"
- Me.SimpleButton2.Size = New System.Drawing.Size(579, 22)
- Me.SimpleButton2.StyleController = Me.LayoutControl2
- Me.SimpleButton2.TabIndex = 9
- Me.SimpleButton2.Text = "Generate!"
- '
- 'txtADRoot
- '
- Me.txtADRoot.Location = New System.Drawing.Point(144, 100)
- Me.txtADRoot.MenuManager = Me.RibbonControl1
- Me.txtADRoot.Name = "txtADRoot"
- Me.txtADRoot.Size = New System.Drawing.Size(352, 20)
- Me.txtADRoot.StyleController = Me.LayoutControl2
- Me.txtADRoot.TabIndex = 10
- '
- 'LayoutControlGroup1
- '
- Me.LayoutControlGroup1.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
- Me.LayoutControlGroup1.GroupBordersVisible = False
- Me.LayoutControlGroup1.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem4, Me.LayoutControlItem5, Me.LayoutControlItem6, Me.LayoutControlItem8, Me.LayoutControlItem7, Me.LayoutControlItem9, Me.LayoutControlItem10})
- Me.LayoutControlGroup1.Name = "LayoutControlGroup1"
- Me.LayoutControlGroup1.Size = New System.Drawing.Size(1099, 390)
- Me.LayoutControlGroup1.TextVisible = False
- '
- 'LayoutControlItem4
- '
- Me.LayoutControlItem4.Control = Me.txxTemplate
- Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 120)
- Me.LayoutControlItem4.Name = "LayoutControlItem4"
- Me.LayoutControlItem4.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
- Me.LayoutControlItem4.Size = New System.Drawing.Size(1079, 250)
- Me.LayoutControlItem4.Text = "HTML Template"
- Me.LayoutControlItem4.TextSize = New System.Drawing.Size(112, 13)
- '
- 'LayoutControlItem5
- '
- Me.LayoutControlItem5.Control = Me.txtBannerUrl
- Me.LayoutControlItem5.Location = New System.Drawing.Point(0, 0)
- Me.LayoutControlItem5.Name = "LayoutControlItem5"
- Me.LayoutControlItem5.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
- Me.LayoutControlItem5.Size = New System.Drawing.Size(496, 40)
- Me.LayoutControlItem5.Text = "Banner URL"
- Me.LayoutControlItem5.TextSize = New System.Drawing.Size(112, 13)
- '
- 'LayoutControlItem6
- '
- Me.LayoutControlItem6.Control = Me.txtTrackingUrl
- Me.LayoutControlItem6.Location = New System.Drawing.Point(496, 0)
- Me.LayoutControlItem6.Name = "LayoutControlItem6"
- Me.LayoutControlItem6.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
- Me.LayoutControlItem6.Size = New System.Drawing.Size(583, 40)
- Me.LayoutControlItem6.Text = "Tracking URL"
- Me.LayoutControlItem6.TextSize = New System.Drawing.Size(112, 13)
- '
- 'LayoutControlItem8
- '
- Me.LayoutControlItem8.Control = Me.txtADGroup
- Me.LayoutControlItem8.Location = New System.Drawing.Point(0, 40)
- Me.LayoutControlItem8.Name = "LayoutControlItem8"
- Me.LayoutControlItem8.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
- Me.LayoutControlItem8.Size = New System.Drawing.Size(496, 40)
- Me.LayoutControlItem8.Text = "ActiveDirectory Group"
- Me.LayoutControlItem8.TextSize = New System.Drawing.Size(112, 13)
- '
- 'LayoutControlItem7
- '
- Me.LayoutControlItem7.Control = Me.txtOutputPath
- Me.LayoutControlItem7.Location = New System.Drawing.Point(496, 40)
- Me.LayoutControlItem7.Name = "LayoutControlItem7"
- Me.LayoutControlItem7.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
- Me.LayoutControlItem7.Size = New System.Drawing.Size(583, 40)
- Me.LayoutControlItem7.Text = "Output Path"
- Me.LayoutControlItem7.TextSize = New System.Drawing.Size(112, 13)
- '
- 'LayoutControlItem9
- '
- Me.LayoutControlItem9.Control = Me.SimpleButton2
- Me.LayoutControlItem9.Location = New System.Drawing.Point(496, 80)
- Me.LayoutControlItem9.Name = "LayoutControlItem9"
- Me.LayoutControlItem9.Size = New System.Drawing.Size(583, 40)
- Me.LayoutControlItem9.TextSize = New System.Drawing.Size(0, 0)
- Me.LayoutControlItem9.TextVisible = False
- '
- 'LayoutControlItem10
- '
- Me.LayoutControlItem10.Control = Me.txtADRoot
- Me.LayoutControlItem10.Location = New System.Drawing.Point(0, 80)
- Me.LayoutControlItem10.Name = "LayoutControlItem10"
- Me.LayoutControlItem10.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
- Me.LayoutControlItem10.Size = New System.Drawing.Size(496, 40)
- Me.LayoutControlItem10.Text = "Active Directory Root"
- Me.LayoutControlItem10.TextSize = New System.Drawing.Size(112, 13)
- '
- 'XtraTabPage1
- '
- Me.XtraTabPage1.Controls.Add(Me.LayoutControl1)
- Me.XtraTabPage1.Name = "XtraTabPage1"
- Me.XtraTabPage1.Size = New System.Drawing.Size(1099, 390)
- Me.XtraTabPage1.Text = "ConfigCreator"
- '
- 'RibbonPage2
- '
- Me.RibbonPage2.Name = "RibbonPage2"
- Me.RibbonPage2.Text = "RibbonPage2"
- '
- 'XtraTabPage3
- '
- Me.XtraTabPage3.Controls.Add(Me.LayoutControl3)
- Me.XtraTabPage3.Name = "XtraTabPage3"
- Me.XtraTabPage3.Size = New System.Drawing.Size(1099, 390)
- Me.XtraTabPage3.Text = "XtraTabPage3"
- '
- 'LayoutControl3
- '
- Me.LayoutControl3.Controls.Add(Me.MemoEdit2)
- Me.LayoutControl3.Controls.Add(Me.btnOpenDirectory)
- Me.LayoutControl3.Controls.Add(Me.TextEdit1)
- Me.LayoutControl3.Dock = System.Windows.Forms.DockStyle.Fill
- Me.LayoutControl3.Location = New System.Drawing.Point(0, 0)
- Me.LayoutControl3.Name = "LayoutControl3"
- Me.LayoutControl3.Root = Me.LayoutControlGroup2
- Me.LayoutControl3.Size = New System.Drawing.Size(1099, 390)
- Me.LayoutControl3.TabIndex = 1
- Me.LayoutControl3.Text = "LayoutControl3"
- '
- 'LayoutControlGroup2
- '
- Me.LayoutControlGroup2.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
- Me.LayoutControlGroup2.GroupBordersVisible = False
- Me.LayoutControlGroup2.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem11, Me.LayoutControlItem13, Me.LayoutControlItem12})
- Me.LayoutControlGroup2.Name = "LayoutControlGroup2"
- Me.LayoutControlGroup2.Size = New System.Drawing.Size(1099, 390)
- Me.LayoutControlGroup2.TextVisible = False
- '
- 'MemoEdit2
- '
- Me.MemoEdit2.Location = New System.Drawing.Point(131, 38)
- Me.MemoEdit2.MenuManager = Me.RibbonControl1
- Me.MemoEdit2.Name = "MemoEdit2"
- Me.MemoEdit2.Size = New System.Drawing.Size(956, 340)
- Me.MemoEdit2.StyleController = Me.LayoutControl3
- Me.MemoEdit2.TabIndex = 4
- '
- 'LayoutControlItem11
- '
- Me.LayoutControlItem11.Control = Me.MemoEdit2
- Me.LayoutControlItem11.Location = New System.Drawing.Point(0, 26)
- Me.LayoutControlItem11.Name = "LayoutControlItem11"
- Me.LayoutControlItem11.Size = New System.Drawing.Size(1079, 344)
- Me.LayoutControlItem11.TextSize = New System.Drawing.Size(107, 13)
- '
- 'btnOpenDirectory
- '
- Me.btnOpenDirectory.Location = New System.Drawing.Point(966, 12)
- Me.btnOpenDirectory.Name = "btnOpenDirectory"
- Me.btnOpenDirectory.Size = New System.Drawing.Size(121, 22)
- Me.btnOpenDirectory.StyleController = Me.LayoutControl3
- Me.btnOpenDirectory.TabIndex = 5
- Me.btnOpenDirectory.Text = "SimpleButton3"
- '
- 'LayoutControlItem12
- '
- Me.LayoutControlItem12.Control = Me.btnOpenDirectory
- Me.LayoutControlItem12.Location = New System.Drawing.Point(954, 0)
- Me.LayoutControlItem12.Name = "LayoutControlItem12"
- Me.LayoutControlItem12.Size = New System.Drawing.Size(125, 26)
- Me.LayoutControlItem12.TextSize = New System.Drawing.Size(0, 0)
- Me.LayoutControlItem12.TextVisible = False
- '
- 'TextEdit1
- '
- Me.TextEdit1.Location = New System.Drawing.Point(131, 12)
- Me.TextEdit1.MenuManager = Me.RibbonControl1
- Me.TextEdit1.Name = "TextEdit1"
- Me.TextEdit1.Size = New System.Drawing.Size(831, 20)
- Me.TextEdit1.StyleController = Me.LayoutControl3
- Me.TextEdit1.TabIndex = 6
- '
- 'LayoutControlItem13
- '
- Me.LayoutControlItem13.Control = Me.TextEdit1
- Me.LayoutControlItem13.Location = New System.Drawing.Point(0, 0)
- Me.LayoutControlItem13.Name = "LayoutControlItem13"
- Me.LayoutControlItem13.Size = New System.Drawing.Size(954, 26)
- Me.LayoutControlItem13.TextSize = New System.Drawing.Size(107, 13)
- '
- 'XtraFolderBrowserDialog1
- '
- Me.XtraFolderBrowserDialog1.SelectedPath = "XtraFolderBrowserDialog1"
- '
- 'frmStart
- '
- Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.ClientSize = New System.Drawing.Size(1101, 595)
- Me.Controls.Add(Me.FluentDesignFormContainer1)
- Me.Controls.Add(Me.RibbonStatusBar1)
- Me.Controls.Add(Me.RibbonControl1)
- Me.IconOptions.SvgImage = Global.DigitalData.GUIs.MonoRepoUtils.My.Resources.Resources._3trafficlightsrimmed
- Me.Name = "frmStart"
- Me.Ribbon = Me.RibbonControl1
- Me.StatusBar = Me.RibbonStatusBar1
- Me.Text = "Mono Repo Utilities"
- CType(Me.ComboBoxEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
- Me.LayoutControl1.ResumeLayout(False)
- CType(Me.MemoEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.Root, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).EndInit()
- Me.FluentDesignFormContainer1.ResumeLayout(False)
- CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
- Me.XtraTabControl1.ResumeLayout(False)
- Me.XtraTabPage2.ResumeLayout(False)
- CType(Me.LayoutControl2, System.ComponentModel.ISupportInitialize).EndInit()
- Me.LayoutControl2.ResumeLayout(False)
- CType(Me.txxTemplate.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.txtBannerUrl.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.txtTrackingUrl.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.txtOutputPath.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.txtADGroup.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.txtADRoot.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlGroup1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem8, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem9, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem10, System.ComponentModel.ISupportInitialize).EndInit()
- Me.XtraTabPage1.ResumeLayout(False)
- CType(Me.BehaviorManager1, System.ComponentModel.ISupportInitialize).EndInit()
- Me.XtraTabPage3.ResumeLayout(False)
- CType(Me.LayoutControl3, System.ComponentModel.ISupportInitialize).EndInit()
- Me.LayoutControl3.ResumeLayout(False)
- CType(Me.LayoutControlGroup2, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.MemoEdit2.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem11, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem12, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem13, System.ComponentModel.ISupportInitialize).EndInit()
- Me.ResumeLayout(False)
- Me.PerformLayout()
-
- End Sub
-
- Friend WithEvents ComboBoxEdit1 As ComboBoxEdit
- Friend WithEvents LayoutControl1 As DevExpress.XtraLayout.LayoutControl
- Friend WithEvents MemoEdit1 As MemoEdit
- Friend WithEvents SimpleButton1 As SimpleButton
- Friend WithEvents Root As DevExpress.XtraLayout.LayoutControlGroup
- Friend WithEvents LayoutControlItem1 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents LayoutControlItem2 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents LayoutControlItem3 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents FluentDesignFormContainer1 As DevExpress.XtraBars.FluentDesignSystem.FluentDesignFormContainer
- Friend WithEvents XtraTabControl1 As DevExpress.XtraTab.XtraTabControl
- Friend WithEvents XtraTabPage1 As DevExpress.XtraTab.XtraTabPage
- Friend WithEvents XtraTabPage2 As DevExpress.XtraTab.XtraTabPage
- Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
- Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
- Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
- Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
- Friend WithEvents LayoutControl2 As DevExpress.XtraLayout.LayoutControl
- Friend WithEvents txxTemplate As MemoEdit
- Friend WithEvents txtBannerUrl As TextEdit
- Friend WithEvents LayoutControlGroup1 As DevExpress.XtraLayout.LayoutControlGroup
- Friend WithEvents LayoutControlItem4 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents LayoutControlItem5 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents txtTrackingUrl As TextEdit
- Friend WithEvents txtOutputPath As TextEdit
- Friend WithEvents LayoutControlItem6 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents LayoutControlItem7 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents txtADGroup As TextEdit
- Friend WithEvents LayoutControlItem8 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents SimpleButton2 As SimpleButton
- Friend WithEvents LayoutControlItem9 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents txtADRoot As TextEdit
- Friend WithEvents LayoutControlItem10 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents BehaviorManager1 As DevExpress.Utils.Behaviors.BehaviorManager
- Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
- Friend WithEvents XtraTabPage3 As DevExpress.XtraTab.XtraTabPage
- Friend WithEvents LayoutControl3 As DevExpress.XtraLayout.LayoutControl
- Friend WithEvents MemoEdit2 As MemoEdit
- Friend WithEvents btnOpenDirectory As SimpleButton
- Friend WithEvents TextEdit1 As TextEdit
- Friend WithEvents LayoutControlGroup2 As DevExpress.XtraLayout.LayoutControlGroup
- Friend WithEvents LayoutControlItem11 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents LayoutControlItem13 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents LayoutControlItem12 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents XtraFolderBrowserDialog1 As XtraFolderBrowserDialog
-End Class
diff --git a/ConfigCreator/frmStart.resx b/ConfigCreator/frmStart.resx
deleted file mode 100644
index 9ab60e87..00000000
--- a/ConfigCreator/frmStart.resx
+++ /dev/null
@@ -1,126 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- 17, 17
-
-
- 171, 17
-
-
\ No newline at end of file
diff --git a/ConfigCreator/frmStart.vb b/ConfigCreator/frmStart.vb
deleted file mode 100644
index 496f9cb2..00000000
--- a/ConfigCreator/frmStart.vb
+++ /dev/null
@@ -1,135 +0,0 @@
-Imports System.IO
-Imports System.Xml.Serialization
-Imports DigitalData.Modules.Config
-Imports DigitalData.Modules.Logging
-Imports DigitalData.Modules.Interfaces
-Imports DigitalData.GUIs.MonoRepoUtils.Config
-Imports System.Text
-
-Public Class frmStart
- Private Const ZUGFERD_SERVICE = "ZUGFERD_SERVICE"
-
- Private Serializer As XmlSerializer
- Private Configs As New List(Of String) From {
- ZUGFERD_SERVICE
- }
-
- Private LogConfig As LogConfig
- Private Config As ConfigManager(Of Config)
-
- Private Sub frmStart_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- ComboBoxEdit1.Properties.Items.Clear()
- ComboBoxEdit1.Properties.Items.AddRange(Configs)
-
- LogConfig = New LogConfig(LogConfig.PathType.CustomPath, Application.StartupPath, Nothing, "Digital Data", "Monorepo Utils")
- Config = New ConfigManager(Of Config)(LogConfig, Application.CommonAppDataPath)
-
- txxTemplate.Text = Config.Config.EmailTemplate.BaseHtml
- txtBannerUrl.Text = Config.Config.EmailTemplate.BannerUrl
- txtTrackingUrl.Text = Config.Config.EmailTemplate.TrackingLink
- txtOutputPath.Text = Config.Config.EmailTemplate.OutputPath
- txtADGroup.Text = Config.Config.EmailTemplate.ActiveDirectoryGroup
- txtADRoot.Text = Config.Config.EmailTemplate.ActiveDirectoryRoot
- End Sub
-
- Private Sub SimpleButton1_Click(sender As Object, e As EventArgs) Handles SimpleButton1.Click
- Dim oConfigName = ComboBoxEdit1.SelectedItem
-
- Select Case oConfigName
- Case ZUGFERD_SERVICE
- MemoEdit1.Text = CreateConfigTemplate(Of DDZUGFeRDService.Config)()
-
- Case Else
- MsgBox($"Config {oConfigName} does not exist!", MsgBoxStyle.Exclamation, Text)
- End Select
- End Sub
-
- Private Function CreateConfigTemplate(Of T)()
- Serializer = New XmlSerializer(GetType(T))
- Dim oConfig As T = Activator.CreateInstance(GetType(T))
- Dim oBytes As Byte()
-
- Using oStream = New MemoryStream()
- Serializer.Serialize(oStream, oConfig)
- oBytes = oStream.ToArray()
- End Using
-
- Return System.Text.Encoding.UTF8.GetString(oBytes)
- End Function
-
- Private Sub frmStart_FormClosing(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing
- SaveSettings()
- End Sub
-
- Private Sub SimpleButton2_Click(sender As Object, e As EventArgs) Handles SimpleButton2.Click
- Dim ActiveDir = New ActiveDirectoryInterface(LogConfig, Config.Config.EmailTemplate.ActiveDirectoryRoot)
- Dim oCustomAttributes As New List(Of AttributeMapping) From {
- New AttributeMapping With {.AttributeName = "title", .FirebirdSyskey = "", .MSSQLColumn = ""}
- }
- Dim oUsers = ActiveDir.ListUsers(Config.Config.EmailTemplate.ActiveDirectoryGroup, oCustomAttributes)
- MsgBox(oUsers.Count & " users found.", MsgBoxStyle.Information, "Yo")
-
- Try
- For Each oUser As ADUser In oUsers
- Dim oHtml As String = GenerateSignatureFileFromTemplate(oUser, Config.Config.EmailTemplate)
- Dim oOutputPath = Config.Config.EmailTemplate.OutputPath
- Dim oFilePath As String = Path.Combine(oOutputPath, $"Signatur-{oUser.samAccountName}.html")
-
- If Not Directory.Exists(oOutputPath) Then
- Directory.CreateDirectory(oOutputPath)
- End If
-
- If File.Exists(oFilePath) Then
- File.Copy(oFilePath, oFilePath & "." & Now.ToString("yyyy-MM-dd_HH-mm"), True)
- End If
-
- File.WriteAllText(oFilePath, oHtml)
- Next
- Catch ex As Exception
- MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Signature Generator")
- End Try
- End Sub
-
- Private Function GenerateSignatureFileFromTemplate(User As ADUser, EmailTemplateConfig As EmailTemplateConfig)
- Dim oJobTitle = User.CustomAttributes.Where(Function(a) a.Name = "title").Single().Value
-
- Return EmailTemplateConfig.BaseHtml.
- Replace("__FULL_NAME__", $"{User.GivenName} {User.Surname}").
- Replace("__JOB_TITLE__", oJobTitle).
- Replace("__MAIL_ADDRESS__", User.Email).
- Replace("__BANNER_URL__", EmailTemplateConfig.BannerUrl).
- Replace("__TRACKER_URL__", EmailTemplateConfig.TrackingLink)
- End Function
-
- Private Sub SaveSettings()
- Config.Config.EmailTemplate.BaseHtml = txxTemplate.Text
- Config.Config.EmailTemplate.BannerUrl = txtBannerUrl.Text
- Config.Config.EmailTemplate.TrackingLink = txtTrackingUrl.Text
- Config.Config.EmailTemplate.OutputPath = txtOutputPath.Text
- Config.Config.EmailTemplate.ActiveDirectoryGroup = txtADGroup.Text
- Config.Config.EmailTemplate.ActiveDirectoryRoot = txtADRoot.Text
- Config.Save()
- End Sub
-
- Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
- SaveSettings()
- End Sub
-
- Private Sub btnOpenDirectory_Click(sender As Object, e As EventArgs) Handles btnOpenDirectory.Click
- Dim oResult = XtraFolderBrowserDialog1.ShowDialog()
-
- If oResult = DialogResult.OK Then
- Dim oPath = XtraFolderBrowserDialog1.SelectedPath
- Dim oFiles = IO.Directory.GetFiles(oPath, "*.dll")
- Dim oStringBuilder As New StringBuilder()
-
- For Each oFile In oFiles
- Dim oFileInfo = New FileInfo(oFile)
- Dim oText = $""
- oStringBuilder.Append($"{oText}{vbNewLine}")
- Next
-
- MemoEdit2.EditValue = oStringBuilder.ToString
- End If
- End Sub
-End Class
\ No newline at end of file
diff --git a/ConfigCreator/mail.ico b/ConfigCreator/mail.ico
deleted file mode 100644
index ada36d34..00000000
Binary files a/ConfigCreator/mail.ico and /dev/null differ
diff --git a/Controls.ChatAddUser/ChatAddUser.Designer.vb b/Controls.ChatAddUser/ChatAddUser.Designer.vb
deleted file mode 100644
index b0c9e390..00000000
--- a/Controls.ChatAddUser/ChatAddUser.Designer.vb
+++ /dev/null
@@ -1,100 +0,0 @@
- _
-Partial Class ChatAddUser
- Inherits System.Windows.Forms.UserControl
-
- 'UserControl1 überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
- _
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- Try
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- Finally
- MyBase.Dispose(disposing)
- End Try
- End Sub
-
- 'Wird vom Windows Form-Designer benötigt.
- Private components As System.ComponentModel.IContainer
-
- 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
- 'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
- 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
- _
- Private Sub InitializeComponent()
- Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(ChatAddUser))
- Me.Panel2 = New System.Windows.Forms.Panel()
- Me.SimpleButton1 = New DevExpress.XtraEditors.SimpleButton()
- Me.BackgroundWorker1 = New System.ComponentModel.BackgroundWorker()
- Me.GridControlUsers = New DevExpress.XtraGrid.GridControl()
- Me.GridViewUsers = New DevExpress.XtraGrid.Views.Grid.GridView()
- Me.Panel2.SuspendLayout()
- CType(Me.GridControlUsers, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.GridViewUsers, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.SuspendLayout()
- '
- 'Panel2
- '
- Me.Panel2.Controls.Add(Me.SimpleButton1)
- Me.Panel2.Dock = System.Windows.Forms.DockStyle.Bottom
- Me.Panel2.Location = New System.Drawing.Point(0, 413)
- Me.Panel2.Name = "Panel2"
- Me.Panel2.Size = New System.Drawing.Size(463, 59)
- Me.Panel2.TabIndex = 1
- '
- 'SimpleButton1
- '
- Me.SimpleButton1.Dock = System.Windows.Forms.DockStyle.Fill
- Me.SimpleButton1.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButton1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
- Me.SimpleButton1.Location = New System.Drawing.Point(0, 0)
- Me.SimpleButton1.Name = "SimpleButton1"
- Me.SimpleButton1.Size = New System.Drawing.Size(463, 59)
- Me.SimpleButton1.TabIndex = 0
- Me.SimpleButton1.Text = "User hinzufügen"
- '
- 'GridControlUsers
- '
- Me.GridControlUsers.Dock = System.Windows.Forms.DockStyle.Fill
- Me.GridControlUsers.Location = New System.Drawing.Point(0, 0)
- Me.GridControlUsers.MainView = Me.GridViewUsers
- Me.GridControlUsers.Name = "GridControlUsers"
- Me.GridControlUsers.Size = New System.Drawing.Size(463, 413)
- Me.GridControlUsers.TabIndex = 0
- Me.GridControlUsers.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewUsers})
- '
- 'GridViewUsers
- '
- Me.GridViewUsers.Appearance.EvenRow.BackColor = System.Drawing.Color.PaleTurquoise
- Me.GridViewUsers.Appearance.EvenRow.Options.UseBackColor = True
- Me.GridViewUsers.GridControl = Me.GridControlUsers
- Me.GridViewUsers.Name = "GridViewUsers"
- Me.GridViewUsers.OptionsBehavior.Editable = False
- Me.GridViewUsers.OptionsSelection.MultiSelect = True
- Me.GridViewUsers.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CheckBoxRowSelect
- Me.GridViewUsers.OptionsView.EnableAppearanceEvenRow = True
- Me.GridViewUsers.OptionsView.ShowAutoFilterRow = True
- Me.GridViewUsers.OptionsView.ShowGroupPanel = False
- Me.GridViewUsers.OptionsView.ShowViewCaption = True
- Me.GridViewUsers.ViewCaption = "Benutzer zu Konversation hinzufügen"
- '
- 'ChatAddUser
- '
- Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 14.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.Controls.Add(Me.GridControlUsers)
- Me.Controls.Add(Me.Panel2)
- Me.Font = New System.Drawing.Font("Tahoma", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Name = "ChatAddUser"
- Me.Size = New System.Drawing.Size(463, 472)
- Me.Panel2.ResumeLayout(False)
- CType(Me.GridControlUsers, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.GridViewUsers, System.ComponentModel.ISupportInitialize).EndInit()
- Me.ResumeLayout(False)
-
- End Sub
- Friend WithEvents Panel2 As Panel
- Friend WithEvents BackgroundWorker1 As System.ComponentModel.BackgroundWorker
- Friend WithEvents GridControlUsers As DevExpress.XtraGrid.GridControl
- Friend WithEvents GridViewUsers As DevExpress.XtraGrid.Views.Grid.GridView
- Friend WithEvents SimpleButton1 As DevExpress.XtraEditors.SimpleButton
-End Class
diff --git a/Controls.ChatAddUser/ChatAddUser.resx b/Controls.ChatAddUser/ChatAddUser.resx
deleted file mode 100644
index 398d46ab..00000000
--- a/Controls.ChatAddUser/ChatAddUser.resx
+++ /dev/null
@@ -1,142 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGICAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z
- ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5CbGFja3tmaWxsOiM3MjcyNzI7fQoJLkdyZWVue2ZpbGw6IzAz
- OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9Cgkuc3Qwe29wYWNpdHk6MC43NTt9Cgkuc3Qxe29wYWNp
- dHk6MC41O30KPC9zdHlsZT4NCiAgPGcgaWQ9IkFkZENpcmNsZWQiPg0KICAgIDxwYXRoIGQ9Ik0xNiw0
- QzkuNCw0LDQsOS40LDQsMTZzNS40LDEyLDEyLDEyczEyLTUuNCwxMi0xMlMyMi42LDQsMTYsNHogTTI0
- LDE4aC02djZoLTR2LTZIOHYtNGg2VjhoNHY2aDZWMTh6IiBjbGFzcz0iR3JlZW4iIC8+DQogIDwvZz4N
- Cjwvc3ZnPgs=
-
-
-
- 17, 17
-
-
\ No newline at end of file
diff --git a/Controls.ChatAddUser/ChatAddUser.resx.bak b/Controls.ChatAddUser/ChatAddUser.resx.bak
deleted file mode 100644
index 1b8ff1ab..00000000
--- a/Controls.ChatAddUser/ChatAddUser.resx.bak
+++ /dev/null
@@ -1,142 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGICAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z
- ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5CbGFja3tmaWxsOiM3MjcyNzI7fQoJLkdyZWVue2ZpbGw6IzAz
- OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9Cgkuc3Qwe29wYWNpdHk6MC43NTt9Cgkuc3Qxe29wYWNp
- dHk6MC41O30KPC9zdHlsZT4NCiAgPGcgaWQ9IkFkZENpcmNsZWQiPg0KICAgIDxwYXRoIGQ9Ik0xNiw0
- QzkuNCw0LDQsOS40LDQsMTZzNS40LDEyLDEyLDEyczEyLTUuNCwxMi0xMlMyMi42LDQsMTYsNHogTTI0
- LDE4aC02djZoLTR2LTZIOHYtNGg2VjhoNHY2aDZWMTh6IiBjbGFzcz0iR3JlZW4iIC8+DQogIDwvZz4N
- Cjwvc3ZnPgs=
-
-
-
- 17, 17
-
-
\ No newline at end of file
diff --git a/Controls.ChatAddUser/ChatAddUser.vb b/Controls.ChatAddUser/ChatAddUser.vb
deleted file mode 100644
index bed4005b..00000000
--- a/Controls.ChatAddUser/ChatAddUser.vb
+++ /dev/null
@@ -1,80 +0,0 @@
-Imports DevExpress.XtraGrid.Views.Tile
-Imports DigitalData.Modules.Database
-Imports DigitalData.Modules.Logging
-
-Public Class ChatAddUser
- Public Delegate Sub UserAdded()
- Public Event User_Added As UserAdded
- Private _Database As MSSQLServer
- Private LogConfig As LogConfig
- Private Logger As Logger
-
- Public ConversationID As Long
- Public ConnStringIDB As String
- Public Username As String
- Public User_Language As String
- Public NewConversation As Long
-
- Public Sub New()
- InitializeComponent()
- End Sub
-
- Public Sub Init(LogConfig As LogConfig, ConnectionStringIDB As String, CONV_ID As Long, Username As String, UserLanguage As String, DTUsers As DataTable)
- Me.LogConfig = LogConfig
- Me.Logger = LogConfig.GetLogger()
- Me.ConnStringIDB = ConnectionStringIDB
- ConversationID = CONV_ID
-
- Me.Username = Username
- Me.User_Language = UserLanguage
- Me._Database = New MSSQLServer(LogConfig, ConnectionStringIDB)
- If Not IsNothing(DTUsers) Then
- If DTUsers.Rows.Count > 1 Then
- GridControlUsers.DataSource = DTUsers
- End If
-
- End If
- End Sub
-
- Private Sub SimpleButton1_Click(sender As Object, e As EventArgs) Handles SimpleButton1.Click
- AddUser()
- End Sub
- Public Function AddUser()
- Try
- Dim oSQL As String
- Dim oError As Boolean = False
-
- Dim oSelectedUsers As Integer() = GridViewUsers.GetSelectedRows()
- If oSelectedUsers.Count > 0 Then
- For Each oRowHandle As Integer In oSelectedUsers
- Dim oUserID
- Try
- oUserID = GridViewUsers.GetRowCellValue(oRowHandle, "UserID")
- Catch ex As Exception
- Try
- oUserID = GridViewUsers.GetRowCellValue(oRowHandle, "USER_ID")
- Catch ex1 As Exception
- Logger.Warn("Error Selecting UserID/USER_ID: " & ex.Message)
- oError = True
- Return False
- End Try
-
- End Try
-
- oSQL = $"EXEC PRIDB_ADD_USER_2_CONVERSATION {ConversationID},{oUserID},'{Username}'"
- If _Database.ExecuteNonQuery(oSQL) = False Then
- oError = True
- End If
- Next
- End If
- If oError = False Then
- RaiseEvent User_Added()
- End If
-
-
- Catch ex As Exception
- Logger.Error(ex)
- MsgBox($"Unexpected error in Add User2Conversation: {ex.Message}")
- End Try
- End Function
-End Class
diff --git a/Controls.ChatAddUser/ChatAddUser.vbproj b/Controls.ChatAddUser/ChatAddUser.vbproj
deleted file mode 100644
index d90ce937..00000000
--- a/Controls.ChatAddUser/ChatAddUser.vbproj
+++ /dev/null
@@ -1,173 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {F0A807CC-BE14-4B5B-9200-27C16156BD8A}
- Library
- DigitalData.Controls.ChatAddUser
- DigitalData.Controls.ChatAddUser
- 512
- Windows
- v4.6.1
- true
-
-
-
- true
- full
- true
- true
- bin\Debug\
- DigitalData.Controls.ChatAddUser.xml
- _MYFORMS=True
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.Controls.ChatAddUser.xml
- _MYFORMS=True
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
-
-
-
-
-
-
-
-
-
- ..\Controls.LookupGrid\obj\Debug\DigitalData.Controls.LookupGrid.dll
-
-
-
- ..\packages\NLog.4.7.10\lib\net45\NLog.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- True
- Application.myapp
-
-
- UserControl
-
-
- ChatAddUser.vb
-
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- ChatAddUser.vb
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
-
-
- {eaf0ea75-5fa7-485d-89c7-b2d843b03a96}
- Database
-
-
- {903b2d7d-3b80-4be9-8713-7447b704e1b0}
- Logging
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Controls.ChatAddUser/ChatAddUser.vbproj.bak b/Controls.ChatAddUser/ChatAddUser.vbproj.bak
deleted file mode 100644
index 96f3addf..00000000
--- a/Controls.ChatAddUser/ChatAddUser.vbproj.bak
+++ /dev/null
@@ -1,172 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {F0A807CC-BE14-4B5B-9200-27C16156BD8A}
- Library
- DigitalData.Controls.ChatAddUser
- DigitalData.Controls.ChatAddUser
- 512
- Windows
- v4.6.1
- true
-
-
-
- true
- full
- true
- true
- bin\Debug\
- DigitalData.Controls.ChatAddUser.xml
- _MYFORMS=True
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.Controls.ChatAddUser.xml
- _MYFORMS=True
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
-
-
-
-
-
-
-
-
- ..\Controls.LookupGrid\obj\Debug\DigitalData.Controls.LookupGrid.dll
-
-
-
- ..\packages\NLog.4.7.10\lib\net45\NLog.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- True
- Application.myapp
-
-
- UserControl
-
-
- ChatAddUser.vb
-
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- ChatAddUser.vb
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
-
-
- {eaf0ea75-5fa7-485d-89c7-b2d843b03a96}
- Database
-
-
- {903b2d7d-3b80-4be9-8713-7447b704e1b0}
- Logging
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Controls.ChatAddUser/ChatNewConv.sln b/Controls.ChatAddUser/ChatNewConv.sln
deleted file mode 100644
index 7fbe294b..00000000
--- a/Controls.ChatAddUser/ChatNewConv.sln
+++ /dev/null
@@ -1,25 +0,0 @@
-
-Microsoft Visual Studio Solution File, Format Version 12.00
-# Visual Studio Version 16
-VisualStudioVersion = 16.0.29728.190
-MinimumVisualStudioVersion = 10.0.40219.1
-Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "ChatNewConv", "ChatNewConv.vbproj", "{1F278760-4F6B-42E8-B82D-01D4C8618340}"
-EndProject
-Global
- GlobalSection(SolutionConfigurationPlatforms) = preSolution
- Debug|Any CPU = Debug|Any CPU
- Release|Any CPU = Release|Any CPU
- EndGlobalSection
- GlobalSection(ProjectConfigurationPlatforms) = postSolution
- {1F278760-4F6B-42E8-B82D-01D4C8618340}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
- {1F278760-4F6B-42E8-B82D-01D4C8618340}.Debug|Any CPU.Build.0 = Debug|Any CPU
- {1F278760-4F6B-42E8-B82D-01D4C8618340}.Release|Any CPU.ActiveCfg = Release|Any CPU
- {1F278760-4F6B-42E8-B82D-01D4C8618340}.Release|Any CPU.Build.0 = Release|Any CPU
- EndGlobalSection
- GlobalSection(SolutionProperties) = preSolution
- HideSolutionNode = FALSE
- EndGlobalSection
- GlobalSection(ExtensibilityGlobals) = postSolution
- SolutionGuid = {7A1345F2-0B32-4B54-AD8C-2DA579BFF116}
- EndGlobalSection
-EndGlobal
diff --git a/Controls.ChatAddUser/My Project/AssemblyInfo.vb b/Controls.ChatAddUser/My Project/AssemblyInfo.vb
deleted file mode 100644
index e3c1975f..00000000
--- a/Controls.ChatAddUser/My Project/AssemblyInfo.vb
+++ /dev/null
@@ -1,34 +0,0 @@
-Imports System
-Imports System.Reflection
-Imports System.Runtime.InteropServices
-
-' Allgemeine Informationen über eine Assembly werden über die folgenden
-' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
-' die einer Assembly zugeordnet sind.
-
-' Werte der Assemblyattribute überprüfen
-
-
-
-
-
-
-
-
-
-
-'Die folgende GUID wird für die typelib-ID verwendet, wenn dieses Projekt für COM verfügbar gemacht wird.
-
-
-' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
-'
-' Hauptversion
-' Nebenversion
-' Buildnummer
-' Revision
-'
-' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
-' indem Sie "*" wie unten gezeigt eingeben:
-
-
-
diff --git a/Controls.ChatAddUser/My Project/Resources.Designer.vb b/Controls.ChatAddUser/My Project/Resources.Designer.vb
deleted file mode 100644
index aed253a3..00000000
--- a/Controls.ChatAddUser/My Project/Resources.Designer.vb
+++ /dev/null
@@ -1,103 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-Imports System
-
-Namespace My.Resources
-
- 'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
- '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
- 'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
- 'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
- '''
- ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
- '''
- _
- Friend Module Resources
-
- Private resourceMan As Global.System.Resources.ResourceManager
-
- Private resourceCulture As Global.System.Globalization.CultureInfo
-
- '''
- ''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
- '''
- _
- Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
- Get
- If Object.ReferenceEquals(resourceMan, Nothing) Then
- Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DigitalData.Controls.ChatAddUser.Resources", GetType(Resources).Assembly)
- resourceMan = temp
- End If
- Return resourceMan
- End Get
- End Property
-
- '''
- ''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
- ''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
- '''
- _
- Friend Property Culture() As Global.System.Globalization.CultureInfo
- Get
- Return resourceCulture
- End Get
- Set
- resourceCulture = value
- End Set
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
- '''
- Friend ReadOnly Property Action_Workflow_Activate() As System.Drawing.Bitmap
- Get
- Dim obj As Object = ResourceManager.GetObject("Action_Workflow_Activate", resourceCulture)
- Return CType(obj,System.Drawing.Bitmap)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
- '''
- Friend ReadOnly Property Action_Workflow_Deactivate() As System.Drawing.Bitmap
- Get
- Dim obj As Object = ResourceManager.GetObject("Action_Workflow_Deactivate", resourceCulture)
- Return CType(obj,System.Drawing.Bitmap)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
- '''
- Friend ReadOnly Property crop_php() As System.Drawing.Bitmap
- Get
- Dim obj As Object = ResourceManager.GetObject("crop.php", resourceCulture)
- Return CType(obj,System.Drawing.Bitmap)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
- '''
- Friend ReadOnly Property Send_16x16() As System.Drawing.Bitmap
- Get
- Dim obj As Object = ResourceManager.GetObject("Send_16x16", resourceCulture)
- Return CType(obj,System.Drawing.Bitmap)
- End Get
- End Property
- End Module
-End Namespace
diff --git a/Controls.ChatAddUser/My Project/Resources.resx b/Controls.ChatAddUser/My Project/Resources.resx
deleted file mode 100644
index c8bf3f12..00000000
--- a/Controls.ChatAddUser/My Project/Resources.resx
+++ /dev/null
@@ -1,133 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
- ..\Resources\crop.php.jpeg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
-
-
- ..\Resources\Send_16x16.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
-
-
- ..\Resources\Action_Workflow_Activate.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
-
-
- ..\Resources\Action_Workflow_Deactivate.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
-
-
\ No newline at end of file
diff --git a/Controls.ChatAddUser/My Project/Settings.Designer.vb b/Controls.ChatAddUser/My Project/Settings.Designer.vb
deleted file mode 100644
index 9c3adb9a..00000000
--- a/Controls.ChatAddUser/My Project/Settings.Designer.vb
+++ /dev/null
@@ -1,73 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- _
- Partial Friend NotInheritable Class MySettings
- Inherits Global.System.Configuration.ApplicationSettingsBase
-
- Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
-
-#Region "Automatische My.Settings-Speicherfunktion"
-#If _MyType = "WindowsForms" Then
- Private Shared addedHandler As Boolean
-
- Private Shared addedHandlerLockObject As New Object
-
- _
- Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
- If My.Application.SaveMySettingsOnExit Then
- My.Settings.Save()
- End If
- End Sub
-#End If
-#End Region
-
- Public Shared ReadOnly Property [Default]() As MySettings
- Get
-
-#If _MyType = "WindowsForms" Then
- If Not addedHandler Then
- SyncLock addedHandlerLockObject
- If Not addedHandler Then
- AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
- addedHandler = True
- End If
- End SyncLock
- End If
-#End If
- Return defaultInstance
- End Get
- End Property
- End Class
-End Namespace
-
-Namespace My
-
- _
- Friend Module MySettingsProperty
-
- _
- Friend ReadOnly Property Settings() As Global.DigitalData.Controls.ChatAddUser.My.MySettings
- Get
- Return Global.DigitalData.Controls.ChatAddUser.My.MySettings.Default
- End Get
- End Property
- End Module
-End Namespace
diff --git a/Controls.ChatAddUser/My Project/licenses.licx b/Controls.ChatAddUser/My Project/licenses.licx
deleted file mode 100644
index e69de29b..00000000
diff --git a/Controls.ChatAddUser/My Project/licenses.licx.bak b/Controls.ChatAddUser/My Project/licenses.licx.bak
deleted file mode 100644
index 75eb9ac1..00000000
--- a/Controls.ChatAddUser/My Project/licenses.licx.bak
+++ /dev/null
@@ -1,6 +0,0 @@
-DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.GridLookUpEdit, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.LookUpEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.ButtonEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
diff --git a/Controls.ChatAddUser/Resources/Action_Workflow_Activate.png b/Controls.ChatAddUser/Resources/Action_Workflow_Activate.png
deleted file mode 100644
index 5d967b1f..00000000
Binary files a/Controls.ChatAddUser/Resources/Action_Workflow_Activate.png and /dev/null differ
diff --git a/Controls.ChatAddUser/Resources/Action_Workflow_Deactivate.png b/Controls.ChatAddUser/Resources/Action_Workflow_Deactivate.png
deleted file mode 100644
index 54a077fb..00000000
Binary files a/Controls.ChatAddUser/Resources/Action_Workflow_Deactivate.png and /dev/null differ
diff --git a/Controls.ChatAddUser/Resources/Send_16x16.png b/Controls.ChatAddUser/Resources/Send_16x16.png
deleted file mode 100644
index add634c2..00000000
Binary files a/Controls.ChatAddUser/Resources/Send_16x16.png and /dev/null differ
diff --git a/Controls.ChatAddUser/Resources/crop.php.jpeg b/Controls.ChatAddUser/Resources/crop.php.jpeg
deleted file mode 100644
index 68360c3b..00000000
Binary files a/Controls.ChatAddUser/Resources/crop.php.jpeg and /dev/null differ
diff --git a/Controls.ChatAddUser/packages.config b/Controls.ChatAddUser/packages.config
deleted file mode 100644
index 63f3075e..00000000
--- a/Controls.ChatAddUser/packages.config
+++ /dev/null
@@ -1,4 +0,0 @@
-
-
-
-
\ No newline at end of file
diff --git a/Controls.ChatControl/ChatControl.Designer.vb b/Controls.ChatControl/ChatControl.Designer.vb
deleted file mode 100644
index 4cc09370..00000000
--- a/Controls.ChatControl/ChatControl.Designer.vb
+++ /dev/null
@@ -1,518 +0,0 @@
-
-Partial Class ChatControl
- Inherits System.Windows.Forms.UserControl
-
- 'UserControl1 überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
-
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- Try
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- Finally
- MyBase.Dispose(disposing)
- End Try
- End Sub
-
- 'Wird vom Windows Form-Designer benötigt.
- Private components As System.ComponentModel.IContainer
-
- 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
- 'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
- 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
-
- Private Sub InitializeComponent()
- Me.components = New System.ComponentModel.Container()
- Dim ItemTemplate1 As DevExpress.XtraGrid.Views.Tile.ItemTemplate = New DevExpress.XtraGrid.Views.Tile.ItemTemplate()
- Dim TableColumnDefinition1 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
- Dim TableColumnDefinition2 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
- Dim TileViewItemElement1 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
- Dim TileViewItemElement2 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
- Dim TileViewItemElement3 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
- Dim TableRowDefinition1 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
- Dim TableRowDefinition2 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
- Dim TableSpan1 As DevExpress.XtraEditors.TableLayout.TableSpan = New DevExpress.XtraEditors.TableLayout.TableSpan()
- Dim ItemTemplate2 As DevExpress.XtraGrid.Views.Tile.ItemTemplate = New DevExpress.XtraGrid.Views.Tile.ItemTemplate()
- Dim TableColumnDefinition3 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
- Dim TableColumnDefinition4 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
- Dim TileViewItemElement4 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
- Dim TileViewItemElement5 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
- Dim TileViewItemElement6 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
- Dim TableRowDefinition3 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
- Dim TableRowDefinition4 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
- Dim ItemTemplate3 As DevExpress.XtraGrid.Views.Tile.ItemTemplate = New DevExpress.XtraGrid.Views.Tile.ItemTemplate()
- Dim TableColumnDefinition5 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
- Dim TableColumnDefinition6 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
- Dim TileViewItemElement7 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
- Dim TileViewItemElement8 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
- Dim TileViewItemElement9 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
- Dim TileViewItemElement10 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
- Dim TableRowDefinition5 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
- Dim TableRowDefinition6 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
- Dim TableRowDefinition7 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
- Dim TableSpan2 As DevExpress.XtraEditors.TableLayout.TableSpan = New DevExpress.XtraEditors.TableLayout.TableSpan()
- Dim TableSpan3 As DevExpress.XtraEditors.TableLayout.TableSpan = New DevExpress.XtraEditors.TableLayout.TableSpan()
- Dim TableColumnDefinition7 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
- Dim TableColumnDefinition8 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
- Dim TableRowDefinition8 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
- Dim TableRowDefinition9 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
- Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(ChatControl))
- Me.columnUsername = New DevExpress.XtraGrid.Columns.TileViewColumn()
- Me.columnMessage = New DevExpress.XtraGrid.Columns.TileViewColumn()
- Me.columnDate = New DevExpress.XtraGrid.Columns.TileViewColumn()
- Me.columnTO_USER = New DevExpress.XtraGrid.Columns.TileViewColumn()
- Me.RepositoryItemHypertextLabel1 = New DevExpress.XtraEditors.Repository.RepositoryItemHypertextLabel()
- Me.RepositoryItemHyperLinkEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemHyperLinkEdit()
- Me.GridChatOld = New DevExpress.XtraGrid.GridControl()
- Me.ChatViewOld = New DevExpress.XtraGrid.Views.Tile.TileView()
- Me.btnSendMessage = New DevExpress.XtraEditors.SimpleButton()
- Me.ChatSource = New System.Windows.Forms.BindingSource(Me.components)
- Me.pnlMessage = New System.Windows.Forms.Panel()
- Me.RichTextBox1 = New System.Windows.Forms.RichTextBox()
- Me.ListBoxUserMention = New System.Windows.Forms.ListBox()
- Me.MenuStrip1 = New System.Windows.Forms.MenuStrip()
- Me.tsmitmTitle = New System.Windows.Forms.ToolStripMenuItem()
- Me.tsmenitmHamburger = New System.Windows.Forms.ToolStripMenuItem()
- Me.ToolStripMenuItemConv_end = New System.Windows.Forms.ToolStripMenuItem()
- Me.BenutzerHinzufügenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
- Me.TeilnehmerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
- Me.GridChat = New DevExpress.XtraGrid.GridControl()
- Me.ChatView = New DevExpress.XtraGrid.Views.Grid.GridView()
- Me.columnFromUser = New DevExpress.XtraGrid.Columns.GridColumn()
- Me.columnToUser = New DevExpress.XtraGrid.Columns.GridColumn()
- Me.columnAddedWhen = New DevExpress.XtraGrid.Columns.GridColumn()
- CType(Me.RepositoryItemHypertextLabel1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.RepositoryItemHyperLinkEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.GridChatOld, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.ChatViewOld, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.ChatSource, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.pnlMessage.SuspendLayout()
- Me.MenuStrip1.SuspendLayout()
- CType(Me.GridChat, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.ChatView, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.SuspendLayout()
- '
- 'columnUsername
- '
- Me.columnUsername.FieldName = "USER_FROM"
- Me.columnUsername.MinWidth = 23
- Me.columnUsername.Name = "columnUsername"
- Me.columnUsername.Visible = True
- Me.columnUsername.VisibleIndex = 1
- Me.columnUsername.Width = 87
- '
- 'columnMessage
- '
- Me.columnMessage.FieldName = "MESSAGE_TEXT"
- Me.columnMessage.MinWidth = 23
- Me.columnMessage.Name = "columnMessage"
- Me.columnMessage.Visible = True
- Me.columnMessage.VisibleIndex = 0
- Me.columnMessage.Width = 87
- '
- 'columnDate
- '
- Me.columnDate.DisplayFormat.FormatString = "g"
- Me.columnDate.DisplayFormat.FormatType = DevExpress.Utils.FormatType.DateTime
- Me.columnDate.FieldName = "ADDED_WHEN"
- Me.columnDate.MinWidth = 23
- Me.columnDate.Name = "columnDate"
- Me.columnDate.Visible = True
- Me.columnDate.VisibleIndex = 2
- Me.columnDate.Width = 87
- '
- 'columnTO_USER
- '
- Me.columnTO_USER.AppearanceCell.BackColor = System.Drawing.Color.GreenYellow
- Me.columnTO_USER.AppearanceCell.Options.UseBackColor = True
- Me.columnTO_USER.FieldName = "TO_USER"
- Me.columnTO_USER.Name = "columnTO_USER"
- Me.columnTO_USER.Visible = True
- Me.columnTO_USER.VisibleIndex = 3
- '
- 'RepositoryItemHypertextLabel1
- '
- Me.RepositoryItemHypertextLabel1.Name = "RepositoryItemHypertextLabel1"
- '
- 'RepositoryItemHyperLinkEdit1
- '
- Me.RepositoryItemHyperLinkEdit1.AutoHeight = False
- Me.RepositoryItemHyperLinkEdit1.Name = "RepositoryItemHyperLinkEdit1"
- '
- 'GridChatOld
- '
- Me.GridChatOld.BackgroundImage = Global.DigitalData.Controls.ChatControl.My.Resources.Resources.crop_php
- Me.GridChatOld.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
- Me.GridChatOld.Dock = System.Windows.Forms.DockStyle.Top
- Me.GridChatOld.EmbeddedNavigator.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
- Me.GridChatOld.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.GridChatOld.Location = New System.Drawing.Point(0, 25)
- Me.GridChatOld.MainView = Me.ChatViewOld
- Me.GridChatOld.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
- Me.GridChatOld.Name = "GridChatOld"
- Me.GridChatOld.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemHyperLinkEdit1, Me.RepositoryItemHypertextLabel1})
- Me.GridChatOld.Size = New System.Drawing.Size(421, 213)
- Me.GridChatOld.TabIndex = 0
- Me.GridChatOld.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ChatViewOld})
- Me.GridChatOld.Visible = False
- '
- 'ChatViewOld
- '
- Me.ChatViewOld.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.columnMessage, Me.columnUsername, Me.columnDate, Me.columnTO_USER})
- Me.ChatViewOld.ContextButtonOptions.HoverStateOpacity = 0.75!
- Me.ChatViewOld.ContextButtonOptions.TopPanelColor = System.Drawing.Color.White
- Me.ChatViewOld.DetailHeight = 431
- Me.ChatViewOld.GridControl = Me.GridChatOld
- Me.ChatViewOld.Name = "ChatViewOld"
- Me.ChatViewOld.OptionsTiles.ColumnCount = 1
- Me.ChatViewOld.OptionsTiles.GroupTextPadding = New System.Windows.Forms.Padding(0, 8, 12, 8)
- Me.ChatViewOld.OptionsTiles.IndentBetweenGroups = 0
- Me.ChatViewOld.OptionsTiles.IndentBetweenItems = 10
- Me.ChatViewOld.OptionsTiles.ItemPadding = New System.Windows.Forms.Padding(0)
- Me.ChatViewOld.OptionsTiles.ItemSize = New System.Drawing.Size(374, 90)
- Me.ChatViewOld.OptionsTiles.LayoutMode = DevExpress.XtraGrid.Views.Tile.TileViewLayoutMode.Kanban
- Me.ChatViewOld.OptionsTiles.Orientation = System.Windows.Forms.Orientation.Vertical
- Me.ChatViewOld.OptionsTiles.Padding = New System.Windows.Forms.Padding(5)
- Me.ChatViewOld.OptionsTiles.RowCount = 0
- Me.ChatViewOld.OptionsTiles.ScrollMode = DevExpress.XtraEditors.TileControlScrollMode.ScrollBar
- TableColumnDefinition1.Length.Value = 250.0R
- TableColumnDefinition2.Length.Value = 100.0R
- ItemTemplate1.Columns.Add(TableColumnDefinition1)
- ItemTemplate1.Columns.Add(TableColumnDefinition2)
- TileViewItemElement1.Column = Me.columnUsername
- TileViewItemElement1.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
- TileViewItemElement1.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
- TileViewItemElement1.Text = "columnUsername"
- TileViewItemElement1.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft
- TileViewItemElement1.TextLocation = New System.Drawing.Point(10, 0)
- TileViewItemElement2.Column = Me.columnMessage
- TileViewItemElement2.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
- TileViewItemElement2.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
- TileViewItemElement2.RowIndex = 1
- TileViewItemElement2.StretchHorizontal = True
- TileViewItemElement2.StretchVertical = True
- TileViewItemElement2.Text = "columnMessage"
- TileViewItemElement2.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.TopLeft
- TileViewItemElement2.TextLocation = New System.Drawing.Point(10, 0)
- TileViewItemElement3.Column = Me.columnDate
- TileViewItemElement3.ColumnIndex = 1
- TileViewItemElement3.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
- TileViewItemElement3.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
- TileViewItemElement3.Text = "columnDate"
- TileViewItemElement3.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleRight
- TileViewItemElement3.TextLocation = New System.Drawing.Point(-10, 0)
- ItemTemplate1.Elements.Add(TileViewItemElement1)
- ItemTemplate1.Elements.Add(TileViewItemElement2)
- ItemTemplate1.Elements.Add(TileViewItemElement3)
- ItemTemplate1.Name = "ChatLeft"
- TableRowDefinition1.Length.Value = 19.0R
- TableRowDefinition2.Length.Value = 45.0R
- ItemTemplate1.Rows.Add(TableRowDefinition1)
- ItemTemplate1.Rows.Add(TableRowDefinition2)
- TableSpan1.ColumnSpan = 2
- TableSpan1.RowIndex = 1
- ItemTemplate1.Spans.Add(TableSpan1)
- TableColumnDefinition3.Length.Value = 100.0R
- TableColumnDefinition4.Length.Value = 250.0R
- ItemTemplate2.Columns.Add(TableColumnDefinition3)
- ItemTemplate2.Columns.Add(TableColumnDefinition4)
- TileViewItemElement4.Column = Me.columnUsername
- TileViewItemElement4.ColumnIndex = 1
- TileViewItemElement4.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
- TileViewItemElement4.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
- TileViewItemElement4.Text = "columnUsername"
- TileViewItemElement4.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleRight
- TileViewItemElement4.TextLocation = New System.Drawing.Point(-10, 0)
- TileViewItemElement5.Column = Me.columnMessage
- TileViewItemElement5.ColumnIndex = 1
- TileViewItemElement5.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
- TileViewItemElement5.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
- TileViewItemElement5.MaxWidth = 350
- TileViewItemElement5.RowIndex = 1
- TileViewItemElement5.Text = "columnMessage"
- TileViewItemElement5.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleRight
- TileViewItemElement5.TextLocation = New System.Drawing.Point(-10, 0)
- TileViewItemElement6.Column = Me.columnDate
- TileViewItemElement6.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
- TileViewItemElement6.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
- TileViewItemElement6.Text = "columnDate"
- TileViewItemElement6.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft
- TileViewItemElement6.TextLocation = New System.Drawing.Point(10, 0)
- ItemTemplate2.Elements.Add(TileViewItemElement4)
- ItemTemplate2.Elements.Add(TileViewItemElement5)
- ItemTemplate2.Elements.Add(TileViewItemElement6)
- ItemTemplate2.Name = "ChatRight"
- TableRowDefinition3.Length.Value = 19.0R
- TableRowDefinition4.Length.Value = 45.0R
- ItemTemplate2.Rows.Add(TableRowDefinition3)
- ItemTemplate2.Rows.Add(TableRowDefinition4)
- TableColumnDefinition5.Length.Value = 250.0R
- TableColumnDefinition6.Length.Value = 100.0R
- ItemTemplate3.Columns.Add(TableColumnDefinition5)
- ItemTemplate3.Columns.Add(TableColumnDefinition6)
- TileViewItemElement7.Column = Me.columnUsername
- TileViewItemElement7.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
- TileViewItemElement7.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
- TileViewItemElement7.RowIndex = 1
- TileViewItemElement7.Text = "columnUsername"
- TileViewItemElement7.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft
- TileViewItemElement7.TextLocation = New System.Drawing.Point(10, 0)
- TileViewItemElement8.Column = Me.columnMessage
- TileViewItemElement8.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
- TileViewItemElement8.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
- TileViewItemElement8.RowIndex = 2
- TileViewItemElement8.StretchHorizontal = True
- TileViewItemElement8.StretchVertical = True
- TileViewItemElement8.Text = "columnMessage"
- TileViewItemElement8.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.TopLeft
- TileViewItemElement8.TextLocation = New System.Drawing.Point(10, 0)
- TileViewItemElement9.Column = Me.columnDate
- TileViewItemElement9.ColumnIndex = 1
- TileViewItemElement9.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
- TileViewItemElement9.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
- TileViewItemElement9.RowIndex = 1
- TileViewItemElement9.Text = "columnDate"
- TileViewItemElement9.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleRight
- TileViewItemElement9.TextLocation = New System.Drawing.Point(-10, 0)
- TileViewItemElement10.Appearance.Normal.BackColor = System.Drawing.Color.PaleGreen
- TileViewItemElement10.Appearance.Normal.Options.UseBackColor = True
- TileViewItemElement10.Column = Me.columnTO_USER
- TileViewItemElement10.Height = 19
- TileViewItemElement10.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
- TileViewItemElement10.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.ZoomInside
- TileViewItemElement10.StretchHorizontal = True
- TileViewItemElement10.Text = "columnTO_USER"
- TileViewItemElement10.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleLeft
- TileViewItemElement10.TextLocation = New System.Drawing.Point(10, 0)
- ItemTemplate3.Elements.Add(TileViewItemElement7)
- ItemTemplate3.Elements.Add(TileViewItemElement8)
- ItemTemplate3.Elements.Add(TileViewItemElement9)
- ItemTemplate3.Elements.Add(TileViewItemElement10)
- ItemTemplate3.Name = "ChatTo"
- TableRowDefinition5.Length.Value = 17.0R
- TableRowDefinition6.Length.Value = 19.0R
- TableRowDefinition7.Length.Value = 54.0R
- ItemTemplate3.Rows.Add(TableRowDefinition5)
- ItemTemplate3.Rows.Add(TableRowDefinition6)
- ItemTemplate3.Rows.Add(TableRowDefinition7)
- TableSpan2.ColumnSpan = 2
- TableSpan3.ColumnSpan = 2
- TableSpan3.RowIndex = 2
- ItemTemplate3.Spans.Add(TableSpan2)
- ItemTemplate3.Spans.Add(TableSpan3)
- Me.ChatViewOld.Templates.Add(ItemTemplate1)
- Me.ChatViewOld.Templates.Add(ItemTemplate2)
- Me.ChatViewOld.Templates.Add(ItemTemplate3)
- Me.ChatViewOld.TileColumns.Add(TableColumnDefinition7)
- Me.ChatViewOld.TileColumns.Add(TableColumnDefinition8)
- Me.ChatViewOld.TileRows.Add(TableRowDefinition8)
- Me.ChatViewOld.TileRows.Add(TableRowDefinition9)
- '
- 'btnSendMessage
- '
- Me.btnSendMessage.Dock = System.Windows.Forms.DockStyle.Right
- Me.btnSendMessage.ImageOptions.Image = CType(resources.GetObject("btnSendMessage.ImageOptions.Image"), System.Drawing.Image)
- Me.btnSendMessage.ImageOptions.Location = DevExpress.XtraEditors.ImageLocation.MiddleCenter
- Me.btnSendMessage.Location = New System.Drawing.Point(372, 0)
- Me.btnSendMessage.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
- Me.btnSendMessage.Name = "btnSendMessage"
- Me.btnSendMessage.PaintStyle = DevExpress.XtraEditors.Controls.PaintStyles.Light
- Me.btnSendMessage.Size = New System.Drawing.Size(49, 102)
- Me.btnSendMessage.TabIndex = 2
- Me.btnSendMessage.ToolTip = "Add message"
- '
- 'pnlMessage
- '
- Me.pnlMessage.BackColor = System.Drawing.Color.DimGray
- Me.pnlMessage.Controls.Add(Me.RichTextBox1)
- Me.pnlMessage.Controls.Add(Me.btnSendMessage)
- Me.pnlMessage.Controls.Add(Me.ListBoxUserMention)
- Me.pnlMessage.Dock = System.Windows.Forms.DockStyle.Bottom
- Me.pnlMessage.Location = New System.Drawing.Point(0, 485)
- Me.pnlMessage.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
- Me.pnlMessage.Name = "pnlMessage"
- Me.pnlMessage.Size = New System.Drawing.Size(421, 102)
- Me.pnlMessage.TabIndex = 3
- '
- 'RichTextBox1
- '
- Me.RichTextBox1.AutoWordSelection = True
- Me.RichTextBox1.Dock = System.Windows.Forms.DockStyle.Fill
- Me.RichTextBox1.Location = New System.Drawing.Point(0, 0)
- Me.RichTextBox1.Name = "RichTextBox1"
- Me.RichTextBox1.ShowSelectionMargin = True
- Me.RichTextBox1.Size = New System.Drawing.Size(372, 102)
- Me.RichTextBox1.TabIndex = 3
- Me.RichTextBox1.Text = ""
- '
- 'ListBoxUserMention
- '
- Me.ListBoxUserMention.BackColor = System.Drawing.SystemColors.Window
- Me.ListBoxUserMention.BorderStyle = System.Windows.Forms.BorderStyle.None
- Me.ListBoxUserMention.ForeColor = System.Drawing.Color.Blue
- Me.ListBoxUserMention.FormattingEnabled = True
- Me.ListBoxUserMention.ItemHeight = 16
- Me.ListBoxUserMention.Location = New System.Drawing.Point(176, 17)
- Me.ListBoxUserMention.Name = "ListBoxUserMention"
- Me.ListBoxUserMention.Size = New System.Drawing.Size(129, 80)
- Me.ListBoxUserMention.TabIndex = 4
- Me.ListBoxUserMention.Visible = False
- '
- 'MenuStrip1
- '
- Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsmitmTitle, Me.tsmenitmHamburger, Me.TeilnehmerToolStripMenuItem})
- Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
- Me.MenuStrip1.Name = "MenuStrip1"
- Me.MenuStrip1.Size = New System.Drawing.Size(421, 25)
- Me.MenuStrip1.TabIndex = 4
- Me.MenuStrip1.Text = "MenuStrip1"
- '
- 'tsmitmTitle
- '
- Me.tsmitmTitle.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.tsmitmTitle.Name = "tsmitmTitle"
- Me.tsmitmTitle.Size = New System.Drawing.Size(48, 21)
- Me.tsmitmTitle.Text = "sdsd"
- '
- 'tsmenitmHamburger
- '
- Me.tsmenitmHamburger.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
- Me.tsmenitmHamburger.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItemConv_end, Me.BenutzerHinzufügenToolStripMenuItem})
- Me.tsmenitmHamburger.Image = Global.DigitalData.Controls.ChatControl.My.Resources.Resources.kisspng_computer_icons_hamburger_button_menu_new_menu_5b34724c3cb0f7_1188475115301637882486
- Me.tsmenitmHamburger.Name = "tsmenitmHamburger"
- Me.tsmenitmHamburger.Size = New System.Drawing.Size(28, 21)
- '
- 'ToolStripMenuItemConv_end
- '
- Me.ToolStripMenuItemConv_end.Image = Global.DigitalData.Controls.ChatControl.My.Resources.Resources.StatusAnnotations_Stop_16xLG
- Me.ToolStripMenuItemConv_end.Name = "ToolStripMenuItemConv_end"
- Me.ToolStripMenuItemConv_end.Size = New System.Drawing.Size(192, 22)
- Me.ToolStripMenuItemConv_end.Text = "Konversation beenden"
- '
- 'BenutzerHinzufügenToolStripMenuItem
- '
- Me.BenutzerHinzufügenToolStripMenuItem.Image = Global.DigitalData.Controls.ChatControl.My.Resources.Resources.action_add_16xLG
- Me.BenutzerHinzufügenToolStripMenuItem.Name = "BenutzerHinzufügenToolStripMenuItem"
- Me.BenutzerHinzufügenToolStripMenuItem.Size = New System.Drawing.Size(192, 22)
- Me.BenutzerHinzufügenToolStripMenuItem.Text = "Benutzer hinzufügen"
- '
- 'TeilnehmerToolStripMenuItem
- '
- Me.TeilnehmerToolStripMenuItem.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
- Me.TeilnehmerToolStripMenuItem.ForeColor = System.Drawing.Color.DarkCyan
- Me.TeilnehmerToolStripMenuItem.Name = "TeilnehmerToolStripMenuItem"
- Me.TeilnehmerToolStripMenuItem.Size = New System.Drawing.Size(78, 21)
- Me.TeilnehmerToolStripMenuItem.Text = "Teilnehmer"
- '
- 'GridChat
- '
- Me.GridChat.BackgroundImage = Global.DigitalData.Controls.ChatControl.My.Resources.Resources.crop_php
- Me.GridChat.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
- Me.GridChat.Dock = System.Windows.Forms.DockStyle.Fill
- Me.GridChat.Location = New System.Drawing.Point(0, 238)
- Me.GridChat.MainView = Me.ChatView
- Me.GridChat.Name = "GridChat"
- Me.GridChat.Size = New System.Drawing.Size(421, 247)
- Me.GridChat.TabIndex = 5
- Me.GridChat.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ChatView})
- '
- 'ChatView
- '
- Me.ChatView.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.columnFromUser, Me.columnToUser, Me.columnAddedWhen})
- Me.ChatView.FocusRectStyle = DevExpress.XtraGrid.Views.Grid.DrawFocusRectStyle.RowFullFocus
- Me.ChatView.GridControl = Me.GridChat
- Me.ChatView.GroupPanelText = "Nachrichten können mit der Lupe durchsucht werden"
- Me.ChatView.Name = "ChatView"
- Me.ChatView.OptionsFind.SearchInPreview = True
- Me.ChatView.OptionsView.AutoCalcPreviewLineCount = True
- Me.ChatView.OptionsView.ShowColumnHeaders = False
- Me.ChatView.OptionsView.ShowHorizontalLines = DevExpress.Utils.DefaultBoolean.[False]
- Me.ChatView.OptionsView.ShowIndicator = False
- Me.ChatView.OptionsView.ShowPreview = True
- Me.ChatView.OptionsView.ShowPreviewRowLines = DevExpress.Utils.DefaultBoolean.[False]
- Me.ChatView.OptionsView.ShowVerticalLines = DevExpress.Utils.DefaultBoolean.[False]
- Me.ChatView.PreviewFieldName = "MESSAGE_TEXT"
- Me.ChatView.RowHeight = 25
- Me.ChatView.RowSeparatorHeight = 5
- '
- 'columnFromUser
- '
- Me.columnFromUser.AppearanceCell.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.columnFromUser.AppearanceCell.Options.UseFont = True
- Me.columnFromUser.FieldName = "USER_FROM"
- Me.columnFromUser.Name = "columnFromUser"
- Me.columnFromUser.OptionsColumn.AllowEdit = False
- Me.columnFromUser.Visible = True
- Me.columnFromUser.VisibleIndex = 0
- '
- 'columnToUser
- '
- Me.columnToUser.AppearanceCell.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold)
- Me.columnToUser.AppearanceCell.Options.UseFont = True
- Me.columnToUser.FieldName = "TO_USER"
- Me.columnToUser.Name = "columnToUser"
- Me.columnToUser.OptionsColumn.AllowEdit = False
- Me.columnToUser.Visible = True
- Me.columnToUser.VisibleIndex = 1
- '
- 'columnAddedWhen
- '
- Me.columnAddedWhen.AppearanceCell.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold)
- Me.columnAddedWhen.AppearanceCell.Options.UseFont = True
- Me.columnAddedWhen.FieldName = "ADDED_WHEN"
- Me.columnAddedWhen.Name = "columnAddedWhen"
- Me.columnAddedWhen.OptionsColumn.AllowEdit = False
- Me.columnAddedWhen.Visible = True
- Me.columnAddedWhen.VisibleIndex = 2
- '
- 'ChatControl
- '
- Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.Controls.Add(Me.GridChat)
- Me.Controls.Add(Me.GridChatOld)
- Me.Controls.Add(Me.pnlMessage)
- Me.Controls.Add(Me.MenuStrip1)
- Me.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
- Me.Name = "ChatControl"
- Me.Size = New System.Drawing.Size(421, 587)
- CType(Me.RepositoryItemHypertextLabel1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.RepositoryItemHyperLinkEdit1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.GridChatOld, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.ChatViewOld, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.ChatSource, System.ComponentModel.ISupportInitialize).EndInit()
- Me.pnlMessage.ResumeLayout(False)
- Me.MenuStrip1.ResumeLayout(False)
- Me.MenuStrip1.PerformLayout()
- CType(Me.GridChat, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.ChatView, System.ComponentModel.ISupportInitialize).EndInit()
- Me.ResumeLayout(False)
- Me.PerformLayout()
-
- End Sub
- Friend WithEvents GridChatOld As DevExpress.XtraGrid.GridControl
- Friend WithEvents ChatViewOld As DevExpress.XtraGrid.Views.Tile.TileView
- Friend WithEvents columnMessage As DevExpress.XtraGrid.Columns.TileViewColumn
- Friend WithEvents columnUsername As DevExpress.XtraGrid.Columns.TileViewColumn
- Friend WithEvents columnDate As DevExpress.XtraGrid.Columns.TileViewColumn
- Friend WithEvents ChatSource As BindingSource
- Friend WithEvents btnSendMessage As DevExpress.XtraEditors.SimpleButton
- Friend WithEvents RepositoryItemHyperLinkEdit1 As DevExpress.XtraEditors.Repository.RepositoryItemHyperLinkEdit
- Friend WithEvents RepositoryItemHypertextLabel1 As DevExpress.XtraEditors.Repository.RepositoryItemHypertextLabel
- Friend WithEvents pnlMessage As Panel
- Friend WithEvents MenuStrip1 As MenuStrip
- Friend WithEvents tsmitmTitle As ToolStripMenuItem
- Friend WithEvents tsmenitmHamburger As ToolStripMenuItem
- Friend WithEvents ToolStripMenuItemConv_end As ToolStripMenuItem
- Friend WithEvents BenutzerHinzufügenToolStripMenuItem As ToolStripMenuItem
- Friend WithEvents TeilnehmerToolStripMenuItem As ToolStripMenuItem
- Friend WithEvents RichTextBox1 As RichTextBox
- Friend WithEvents columnTO_USER As DevExpress.XtraGrid.Columns.TileViewColumn
- Friend WithEvents ListBoxUserMention As ListBox
- Friend WithEvents GridChat As DevExpress.XtraGrid.GridControl
- Friend WithEvents ChatView As DevExpress.XtraGrid.Views.Grid.GridView
- Friend WithEvents columnFromUser As DevExpress.XtraGrid.Columns.GridColumn
- Friend WithEvents columnAddedWhen As DevExpress.XtraGrid.Columns.GridColumn
- Friend WithEvents columnToUser As DevExpress.XtraGrid.Columns.GridColumn
-End Class
diff --git a/Controls.ChatControl/ChatControl.resx b/Controls.ChatControl/ChatControl.resx
deleted file mode 100644
index 05f8267d..00000000
--- a/Controls.ChatControl/ChatControl.resx
+++ /dev/null
@@ -1,164 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
-
- iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAACp0RVh0VGl0
- bGUARm9vdGVyO0FkZCBHcm91cCBGb290ZXI7Rm9vdGVyO0dyb3VwlRubyQAABwtJREFUWEetl3lQ1GUY
- x38ddpl2Oh1/mV2THTOVZU79o+bYMdNtpplTjZV55VGGoKQisiDHLnKJIIggCOJRKl4pAiLHgiiQTXdc
- oYAIArtcfXue5/29u0uxw9S0M5/5Pu8yvN/v876/991dg15XEFcSVxFXD8Gw/wDPy/PLC8AA+HXVliz7
- 8eTscgzKTqaM6jIkkSbRWKlJltItGhoLUtuRkFFynDw4PDc6aICr2ai//8//iX70mTVrQqadXa4hvAYY
- xmn5H3r7+gentx89jDmW2hwPrPtMVN1HYTZnlLLLtYRsw2ABrkmkpfIagCbTtZgw2tQ06zaNWaXuUcoB
- 4tOL2eU6wnsAXiZeLm3Gk7q69oT+pk0UNDbNunvMmnCa8FxxaUMHuHZzRokE0Mu4aYd9IBl/I92OONI4
- Wt7YdI1ddENCARzdva4AMamn2OV6wmuA6zZtVwFcnejOpFYd6q48cfT0EqayKcHKdHVTAJonKqWQXW4g
- vAfgZeK02ihme6lJibtOo5qI9iS1BFFEdGoxqcISdwJdTg7QK9sWmVygA/B9MGiA63mZOICTOnF3R0pd
- OP4GT6yg2jRiOllp3KlxqADWpHx2GU54D8DLxAHU8vUhalsxNgpFSlNYixCZUkwUwUZEbmVOUU1QbeOa
- CIzJJfMedBC8ohEJeUMGuIGXidPK3jn7pAPpzLMjgSdW3YnSe2zEtWhXDy5rJZwUIDT+BLvcSHgNMJyX
- iQNoEyt1Yk0+hQjCmlxIy1iIiCQaa7bwuBDhDNWasMSTWBN5TMzbCV7NkLjj7DKC8B6Al4mPn+rG3RF3
- I5id6bq9q9vEHHcqwzaXdqOto1sCWGK+HTLAjaHxubJf2pQ7CU0sQGgCKZ1rVRfIGRc2M/kK11i95289
- jEtkfolC8Haujz7KLiMJ/kAaNMAIXiZ+6vXSadqoS+mKYJXOTNiAkZoNiVaXOqXmZyhg4xF2uYnwHsAS
- e0wCtNNkTEh8PoLj81wavImUkZqIY/JhoTqIsNCY4dov7BAuXnYKHfQ8rbUdYpebCa8BRq6POirnWi+d
- 6sjp1svUFU2o4ck96wG0O9T+U0N8u/5a2zJkgJsCIo/IfmnDILrNgmIV60VzRYUYhsYmfO4D6T2luVgR
- kiNXeMK+RfCNf87FfMu4Y/OCnzQ+tYwzfGKfFVwB1loPyRFspU65C3kGzL3/J/q50M+D+9ngBrh7PtIr
- 4p5FdWMcKhtjUdkQjblBT+JMvc2oqLca5fXhxhdRE1wBbv4qPEfOf0u7k3B4qAPNVDe3EaRNbTSmWqkD
- TZdMuCYuUM1wgOXRE5D742Kk2acKnwQ+gfK6MKOsNsSw1wQbSyPdAW5ZFZojR1BMaaLw3dUI212F0OxK
- bCBCMs/CknkGQRkVWJdegYC001izrRyrU8rgn2JH9N5qFJ+7gF8a2vFzQxsd6X4s2zgBR39YiNTSqcJH
- AY+jpCbIKK4JNIp+CzAWW8e7A/iF7JcjqLsKzjqLA9+3Yj9zrhXfMN+1YG+1Yjexq4qobMHOymbUtXUj
- MmseltqewRLbeCyxKg5/Pw+pJVOwjfgs/GksCjMJfYp4+lsd4Fbf4H2yv3oJ120/TUYXEX2yQYgqIPIb
- sDG/HpFMXj1shPUEU4faVicWR4xHWe0G2GtDUFoTjJLfg5Bz7mNsK56CFGJ/1YfI/2Ul8n72xYmffPC+
- /2PkrwLc5rP+a3mYzrc6cP5SF1Yl25FNnYkhGWlDW16dGEbkKsKZ47WooQALw57CwXNzxYzZKjyPlKLn
- RZNZCVZmtt+j7gDLA/fIU9zY2iV8GV+E9NNN2F5+AWlEahlhP48UpvQ8thLJpY1IKm5EItFAWzA/ZBwO
- VM8Rk61Fk02zyUg+RbASSVQrJmGWR4DbPw/YI0eosbUTjRc7sciWhw+CjmL2uiOYHXAYs9YcxMzVBzHD
- PwfvrDyAaX778JbvPryx/Gu8Tpw8U481m+Zg+rKH8PbSBzGNmO33mBgpJmOW76N4bcEDxP14lXhl/n05
- OsCopWt3yR3wx8UuRUsnGgbQJVrfrMb1Zq25QNvGn3z62xQzy/cRZFfMwJbCScREvOvzCLtd8U3VHGPv
- 2Q+Nl+fe6zoFo5aszpYLyNOUTRpaOpQZw2Y89jCua+Zxh2idjImmTgnAhpll05B4cqIw48uHJcCeiveM
- XWfeM176eIwrwG2f+Wej5TLdARSihS4agS8jvoDoaPLdoC+bJvMiUpcQ1aLm3/gUkfJFNJMMM+xvIoHM
- mXeWj5UAWeUzjKzy6cb0z8e6Aoz81Cc1d9GqnWAWrsoawIKVmViglfHLxHytwg6lvqYS5VW1WGaZiRc/
- GkPcgxfmCAc5wNQPRhtT3h9tTF/mDsC/2/gLwyjiDuJOL9z1L7jbVJ6PPwm9/DaE8RdajUyGSTHyEAAA
- AABJRU5ErkJggg==
-
-
-
- 17, 17
-
-
- 131, 17
-
-
\ No newline at end of file
diff --git a/Controls.ChatControl/ChatControl.vb b/Controls.ChatControl/ChatControl.vb
deleted file mode 100644
index cfa0392c..00000000
--- a/Controls.ChatControl/ChatControl.vb
+++ /dev/null
@@ -1,477 +0,0 @@
-Imports DevExpress.XtraGrid.Views.Tile
-Imports DigitalData.Modules.Database
-Imports DigitalData.Modules.Logging
-
-Public Class ChatControl
- Private ReadOnly IdColumn As String = "GUID"
- Private ReadOnly IdentificationColumn As String = "USER_FROM"
- Private ReadOnly MessageColumn As String = "MESSAGE_TEXT"
- Private ReadOnly DateColumn As String = "ADDED_WHEN"
- Private ReadOnly ToUserColumn As String = "TO_USER"
-
- Public Delegate Sub ConversationEnded()
- Public Event Conversation_Ended As ConversationEnded
- Public Delegate Sub ConversationUsersAdded_Success()
- Public Event Conversation_UsersAdded_Success As ConversationUsersAdded_Success
- Private Db As MSSQLServer
- Private LogConfig As LogConfig
- Private Logger As Logger
-
- Private AddMessage As Boolean
-
- Private oAddUSerForm As Form
-
- 'Private ReadOnly UsernameColorsDict As New Dictionary(Of String, Color)
- 'Private ReadOnly UsernameColors As New List(Of Color) From {
- ' Color.Purple,
- ' Color.Red,
- ' Color.LightBlue,
- ' Color.DarkSeaGreen
- '}
- Private IsAssistKeyPressed As Boolean = False
-
- Private AssistListBox As ListBox = New ListBox()
-
- Public IDBObjectId As Long
- Public ConnStringIDB As String
- Public ConversationIdentification As String
- Public UserID As Long
- Public Username As String
- Public User_Language As String
- Public CurrentConversationID As Long
- Public CurrentConversation_State As String
- Public CurrentConversation_UserActive As Boolean
- Public oDTConv_User As DataTable
-
- Public CurrentMentionedUser As String
- Public CurrentMentionedUserID As Long
- Public CurrentIdentifier
- Public User_Datatable_Select As DataTable
- Public DT_Rights As DataTable
-
-
- Public QU_Conv_End As DataTable
-
- Public Sub New()
- InitializeComponent()
- End Sub
-
- Public Function Init(LogConfig As LogConfig, ConnectionStringIDB As String, ConversationIdentification As String, UserID As Long, Username As String, USER_LANG As String,
- Qust_Conv_End As DataTable, DTRIGHTS As DataTable)
- Try
- CurrentConversationID = 0
- Me.LogConfig = LogConfig
- Me.Logger = LogConfig.GetLogger()
- Me.ConnStringIDB = ConnectionStringIDB
- Me.ConversationIdentification = ConversationIdentification
- Me.UserID = UserID
- Me.Username = Username
- Me.User_Language = USER_LANG
- QU_Conv_End = Qust_Conv_End
- DT_Rights = DTRIGHTS
- Me.Db = New MSSQLServer(LogConfig, ConnStringIDB)
- Return True
- Catch ex As Exception
- Logger.Error(ex)
- Return False
- End Try
-
- End Function
- Sub Check_Rights()
- Dim oSQL As String
- ToolStripMenuItemConv_end.Visible = False
- tsmenitmHamburger.Visible = False
- AddMessage = False
- Dim oView As DataView = New DataView(DT_Rights)
- oView.RowFilter = "CONF_TITLE = 'CONVERSATION_USER_ACTIVE'"
- If oView.Count = 1 Then
- CurrentConversation_UserActive = True
- Else
- CurrentConversation_UserActive = False
- End If
-
- For Each oRow As DataRow In DT_Rights.Rows
- If oRow.Item("CONF_TITLE").ToString.Contains("CONVERSATION_RIGHT") Then
- Select Case oRow.Item("CONF_VALUE")
- Case "Start|Stop"
- ToolStripMenuItemConv_end.Visible = True
- tsmenitmHamburger.Visible = True
- AddMessage = True
- Case "AddMessage"
- AddMessage = True
- Case "Admin"
- ToolStripMenuItemConv_end.Visible = True
- BenutzerHinzufügenToolStripMenuItem.Visible = True
- tsmenitmHamburger.Visible = True
- AddMessage = True
- Case "Start"
- BenutzerHinzufügenToolStripMenuItem.Visible = True
- tsmenitmHamburger.Visible = True
- Case "Stop"
- ToolStripMenuItemConv_end.Visible = True
- End Select
- ElseIf oRow.Item("CONF_TITLE") = "CONVERSATION_ADD_USER_SELECT" Then
- oSQL = oRow.Item("CONF_VALUE")
- oSQL = oSQL.Replace("@CONVID", CurrentConversationID)
- User_Datatable_Select = Db.GetDatatable(oSQL)
- Logger.Debug($"User_Datatable_Select [{User_Datatable_Select}]")
- End If
-
-
- Next
- If CurrentConversation_State = "Started" Then
- pnlMessage.Visible = AddMessage
- Else
- pnlMessage.Visible = False
- tsmenitmHamburger.Visible = False
- End If
-
- End Sub
-
- Public Function GetConversations(IDBObjectId As Long)
- CurrentConversationID = 0
- Dim oSQL As String = $"SELECT DISTINCT T.CONVERSATION_ID,T.TITLE,T.CONVERSATION_STATE,T.ADDED_WHEN FROM VWIDB_CONVERSATION T INNER JOIN VWIDB_CONVERSATION_USER T1 ON T.CONVERSATION_ID = T1.CONV_ID WHERE IDB_OBJ_ID = {IDBObjectId}
- AND T1.USER_ID = {UserID}
- ORDER BY CONVERSATION_ID DESC"
- Dim oDatatable As DataTable = Db.GetDatatable(oSQL)
- Dim oConversations As New List(Of String)
- If Not IsNothing(oDatatable) Then
- Dim i = 0
- For Each oROW As DataRow In oDatatable.Rows
- Dim oItem = oROW.Item("CONVERSATION_ID").ToString + "|" + oROW.Item("TITLE").ToString + "|" + oROW.Item("CONVERSATION_STATE").ToString + "|" + oDatatable.Rows(0).Item("ADDED_WHEN").ToString
- oConversations.Insert(i, oItem)
- i += 1
- If oROW.Item("CONVERSATION_STATE") = "Started" Then
- If CurrentConversationID = 0 Then
- CurrentConversationID = oROW.Item("CONVERSATION_ID")
- LoadConversation(CurrentConversationID)
- End If
- End If
- Next
- End If
- Return oConversations
- End Function
-
- Public Sub LoadConversation(ConversationId As Long)
- ListBoxUserMention.Visible = False
- RichTextBox1.Text = ""
- Dim oSQL As String = $"SELECT * FROM VWIDB_CONV_MESSAGES WHERE CONV_ID = {ConversationId} ORDER BY GUID"
- Dim oDatatable As DataTable = Db.GetDatatable(oSQL)
- ' BuildUsernameColorDict(oDatatable)
- oSQL = $"SELECT * FROM VWIDB_CONVERSATION WHERE CONVERSATION_ID = {ConversationId}"
- Dim oDatatable2 As DataTable = Db.GetDatatable(oSQL)
-
- GridChatOld.DataSource = ChatSource
- GridChat.DataSource = ChatSource
-
- ChatSource.DataSource = oDatatable
- tsmitmTitle.Text = oDatatable2.Rows(0).Item("TITLE")
- CurrentConversationID = ConversationId
- CurrentConversation_State = oDatatable2.Rows(0).Item("CONVERSATION_STATE")
- oSQL = $"SELECT * FROM VWIDB_CONVERSATION_USER WHERE CONV_ID = {ConversationId}"
- oDTConv_User = Db.GetDatatable(oSQL)
- If TeilnehmerToolStripMenuItem.HasDropDownItems Then
- TeilnehmerToolStripMenuItem.DropDownItems.Clear()
- End If
-
- If ConversationIdentification.Contains("@") Then
- CurrentIdentifier = "EMAIL"
- Else
- CurrentIdentifier = "USERNAME"
- End If
- AssistListBox.Items.Clear()
- ListBoxUserMention.Items.Clear()
-
- Try
- For Each oROW As DataRow In oDTConv_User.Rows
-
- Dim oConvUser
- oConvUser = oROW.Item(CurrentIdentifier)
- If IsDBNull(oConvUser) Then
- oConvUser = String.Empty
- End If
-
- If oConvUser.ToString = String.Empty Then
- If CurrentIdentifier = "EMAIL" Then
- oConvUser = $"No Email for User '{oROW.Item("USERNAME")}'"
- Else
- oConvUser = $"No Identification for UserID '{oROW.Item("USER_ID")}'"
- End If
- Else
- Dim oToUser As String
- If oConvUser.ToString.Contains("@") Then
- oToUser = "@" & oConvUser.ToString.Substring(0, oConvUser.ToString.IndexOf("@"))
- Else
- oToUser = "@" & oConvUser.ToString
- End If
-
- ListBoxUserMention.Items.Add(oToUser)
- AssistListBox.Items.Add(oToUser)
-
- End If
- Dim oToolStripItem As ToolStripMenuItem = New ToolStripMenuItem(oConvUser.ToString)
- TeilnehmerToolStripMenuItem.DropDownItems.Add(oToolStripItem)
- Next
- AddHandler AssistListBox.SelectedIndexChanged, AddressOf AssistListBox_Changed
- Catch ex As Exception
- MsgBox(ex.Message, MsgBoxStyle.Critical, "Error adding ConversationUsers")
- End Try
-
- Check_Rights()
- End Sub
-
- Public Sub NewMessage(MessageText As String)
- Try
- Dim oSQL As String = $"EXEC [PRIDB_NEW_CONVERSATION_MESSAGE] {CurrentConversationID},'{MessageText}', '{ConversationIdentification}', {CurrentMentionedUserID},'{User_Language}'"
- Logger.Debug($"NewMessageSQL: {oSQL}")
- Dim oResult = Db.GetScalarValue(oSQL)
- LoadConversation(CurrentConversationID)
- RichTextBox1.Text = String.Empty
- ChatViewOld.MoveLast()
- ChatView.MoveLast()
- Catch ex As Exception
- Logger.Error(ex)
- End Try
- End Sub
-
- 'Private Sub BuildUsernameColorDict(Datatable As DataTable)
- ' Dim oIndex = 0
-
- ' UsernameColorsDict.Clear()
-
- ' Datatable.AsEnumerable().
- ' Select(Function(Row) Row.Item(IdentificationColumn)).
- ' Distinct().ToList().
- ' ForEach(Sub(Name)
- ' UsernameColorsDict.Add(Name, UsernameColors.Item(oIndex))
- ' oIndex += 1
- ' End Sub)
- 'End Sub
-
- Private Sub ChatView_CustomItemTemplate(sender As Object, e As TileViewCustomItemTemplateEventArgs) Handles ChatViewOld.CustomItemTemplate
- Dim oRow As DataRow = ChatViewOld.GetDataRow(e.RowHandle)
- Dim oIdentification As String = oRow.Item(IdentificationColumn)
- Dim oToUser = oRow.Item(ToUserColumn)
-
- If Not IsDBNull(oToUser) Then
- e.Template = e.Templates.Item("ChatTo")
- Else
- 'If oIdentification = ConversationIdentification Or oIdentification = Username Then
- ' e.Template = e.Templates.Item("ChatRight")
- 'Else
- ' e.Template = e.Templates.Item("ChatLeft")
- 'End If
- e.Template = e.Templates.Item("ChatLeft")
- End If
- End Sub
-
- Private Sub ChatView_ItemCustomize(sender As Object, e As TileViewItemCustomizeEventArgs) Handles ChatViewOld.ItemCustomize
- Dim oRow As DataRow = ChatViewOld.GetDataRow(e.RowHandle)
- Dim oUsername As String = oRow.Item(IdentificationColumn)
- Dim oMessage As String = oRow.Item(MessageColumn)
- Dim oToUser = oRow.Item(ToUserColumn)
- ' Dim oColor As Color = UsernameColorsDict.Item(oUsername)
-
- If oUsername = ConversationIdentification Or oUsername = Username Then
- e.Item.AppearanceItem.Normal.BackColor = Color.PaleTurquoise
- e.Item.Item(IdentificationColumn).Appearance.Normal.ForeColor = Color.Purple
- Else
- e.Item.Item(IdentificationColumn).Appearance.Normal.ForeColor = Color.Red
- End If
-
- e.Item.ItemSize = DevExpress.XtraEditors.TileItemSize.Wide
- End Sub
-
- Private Sub SimpleButton1_Click(sender As Object, e As EventArgs) Handles btnSendMessage.Click
- If RichTextBox1.Text.Count > 0 Then
- NewMessage(RichTextBox1.Text)
- End If
- End Sub
-
- Private Sub ToolStripMenuItemConv_end_Click(sender As Object, e As EventArgs) Handles ToolStripMenuItemConv_end.Click
- If CurrentConversationID <> 0 Then
- Dim result As MsgBoxResult
- result = MessageBox.Show(QU_Conv_End.Rows(0).Item("STRING1").ToString, QU_Conv_End.Rows(0).Item("STRING2").ToString, MessageBoxButtons.YesNo, MessageBoxIcon.Exclamation)
- If result = MsgBoxResult.Yes Then
- Dim oSQL = $"EXEC PRIDB_END_CONVERSATION {CurrentConversationID}, '{Username}', '{User_Language}'"
- If Db.ExecuteNonQuery(oSQL) = True Then
- RaiseEvent Conversation_Ended()
- Else
- MsgBox("Unexpected error in PRIDB_END_CONVERSATION - Check Your log!", MsgBoxStyle.Exclamation)
- End If
- End If
- End If
- End Sub
-
- Private Sub BenutzerHinzufügenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles BenutzerHinzufügenToolStripMenuItem.Click
- Dim oForm = New Form()
- Dim oaddUS As ChatAddUser.ChatAddUser = New ChatAddUser.ChatAddUser()
- oaddUS.Init(LogConfig, ConnStringIDB, CurrentConversationID, Username, User_Language, User_Datatable_Select)
- oForm.Controls.Add(oaddUS)
- oaddUS.Dock = DockStyle.Fill
- oForm.MaximizeBox = False
- oForm.MinimizeBox = False
- oForm.FormBorderStyle = FormBorderStyle.FixedDialog
- oForm.StartPosition = FormStartPosition.CenterScreen
- oForm.Text = ""
- AddHandler oaddUS.User_Added, AddressOf onUsersAdded
- oAddUSerForm = oForm
- oForm.ShowDialog()
- End Sub
-
- Sub onUsersAdded()
- RaiseEvent Conversation_UsersAdded_Success()
- oAddUSerForm.Close()
- End Sub
-
- Private Function GetPoint(ByVal textBoxControl As RichTextBox) As Point
- Dim graphics_1 As Graphics = Graphics.FromHwnd(textBoxControl.Handle)
- Dim size As SizeF = graphics_1.MeasureString(textBoxControl.Text.Substring(0, textBoxControl.SelectionStart), textBoxControl.Font)
- Dim coord As New Point(CInt(size.Width) + textBoxControl.Location.X, CInt(size.Height) + textBoxControl.Location.Y)
- Return coord
- End Function
-
-
-
- Private Sub RichTextBox1_KeyUp(sender As Object, e As KeyEventArgs) Handles RichTextBox1.KeyUp
- If e.Control And e.KeyCode = Keys.Enter And RichTextBox1.Text.Count > 0 Then
- NewMessage(RichTextBox1.Text)
- ElseIf (Keys.Alt AndAlso Keys.Control) And e.KeyCode = keys.Q Then
- With RichTextBox1
- ListBoxUserMention.Left = .GetPositionFromCharIndex(.SelectionStart).X + .Left + 10
- ListBoxUserMention.Top = .GetPositionFromCharIndex(.SelectionStart).Y + .Top + 20
- ' Jetzt ListBox einblendenden, Focus auf diese setzen
- ' und den ersten Eintrag selektieren
- ListBoxUserMention.Visible = True
- ListBoxUserMention.Focus()
- ListBoxUserMention.SelectedIndex = 0
- End With
-
- 'Dim opoint As Point = GetPoint(sender)
- 'AssistListBox.PointToClient(opoint)
- 'pnlMessage.Controls.Add(AssistListBox)
- 'AssistListBox.Show()
- 'AssistListBox.BringToFront()
-
- ' '@ was pressed
- End If
- End Sub
- Sub AssistListBox_Changed()
- Try
- RichTextBox1.Text = RichTextBox1.Text + AssistListBox.SelectedItem + ": "
- RichTextBox1.SelectionFont = New Font("Tahoma", 10, FontStyle.Bold And FontStyle.Underline)
- RichTextBox1.Text = RichTextBox1.Text.Replace("@@", "@")
- pnlMessage.Controls.Remove(AssistListBox)
- 'RichTextBox1.SelectedText = AssistListBox.SelectedItem
-
- Catch ex As Exception
- Logger.Error(ex)
- End Try
-
- End Sub
- Sub ADD_MentionedUser(pUser As String)
- Dim oPos As Integer = RichTextBox1.TextLength
- Dim oUsertext = pUser & ": "
- With RichTextBox1
- .AppendText(Replace(.Text, "@", vbNullString) & oPos)
- .Select(oPos, oUsertext.Length)
- .SelectionColor = Color.Blue
- .Select()
-
- End With
-
- End Sub
-
- Private Sub ListBoxUserMention_KeyUp(sender As Object, e As KeyEventArgs) Handles ListBoxUserMention.KeyUp
- If e.KeyCode = Keys.Return Then
- Dim oMentionedUser As String = ListBoxUserMention.SelectedItem
- 'ADD_MentionedUser(strTag)
- With RichTextBox1
-
- CUrrentMentionedUser = oMentionedUser
- ' Logger.Debug($"ListBoxUserMention_KeyUp.CurrentMentionedUser = {CurrentMentionedUser}")
- For Each oROW As DataRow In oDTConv_User.Rows
-
- Dim oConvUser2beChecked
- oConvUser2beChecked = oROW.Item(CurrentIdentifier)
- If IsDBNull(oConvUser2beChecked) Then
- oConvUser2beChecked = String.Empty
- End If
-
- If oConvUser2beChecked.ToString = String.Empty Then
- If CurrentIdentifier = "EMAIL" Then
- oConvUser2beChecked = $"No Email for User '{oROW.Item("USERNAME")}'"
- Else
- oConvUser2beChecked = $"No Identification for UserID '{oROW.Item("USER_ID")}'"
- End If
- End If
- CurrentMentionedUser = CurrentMentionedUser.Substring(1, CurrentMentionedUser.Length - 1)
- 'Logger.Debug($"oConvUser2beChecked = {CurrentMentionedUser}")
- If oConvUser2beChecked.ToString.Contains(CurrentMentionedUser) Then
- CurrentMentionedUserID = oROW.Item("USER_ID")
- Logger.Debug($"CurrentMentionedUserID Changed: {CurrentMentionedUserID}")
- End If
-
-
- Next
-
- ' Das "Steuerzeichen" # ersetzen durch einen NullString
- .Text = Replace(.Text, "@", vbNullString) & oMentionedUser & ": "
-
- ' wo soll der Cursor nach dem Einfügen in der RTB stehen?
- .SelectionStart = .TextLength
-
- ' Listbox wieder auf den ersten Eintrag setzen
- ' und ausblenden
- ListBoxUserMention.SelectedItem = 0
- ListBoxUserMention.Visible = False
-
- ' Focus wieder auf RTB setzen
- .Focus()
- End With
- End If
- End Sub
-
- Private Sub ChatView_CustomDrawRowPreview(sender As Object, e As DevExpress.XtraGrid.Views.Base.RowObjectCustomDrawEventArgs) Handles ChatView.CustomDrawRowPreview
- Dim oRow As DataRow = ChatViewOld.GetDataRow(e.RowHandle)
- Dim oUsername As String = oRow.Item(IdentificationColumn)
- Dim oToUser = oRow.Item(ToUserColumn)
- Dim oIsOwnMessage As Boolean = oUsername = ConversationIdentification Or oUsername = Username
-
- ' Eigene Nachrichten
- If oIsOwnMessage Then
- e.Appearance.BackColor = Color.White
- End If
-
- ' Andere Nachrichten
- If Not oIsOwnMessage Then
- e.Appearance.BackColor = Color.PaleTurquoise
- End If
- End Sub
-
- Private Sub ChatView_CustomDrawCell(sender As Object, e As DevExpress.XtraGrid.Views.Base.RowCellCustomDrawEventArgs) Handles ChatView.CustomDrawCell
- Dim oRow As DataRow = ChatViewOld.GetDataRow(e.RowHandle)
- Dim oUsername As String = oRow.Item(IdentificationColumn)
- Dim oToUser = oRow.Item(ToUserColumn)
-
- Dim oIsOwnMessage As Boolean = oUsername = ConversationIdentification Or oUsername = Username
-
- ' Eigene Nachrichten
- If oIsOwnMessage Then
- e.Appearance.BackColor = Color.White
- End If
-
- ' Andere Nachrichten
- If Not oIsOwnMessage Then
- If Not (IsNothing(oToUser) Or IsDBNull(oToUser)) Then
- If oToUser = Username Or oToUser = ConversationIdentification Then
- e.Appearance.BackColor = Color.LightSalmon
- Else
- e.Appearance.BackColor = Color.PaleTurquoise
- End If
- Else
- e.Appearance.BackColor = Color.PaleTurquoise
- End If
- End If
- End Sub
-End Class
diff --git a/Controls.ChatControl/ChatControl.vbproj b/Controls.ChatControl/ChatControl.vbproj
deleted file mode 100644
index c66aa477..00000000
--- a/Controls.ChatControl/ChatControl.vbproj
+++ /dev/null
@@ -1,186 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {1F278760-4F6B-42E8-B82D-01D4C8618340}
- Library
- DigitalData.Controls.ChatControl
- DigitalData.Controls.ChatControl
- 512
- Windows
- v4.6.1
- true
-
-
-
- true
- full
- true
- true
- bin\Debug\
- DigitalData.Controls.ChatControl.xml
- _MYFORMS=True
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.Controls.ChatControl.xml
- _MYFORMS=True
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
-
-
-
-
-
-
-
-
-
- ..\Controls.LookupGrid\obj\Debug\DigitalData.Controls.LookupGrid.dll
-
-
-
- ..\packages\NLog.4.7.10\lib\net45\NLog.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- True
- Application.myapp
-
-
- UserControl
-
-
- ChatControl.vb
-
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- ChatControl.vb
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
-
-
- {f0a807cc-be14-4b5b-9200-27c16156bd8a}
- ChatAddUser
-
-
- {eaf0ea75-5fa7-485d-89c7-b2d843b03a96}
- Database
-
-
- {903b2d7d-3b80-4be9-8713-7447b704e1b0}
- Logging
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Controls.ChatControl/ChatControl.vbproj.bak b/Controls.ChatControl/ChatControl.vbproj.bak
deleted file mode 100644
index efeea882..00000000
--- a/Controls.ChatControl/ChatControl.vbproj.bak
+++ /dev/null
@@ -1,185 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {1F278760-4F6B-42E8-B82D-01D4C8618340}
- Library
- DigitalData.Controls.ChatControl
- DigitalData.Controls.ChatControl
- 512
- Windows
- v4.6.1
- true
-
-
-
- true
- full
- true
- true
- bin\Debug\
- DigitalData.Controls.ChatControl.xml
- _MYFORMS=True
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.Controls.ChatControl.xml
- _MYFORMS=True
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
-
-
-
-
-
-
-
-
- ..\Controls.LookupGrid\obj\Debug\DigitalData.Controls.LookupGrid.dll
-
-
-
- ..\packages\NLog.4.7.10\lib\net45\NLog.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- True
- Application.myapp
-
-
- UserControl
-
-
- ChatControl.vb
-
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- ChatControl.vb
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
-
-
- {f0a807cc-be14-4b5b-9200-27c16156bd8a}
- ChatAddUser
-
-
- {eaf0ea75-5fa7-485d-89c7-b2d843b03a96}
- Database
-
-
- {903b2d7d-3b80-4be9-8713-7447b704e1b0}
- Logging
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Controls.ChatControl/My Project/AssemblyInfo.vb b/Controls.ChatControl/My Project/AssemblyInfo.vb
deleted file mode 100644
index f71c7e93..00000000
--- a/Controls.ChatControl/My Project/AssemblyInfo.vb
+++ /dev/null
@@ -1,34 +0,0 @@
-Imports System
-Imports System.Reflection
-Imports System.Runtime.InteropServices
-
-' Allgemeine Informationen über eine Assembly werden über die folgenden
-' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
-' die einer Assembly zugeordnet sind.
-
-' Werte der Assemblyattribute überprüfen
-
-
-
-
-
-
-
-
-
-
-'Die folgende GUID wird für die typelib-ID verwendet, wenn dieses Projekt für COM verfügbar gemacht wird.
-
-
-' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
-'
-' Hauptversion
-' Nebenversion
-' Buildnummer
-' Revision
-'
-' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
-' indem Sie "*" wie unten gezeigt eingeben:
-
-
-
diff --git a/Controls.ChatControl/My Project/Resources.Designer.vb b/Controls.ChatControl/My Project/Resources.Designer.vb
deleted file mode 100644
index ffd000d4..00000000
--- a/Controls.ChatControl/My Project/Resources.Designer.vb
+++ /dev/null
@@ -1,134 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-Imports System
-
-Namespace My.Resources
-
- 'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
- '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
- 'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
- 'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
- '''
- ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
- '''
- _
- Friend Module Resources
-
- Private resourceMan As Global.System.Resources.ResourceManager
-
- Private resourceCulture As Global.System.Globalization.CultureInfo
-
- '''
- ''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
- '''
- _
- Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
- Get
- If Object.ReferenceEquals(resourceMan, Nothing) Then
- Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DigitalData.Controls.ChatControl.Resources", GetType(Resources).Assembly)
- resourceMan = temp
- End If
- Return resourceMan
- End Get
- End Property
-
- '''
- ''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
- ''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
- '''
- _
- Friend Property Culture() As Global.System.Globalization.CultureInfo
- Get
- Return resourceCulture
- End Get
- Set
- resourceCulture = value
- End Set
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
- '''
- Friend ReadOnly Property action_add_16xLG() As System.Drawing.Bitmap
- Get
- Dim obj As Object = ResourceManager.GetObject("action_add_16xLG", resourceCulture)
- Return CType(obj,System.Drawing.Bitmap)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
- '''
- Friend ReadOnly Property Action_Workflow_Activate() As System.Drawing.Bitmap
- Get
- Dim obj As Object = ResourceManager.GetObject("Action_Workflow_Activate", resourceCulture)
- Return CType(obj,System.Drawing.Bitmap)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
- '''
- Friend ReadOnly Property Action_Workflow_Deactivate() As System.Drawing.Bitmap
- Get
- Dim obj As Object = ResourceManager.GetObject("Action_Workflow_Deactivate", resourceCulture)
- Return CType(obj,System.Drawing.Bitmap)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
- '''
- Friend ReadOnly Property crop_php() As System.Drawing.Bitmap
- Get
- Dim obj As Object = ResourceManager.GetObject("crop.php", resourceCulture)
- Return CType(obj,System.Drawing.Bitmap)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
- '''
- Friend ReadOnly Property kisspng_computer_icons_hamburger_button_menu_new_menu_5b34724c3cb0f7_1188475115301637882486() As System.Drawing.Bitmap
- Get
- Dim obj As Object = ResourceManager.GetObject("kisspng-computer-icons-hamburger-button-menu-new-menu-5b34724c3cb0f7.118847511530"& _
- "1637882486", resourceCulture)
- Return CType(obj,System.Drawing.Bitmap)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
- '''
- Friend ReadOnly Property Send_16x16() As System.Drawing.Bitmap
- Get
- Dim obj As Object = ResourceManager.GetObject("Send_16x16", resourceCulture)
- Return CType(obj,System.Drawing.Bitmap)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
- '''
- Friend ReadOnly Property StatusAnnotations_Stop_16xLG() As System.Drawing.Bitmap
- Get
- Dim obj As Object = ResourceManager.GetObject("StatusAnnotations_Stop_16xLG", resourceCulture)
- Return CType(obj,System.Drawing.Bitmap)
- End Get
- End Property
- End Module
-End Namespace
diff --git a/Controls.ChatControl/My Project/Resources.resx b/Controls.ChatControl/My Project/Resources.resx
deleted file mode 100644
index 5bfe3c6f..00000000
--- a/Controls.ChatControl/My Project/Resources.resx
+++ /dev/null
@@ -1,142 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
- ..\Resources\Action_Workflow_Deactivate.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
-
-
- ..\Resources\crop.php.jpeg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
-
-
- ..\Resources\Send_16x16.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
-
-
- ..\Resources\Action_Workflow_Activate.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
-
-
- ..\Resources\kisspng-computer-icons-hamburger-button-menu-new-menu-5b34724c3cb0f7.1188475115301637882486.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
-
-
- ..\Resources\StatusAnnotations_Stop_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
-
-
- ..\Resources\action_add_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
-
-
\ No newline at end of file
diff --git a/Controls.ChatControl/My Project/Settings.Designer.vb b/Controls.ChatControl/My Project/Settings.Designer.vb
deleted file mode 100644
index 7e6d6ee8..00000000
--- a/Controls.ChatControl/My Project/Settings.Designer.vb
+++ /dev/null
@@ -1,73 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- _
- Partial Friend NotInheritable Class MySettings
- Inherits Global.System.Configuration.ApplicationSettingsBase
-
- Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
-
-#Region "Automatische My.Settings-Speicherfunktion"
-#If _MyType = "WindowsForms" Then
- Private Shared addedHandler As Boolean
-
- Private Shared addedHandlerLockObject As New Object
-
- _
- Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
- If My.Application.SaveMySettingsOnExit Then
- My.Settings.Save()
- End If
- End Sub
-#End If
-#End Region
-
- Public Shared ReadOnly Property [Default]() As MySettings
- Get
-
-#If _MyType = "WindowsForms" Then
- If Not addedHandler Then
- SyncLock addedHandlerLockObject
- If Not addedHandler Then
- AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
- addedHandler = True
- End If
- End SyncLock
- End If
-#End If
- Return defaultInstance
- End Get
- End Property
- End Class
-End Namespace
-
-Namespace My
-
- _
- Friend Module MySettingsProperty
-
- _
- Friend ReadOnly Property Settings() As Global.DigitalData.Controls.ChatControl.My.MySettings
- Get
- Return Global.DigitalData.Controls.ChatControl.My.MySettings.Default
- End Get
- End Property
- End Module
-End Namespace
diff --git a/Controls.ChatControl/My Project/licenses.licx b/Controls.ChatControl/My Project/licenses.licx
deleted file mode 100644
index e69de29b..00000000
diff --git a/Controls.ChatControl/My Project/licenses.licx.bak b/Controls.ChatControl/My Project/licenses.licx.bak
deleted file mode 100644
index f21e86b6..00000000
--- a/Controls.ChatControl/My Project/licenses.licx.bak
+++ /dev/null
@@ -1,6 +0,0 @@
-DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.LookUpEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.ButtonEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
diff --git a/Controls.ChatControl/Resources/Action_Workflow_Activate.png b/Controls.ChatControl/Resources/Action_Workflow_Activate.png
deleted file mode 100644
index 5d967b1f..00000000
Binary files a/Controls.ChatControl/Resources/Action_Workflow_Activate.png and /dev/null differ
diff --git a/Controls.ChatControl/Resources/Action_Workflow_Deactivate.png b/Controls.ChatControl/Resources/Action_Workflow_Deactivate.png
deleted file mode 100644
index 54a077fb..00000000
Binary files a/Controls.ChatControl/Resources/Action_Workflow_Deactivate.png and /dev/null differ
diff --git a/Controls.ChatControl/Resources/Send_16x16.png b/Controls.ChatControl/Resources/Send_16x16.png
deleted file mode 100644
index add634c2..00000000
Binary files a/Controls.ChatControl/Resources/Send_16x16.png and /dev/null differ
diff --git a/Controls.ChatControl/Resources/StatusAnnotations_Stop_16xLG.png b/Controls.ChatControl/Resources/StatusAnnotations_Stop_16xLG.png
deleted file mode 100644
index 0e4a3ade..00000000
Binary files a/Controls.ChatControl/Resources/StatusAnnotations_Stop_16xLG.png and /dev/null differ
diff --git a/Controls.ChatControl/Resources/action_add_16xLG.png b/Controls.ChatControl/Resources/action_add_16xLG.png
deleted file mode 100644
index 92db8ebd..00000000
Binary files a/Controls.ChatControl/Resources/action_add_16xLG.png and /dev/null differ
diff --git a/Controls.ChatControl/Resources/crop.php.jpeg b/Controls.ChatControl/Resources/crop.php.jpeg
deleted file mode 100644
index 68360c3b..00000000
Binary files a/Controls.ChatControl/Resources/crop.php.jpeg and /dev/null differ
diff --git a/Controls.ChatControl/Resources/kisspng-computer-icons-hamburger-button-menu-new-menu-5b34724c3cb0f7.1188475115301637882486.png b/Controls.ChatControl/Resources/kisspng-computer-icons-hamburger-button-menu-new-menu-5b34724c3cb0f7.1188475115301637882486.png
deleted file mode 100644
index 6d4015f2..00000000
Binary files a/Controls.ChatControl/Resources/kisspng-computer-icons-hamburger-button-menu-new-menu-5b34724c3cb0f7.1188475115301637882486.png and /dev/null differ
diff --git a/Controls.ChatControl/packages.config b/Controls.ChatControl/packages.config
deleted file mode 100644
index 63f3075e..00000000
--- a/Controls.ChatControl/packages.config
+++ /dev/null
@@ -1,4 +0,0 @@
-
-
-
-
\ No newline at end of file
diff --git a/Controls.ChatNewConv/ChatNewConv.Designer.vb b/Controls.ChatNewConv/ChatNewConv.Designer.vb
deleted file mode 100644
index 08aa3d94..00000000
--- a/Controls.ChatNewConv/ChatNewConv.Designer.vb
+++ /dev/null
@@ -1,236 +0,0 @@
- _
-Partial Class ChatNewConv
- Inherits System.Windows.Forms.UserControl
-
- 'UserControl1 überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
- _
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- Try
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- Finally
- MyBase.Dispose(disposing)
- End Try
- End Sub
-
- 'Wird vom Windows Form-Designer benötigt.
- Private components As System.ComponentModel.IContainer
-
- 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
- 'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
- 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
- _
- Private Sub InitializeComponent()
- Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(ChatNewConv))
- Me.Panel1 = New System.Windows.Forms.Panel()
- Me.txtConv_Title = New System.Windows.Forms.TextBox()
- Me.Label1 = New System.Windows.Forms.Label()
- Me.Panel2 = New System.Windows.Forms.Panel()
- Me.SimpleButton1 = New DevExpress.XtraEditors.SimpleButton()
- Me.BackgroundWorker1 = New System.ComponentModel.BackgroundWorker()
- Me.AccordionControl1 = New DevExpress.XtraBars.Navigation.AccordionControl()
- Me.AccordionContentContainer1 = New DevExpress.XtraBars.Navigation.AccordionContentContainer()
- Me.GridControlUsers = New DevExpress.XtraGrid.GridControl()
- Me.GridViewUsers = New DevExpress.XtraGrid.Views.Grid.GridView()
- Me.AccordionContentContainer2 = New DevExpress.XtraBars.Navigation.AccordionContentContainer()
- Me.GridControlGroups = New DevExpress.XtraGrid.GridControl()
- Me.GridViewGroups = New DevExpress.XtraGrid.Views.Grid.GridView()
- Me.AccordionControlElement1 = New DevExpress.XtraBars.Navigation.AccordionControlElement()
- Me.AccordionControlElementUser = New DevExpress.XtraBars.Navigation.AccordionControlElement()
- Me.AccordionControlElementGroups = New DevExpress.XtraBars.Navigation.AccordionControlElement()
- Me.Panel1.SuspendLayout()
- Me.Panel2.SuspendLayout()
- CType(Me.AccordionControl1, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.AccordionControl1.SuspendLayout()
- Me.AccordionContentContainer1.SuspendLayout()
- CType(Me.GridControlUsers, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.GridViewUsers, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.AccordionContentContainer2.SuspendLayout()
- CType(Me.GridControlGroups, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.GridViewGroups, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.SuspendLayout()
- '
- 'Panel1
- '
- Me.Panel1.Controls.Add(Me.txtConv_Title)
- Me.Panel1.Controls.Add(Me.Label1)
- Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
- Me.Panel1.Location = New System.Drawing.Point(0, 0)
- Me.Panel1.Name = "Panel1"
- Me.Panel1.Size = New System.Drawing.Size(463, 57)
- Me.Panel1.TabIndex = 0
- '
- 'txtConv_Title
- '
- Me.txtConv_Title.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.txtConv_Title.Location = New System.Drawing.Point(6, 28)
- Me.txtConv_Title.Name = "txtConv_Title"
- Me.txtConv_Title.Size = New System.Drawing.Size(449, 23)
- Me.txtConv_Title.TabIndex = 1
- '
- 'Label1
- '
- Me.Label1.AutoSize = True
- Me.Label1.Location = New System.Drawing.Point(3, 11)
- Me.Label1.Name = "Label1"
- Me.Label1.Size = New System.Drawing.Size(345, 14)
- Me.Label1.TabIndex = 0
- Me.Label1.Text = "Bitte geben Sie einen aussagekräftigen Konversationstitel ein:"
- '
- 'Panel2
- '
- Me.Panel2.Controls.Add(Me.SimpleButton1)
- Me.Panel2.Dock = System.Windows.Forms.DockStyle.Bottom
- Me.Panel2.Location = New System.Drawing.Point(0, 413)
- Me.Panel2.Name = "Panel2"
- Me.Panel2.Size = New System.Drawing.Size(463, 59)
- Me.Panel2.TabIndex = 1
- '
- 'SimpleButton1
- '
- Me.SimpleButton1.Dock = System.Windows.Forms.DockStyle.Fill
- Me.SimpleButton1.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButton1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
- Me.SimpleButton1.Location = New System.Drawing.Point(0, 0)
- Me.SimpleButton1.Name = "SimpleButton1"
- Me.SimpleButton1.Size = New System.Drawing.Size(463, 59)
- Me.SimpleButton1.TabIndex = 0
- Me.SimpleButton1.Text = "Konversation anlegen"
- '
- 'AccordionControl1
- '
- Me.AccordionControl1.Controls.Add(Me.AccordionContentContainer1)
- Me.AccordionControl1.Controls.Add(Me.AccordionContentContainer2)
- Me.AccordionControl1.Dock = System.Windows.Forms.DockStyle.Fill
- Me.AccordionControl1.Elements.AddRange(New DevExpress.XtraBars.Navigation.AccordionControlElement() {Me.AccordionControlElement1})
- Me.AccordionControl1.Location = New System.Drawing.Point(0, 57)
- Me.AccordionControl1.Name = "AccordionControl1"
- Me.AccordionControl1.Size = New System.Drawing.Size(463, 356)
- Me.AccordionControl1.TabIndex = 5
- Me.AccordionControl1.Text = "AccordionControl1"
- '
- 'AccordionContentContainer1
- '
- Me.AccordionContentContainer1.Controls.Add(Me.GridControlUsers)
- Me.AccordionContentContainer1.Name = "AccordionContentContainer1"
- Me.AccordionContentContainer1.Size = New System.Drawing.Size(444, 177)
- Me.AccordionContentContainer1.TabIndex = 1
- '
- 'GridControlUsers
- '
- Me.GridControlUsers.Dock = System.Windows.Forms.DockStyle.Fill
- Me.GridControlUsers.Location = New System.Drawing.Point(0, 0)
- Me.GridControlUsers.MainView = Me.GridViewUsers
- Me.GridControlUsers.Name = "GridControlUsers"
- Me.GridControlUsers.Size = New System.Drawing.Size(444, 177)
- Me.GridControlUsers.TabIndex = 0
- Me.GridControlUsers.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewUsers})
- '
- 'GridViewUsers
- '
- Me.GridViewUsers.Appearance.EvenRow.BackColor = System.Drawing.Color.PaleTurquoise
- Me.GridViewUsers.Appearance.EvenRow.Options.UseBackColor = True
- Me.GridViewUsers.GridControl = Me.GridControlUsers
- Me.GridViewUsers.Name = "GridViewUsers"
- Me.GridViewUsers.OptionsBehavior.Editable = False
- Me.GridViewUsers.OptionsSelection.MultiSelect = True
- Me.GridViewUsers.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CheckBoxRowSelect
- Me.GridViewUsers.OptionsView.EnableAppearanceEvenRow = True
- Me.GridViewUsers.OptionsView.ShowAutoFilterRow = True
- Me.GridViewUsers.OptionsView.ShowGroupPanel = False
- '
- 'AccordionContentContainer2
- '
- Me.AccordionContentContainer2.Controls.Add(Me.GridControlGroups)
- Me.AccordionContentContainer2.Name = "AccordionContentContainer2"
- Me.AccordionContentContainer2.Size = New System.Drawing.Size(444, 96)
- Me.AccordionContentContainer2.TabIndex = 2
- '
- 'GridControlGroups
- '
- Me.GridControlGroups.Dock = System.Windows.Forms.DockStyle.Fill
- Me.GridControlGroups.Location = New System.Drawing.Point(0, 0)
- Me.GridControlGroups.MainView = Me.GridViewGroups
- Me.GridControlGroups.Name = "GridControlGroups"
- Me.GridControlGroups.Size = New System.Drawing.Size(444, 96)
- Me.GridControlGroups.TabIndex = 1
- Me.GridControlGroups.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewGroups})
- '
- 'GridViewGroups
- '
- Me.GridViewGroups.Appearance.EvenRow.BackColor = System.Drawing.Color.PaleTurquoise
- Me.GridViewGroups.Appearance.EvenRow.Options.UseBackColor = True
- Me.GridViewGroups.GridControl = Me.GridControlGroups
- Me.GridViewGroups.Name = "GridViewGroups"
- Me.GridViewGroups.OptionsBehavior.Editable = False
- Me.GridViewGroups.OptionsSelection.MultiSelect = True
- Me.GridViewGroups.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CheckBoxRowSelect
- Me.GridViewGroups.OptionsView.EnableAppearanceEvenRow = True
- Me.GridViewGroups.OptionsView.ShowAutoFilterRow = True
- Me.GridViewGroups.OptionsView.ShowGroupPanel = False
- '
- 'AccordionControlElement1
- '
- Me.AccordionControlElement1.Elements.AddRange(New DevExpress.XtraBars.Navigation.AccordionControlElement() {Me.AccordionControlElementUser, Me.AccordionControlElementGroups})
- Me.AccordionControlElement1.Expanded = True
- Me.AccordionControlElement1.Name = "AccordionControlElement1"
- Me.AccordionControlElement1.Text = "Bestimmen Sie wer an der Konversation teilnehmen kann:"
- '
- 'AccordionControlElementUser
- '
- Me.AccordionControlElementUser.ContentContainer = Me.AccordionContentContainer1
- Me.AccordionControlElementUser.Expanded = True
- Me.AccordionControlElementUser.Name = "AccordionControlElementUser"
- Me.AccordionControlElementUser.Style = DevExpress.XtraBars.Navigation.ElementStyle.Item
- Me.AccordionControlElementUser.Text = "User"
- '
- 'AccordionControlElementGroups
- '
- Me.AccordionControlElementGroups.ContentContainer = Me.AccordionContentContainer2
- Me.AccordionControlElementGroups.Expanded = True
- Me.AccordionControlElementGroups.Name = "AccordionControlElementGroups"
- Me.AccordionControlElementGroups.Style = DevExpress.XtraBars.Navigation.ElementStyle.Item
- Me.AccordionControlElementGroups.Text = "Gruppen"
- '
- 'ChatNewConv
- '
- Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 14.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.Controls.Add(Me.AccordionControl1)
- Me.Controls.Add(Me.Panel2)
- Me.Controls.Add(Me.Panel1)
- Me.Font = New System.Drawing.Font("Tahoma", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Name = "ChatNewConv"
- Me.Size = New System.Drawing.Size(463, 472)
- Me.Panel1.ResumeLayout(False)
- Me.Panel1.PerformLayout()
- Me.Panel2.ResumeLayout(False)
- CType(Me.AccordionControl1, System.ComponentModel.ISupportInitialize).EndInit()
- Me.AccordionControl1.ResumeLayout(False)
- Me.AccordionContentContainer1.ResumeLayout(False)
- CType(Me.GridControlUsers, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.GridViewUsers, System.ComponentModel.ISupportInitialize).EndInit()
- Me.AccordionContentContainer2.ResumeLayout(False)
- CType(Me.GridControlGroups, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.GridViewGroups, System.ComponentModel.ISupportInitialize).EndInit()
- Me.ResumeLayout(False)
-
- End Sub
-
- Friend WithEvents Panel1 As Panel
- Friend WithEvents txtConv_Title As TextBox
- Friend WithEvents Label1 As Label
- Friend WithEvents Panel2 As Panel
- Friend WithEvents BackgroundWorker1 As System.ComponentModel.BackgroundWorker
- Friend WithEvents AccordionControl1 As DevExpress.XtraBars.Navigation.AccordionControl
- Friend WithEvents AccordionContentContainer1 As DevExpress.XtraBars.Navigation.AccordionContentContainer
- Friend WithEvents GridControlUsers As DevExpress.XtraGrid.GridControl
- Friend WithEvents GridViewUsers As DevExpress.XtraGrid.Views.Grid.GridView
- Friend WithEvents AccordionContentContainer2 As DevExpress.XtraBars.Navigation.AccordionContentContainer
- Friend WithEvents GridControlGroups As DevExpress.XtraGrid.GridControl
- Friend WithEvents GridViewGroups As DevExpress.XtraGrid.Views.Grid.GridView
- Friend WithEvents AccordionControlElement1 As DevExpress.XtraBars.Navigation.AccordionControlElement
- Friend WithEvents AccordionControlElementUser As DevExpress.XtraBars.Navigation.AccordionControlElement
- Friend WithEvents AccordionControlElementGroups As DevExpress.XtraBars.Navigation.AccordionControlElement
- Friend WithEvents SimpleButton1 As DevExpress.XtraEditors.SimpleButton
-End Class
diff --git a/Controls.ChatNewConv/ChatNewConv.resx b/Controls.ChatNewConv/ChatNewConv.resx
deleted file mode 100644
index 398d46ab..00000000
--- a/Controls.ChatNewConv/ChatNewConv.resx
+++ /dev/null
@@ -1,142 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGICAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z
- ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5CbGFja3tmaWxsOiM3MjcyNzI7fQoJLkdyZWVue2ZpbGw6IzAz
- OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9Cgkuc3Qwe29wYWNpdHk6MC43NTt9Cgkuc3Qxe29wYWNp
- dHk6MC41O30KPC9zdHlsZT4NCiAgPGcgaWQ9IkFkZENpcmNsZWQiPg0KICAgIDxwYXRoIGQ9Ik0xNiw0
- QzkuNCw0LDQsOS40LDQsMTZzNS40LDEyLDEyLDEyczEyLTUuNCwxMi0xMlMyMi42LDQsMTYsNHogTTI0
- LDE4aC02djZoLTR2LTZIOHYtNGg2VjhoNHY2aDZWMTh6IiBjbGFzcz0iR3JlZW4iIC8+DQogIDwvZz4N
- Cjwvc3ZnPgs=
-
-
-
- 17, 17
-
-
\ No newline at end of file
diff --git a/Controls.ChatNewConv/ChatNewConv.resx.bak b/Controls.ChatNewConv/ChatNewConv.resx.bak
deleted file mode 100644
index 1b8ff1ab..00000000
--- a/Controls.ChatNewConv/ChatNewConv.resx.bak
+++ /dev/null
@@ -1,142 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGICAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z
- ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5CbGFja3tmaWxsOiM3MjcyNzI7fQoJLkdyZWVue2ZpbGw6IzAz
- OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9Cgkuc3Qwe29wYWNpdHk6MC43NTt9Cgkuc3Qxe29wYWNp
- dHk6MC41O30KPC9zdHlsZT4NCiAgPGcgaWQ9IkFkZENpcmNsZWQiPg0KICAgIDxwYXRoIGQ9Ik0xNiw0
- QzkuNCw0LDQsOS40LDQsMTZzNS40LDEyLDEyLDEyczEyLTUuNCwxMi0xMlMyMi42LDQsMTYsNHogTTI0
- LDE4aC02djZoLTR2LTZIOHYtNGg2VjhoNHY2aDZWMTh6IiBjbGFzcz0iR3JlZW4iIC8+DQogIDwvZz4N
- Cjwvc3ZnPgs=
-
-
-
- 17, 17
-
-
\ No newline at end of file
diff --git a/Controls.ChatNewConv/ChatNewConv.sln b/Controls.ChatNewConv/ChatNewConv.sln
deleted file mode 100644
index 7fbe294b..00000000
--- a/Controls.ChatNewConv/ChatNewConv.sln
+++ /dev/null
@@ -1,25 +0,0 @@
-
-Microsoft Visual Studio Solution File, Format Version 12.00
-# Visual Studio Version 16
-VisualStudioVersion = 16.0.29728.190
-MinimumVisualStudioVersion = 10.0.40219.1
-Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "ChatNewConv", "ChatNewConv.vbproj", "{1F278760-4F6B-42E8-B82D-01D4C8618340}"
-EndProject
-Global
- GlobalSection(SolutionConfigurationPlatforms) = preSolution
- Debug|Any CPU = Debug|Any CPU
- Release|Any CPU = Release|Any CPU
- EndGlobalSection
- GlobalSection(ProjectConfigurationPlatforms) = postSolution
- {1F278760-4F6B-42E8-B82D-01D4C8618340}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
- {1F278760-4F6B-42E8-B82D-01D4C8618340}.Debug|Any CPU.Build.0 = Debug|Any CPU
- {1F278760-4F6B-42E8-B82D-01D4C8618340}.Release|Any CPU.ActiveCfg = Release|Any CPU
- {1F278760-4F6B-42E8-B82D-01D4C8618340}.Release|Any CPU.Build.0 = Release|Any CPU
- EndGlobalSection
- GlobalSection(SolutionProperties) = preSolution
- HideSolutionNode = FALSE
- EndGlobalSection
- GlobalSection(ExtensibilityGlobals) = postSolution
- SolutionGuid = {7A1345F2-0B32-4B54-AD8C-2DA579BFF116}
- EndGlobalSection
-EndGlobal
diff --git a/Controls.ChatNewConv/ChatNewConv.vb b/Controls.ChatNewConv/ChatNewConv.vb
deleted file mode 100644
index dc02f996..00000000
--- a/Controls.ChatNewConv/ChatNewConv.vb
+++ /dev/null
@@ -1,115 +0,0 @@
-Imports DevExpress.XtraGrid.Views.Tile
-Imports DigitalData.Modules.Database
-Imports DigitalData.Modules.Logging
-
-Public Class ChatNewConv
- Public Delegate Sub ConversationCreated()
- Public Event Conversation_Created As ConversationCreated
- Private _Database As MSSQLServer
- Private LogConfig As LogConfig
- Private Logger As Logger
-
- Public IDBObjectId As Long
- Public ConnStringIDB As String
- Public Username As String
- Public UserID As Long
- Public User_Language As String
- Public NewConversation As Long
-
- Public Sub New()
- InitializeComponent()
- End Sub
-
- Public Sub Init(LogConfig As LogConfig, ConnectionStringIDB As String, IDB_OBJ_ID As Long, UserID As Long, Username As String, UserLanguage As String, DTUsers As DataTable, DTGroups As DataTable)
- Me.LogConfig = LogConfig
- Me.Logger = LogConfig.GetLogger()
- Me.ConnStringIDB = ConnectionStringIDB
- IDBObjectId = IDB_OBJ_ID
- Me.Username = Username
- Me.UserID = UserID
- Me.User_Language = UserLanguage
- Me._Database = New MSSQLServer(LogConfig, ConnectionStringIDB)
- If Not IsNothing(DTUsers) Then
- If DTUsers.Rows.Count > 1 Then
- AccordionControlElementUser.Visible = True
- GridControlUsers.DataSource = DTUsers
- Else
- AccordionControlElementUser.Visible = False
- End If
- Else
- AccordionControlElementUser.Visible = False
- End If
- If Not IsNothing(DTGroups) Then
- If DTGroups.Rows.Count > 1 Then
- AccordionControlElementGroups.Visible = True
- GridControlGroups.DataSource = DTUsers
- Try
- GridViewUsers.Columns("UserID").Visible = False
- Catch ex As Exception
- GridViewUsers.Columns("USER_ID").Visible = False
- End Try
-
- Else
- AccordionControlElementGroups.Visible = False
- End If
- Else
- AccordionControlElementGroups.Visible = False
- End If
-
- End Sub
-
- Private Sub SimpleButton1_Click(sender As Object, e As EventArgs) Handles SimpleButton1.Click
- Try
- If txtConv_Title.Text = String.Empty Then
- MsgBox("Please add a conversation-title!", MsgBoxStyle.Information)
- Exit Sub
- End If
- Dim oSQL = $"EXEC PRIDB_NEW_CONVERSATION {IDBObjectId},'{txtConv_Title.Text}','{Username}','{User_Language}'"
- If _Database.ExecuteNonQuery(oSQL) = True Then
- Dim oError As Boolean = False
- oSQL = $"SELECT MAX(CONVERSATION_ID) FROM VWIDB_CONVERSATION WHERE IDB_OBJ_ID = {IDBObjectId}"
- Dim oCONV_ID = _Database.GetScalarValue(oSQL)
- If Not IsNothing(oCONV_ID) Then
- NewConversation = oCONV_ID
- oSQL = $"EXEC PRIDB_ADD_USER_2_CONVERSATION {NewConversation},{UserID},'{Username}'"
- If _Database.ExecuteNonQuery(oSQL) = True Then
- Dim oSelectedUsers As Integer() = GridViewUsers.GetSelectedRows()
- If oSelectedUsers.Count > 0 Then
- For Each oRowHandle As Integer In oSelectedUsers
- Dim oUserID
- Try
- oUserID = GridViewUsers.GetRowCellValue(oRowHandle, "UserID")
- Catch ex As Exception
- Try
- oUserID = GridViewUsers.GetRowCellValue(oRowHandle, "USER_ID")
- Catch ex1 As Exception
- Logger.Warn("Error Selecting UserID/USER_ID: " & ex.Message)
- oError = True
- Exit Sub
- End Try
-
-
- End Try
-
- oSQL = $"EXEC PRIDB_ADD_USER_2_CONVERSATION {NewConversation},{oUserID},'{Username}'"
- If _Database.ExecuteNonQuery(oSQL) = False Then
- oError = True
- Exit For
- End If
- Next
- End If
- If oError = False Then
- RaiseEvent Conversation_Created()
- End If
- End If
-
- End If
- Else
- MsgBox("Error running create procedure. Check Your log!", MsgBoxStyle.Information)
- End If
-
- Catch ex As Exception
- MsgBox($"Unexpected error in Add Conversation: {ex.Message}")
- End Try
- End Sub
-End Class
diff --git a/Controls.ChatNewConv/ChatNewConv.vbproj b/Controls.ChatNewConv/ChatNewConv.vbproj
deleted file mode 100644
index 0835ac36..00000000
--- a/Controls.ChatNewConv/ChatNewConv.vbproj
+++ /dev/null
@@ -1,173 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {86D27FFA-480F-481D-8D23-26DEAE92FE6C}
- Library
- DigitalData.Controls.ChatNewConv
- DigitalData.Controls.ChatNewConv
- 512
- Windows
- v4.6.1
- true
-
-
-
- true
- full
- true
- true
- bin\Debug\
- DigitalData.Controls.ChatNewConv.xml
- _MYFORMS=True
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.Controls.ChatNewConv.xml
- _MYFORMS=True
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
-
-
-
-
-
-
-
-
-
- ..\Controls.LookupGrid\obj\Debug\DigitalData.Controls.LookupGrid.dll
-
-
-
- ..\packages\NLog.4.7.10\lib\net45\NLog.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- True
- Application.myapp
-
-
- UserControl
-
-
- ChatNewConv.vb
-
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- ChatNewConv.vb
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
-
-
- {eaf0ea75-5fa7-485d-89c7-b2d843b03a96}
- Database
-
-
- {903b2d7d-3b80-4be9-8713-7447b704e1b0}
- Logging
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Controls.ChatNewConv/ChatNewConv.vbproj.bak b/Controls.ChatNewConv/ChatNewConv.vbproj.bak
deleted file mode 100644
index 1f103073..00000000
--- a/Controls.ChatNewConv/ChatNewConv.vbproj.bak
+++ /dev/null
@@ -1,172 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {86D27FFA-480F-481D-8D23-26DEAE92FE6C}
- Library
- DigitalData.Controls.ChatNewConv
- DigitalData.Controls.ChatNewConv
- 512
- Windows
- v4.6.1
- true
-
-
-
- true
- full
- true
- true
- bin\Debug\
- DigitalData.Controls.ChatNewConv.xml
- _MYFORMS=True
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.Controls.ChatNewConv.xml
- _MYFORMS=True
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
-
-
-
-
-
-
-
-
- ..\Controls.LookupGrid\obj\Debug\DigitalData.Controls.LookupGrid.dll
-
-
-
- ..\packages\NLog.4.7.10\lib\net45\NLog.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- True
- Application.myapp
-
-
- UserControl
-
-
- ChatNewConv.vb
-
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- ChatNewConv.vb
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
-
-
- {eaf0ea75-5fa7-485d-89c7-b2d843b03a96}
- Database
-
-
- {903b2d7d-3b80-4be9-8713-7447b704e1b0}
- Logging
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Controls.ChatNewConv/My Project/AssemblyInfo.vb b/Controls.ChatNewConv/My Project/AssemblyInfo.vb
deleted file mode 100644
index e3c1975f..00000000
--- a/Controls.ChatNewConv/My Project/AssemblyInfo.vb
+++ /dev/null
@@ -1,34 +0,0 @@
-Imports System
-Imports System.Reflection
-Imports System.Runtime.InteropServices
-
-' Allgemeine Informationen über eine Assembly werden über die folgenden
-' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
-' die einer Assembly zugeordnet sind.
-
-' Werte der Assemblyattribute überprüfen
-
-
-
-
-
-
-
-
-
-
-'Die folgende GUID wird für die typelib-ID verwendet, wenn dieses Projekt für COM verfügbar gemacht wird.
-
-
-' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
-'
-' Hauptversion
-' Nebenversion
-' Buildnummer
-' Revision
-'
-' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
-' indem Sie "*" wie unten gezeigt eingeben:
-
-
-
diff --git a/Controls.ChatNewConv/My Project/Resources.Designer.vb b/Controls.ChatNewConv/My Project/Resources.Designer.vb
deleted file mode 100644
index 793a96e7..00000000
--- a/Controls.ChatNewConv/My Project/Resources.Designer.vb
+++ /dev/null
@@ -1,103 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-Imports System
-
-Namespace My.Resources
-
- 'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
- '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
- 'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
- 'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
- '''
- ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
- '''
- _
- Friend Module Resources
-
- Private resourceMan As Global.System.Resources.ResourceManager
-
- Private resourceCulture As Global.System.Globalization.CultureInfo
-
- '''
- ''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
- '''
- _
- Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
- Get
- If Object.ReferenceEquals(resourceMan, Nothing) Then
- Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DigitalData.Controls.ChatNewConv.Resources", GetType(Resources).Assembly)
- resourceMan = temp
- End If
- Return resourceMan
- End Get
- End Property
-
- '''
- ''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
- ''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
- '''
- _
- Friend Property Culture() As Global.System.Globalization.CultureInfo
- Get
- Return resourceCulture
- End Get
- Set
- resourceCulture = value
- End Set
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
- '''
- Friend ReadOnly Property Action_Workflow_Activate() As System.Drawing.Bitmap
- Get
- Dim obj As Object = ResourceManager.GetObject("Action_Workflow_Activate", resourceCulture)
- Return CType(obj,System.Drawing.Bitmap)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
- '''
- Friend ReadOnly Property Action_Workflow_Deactivate() As System.Drawing.Bitmap
- Get
- Dim obj As Object = ResourceManager.GetObject("Action_Workflow_Deactivate", resourceCulture)
- Return CType(obj,System.Drawing.Bitmap)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
- '''
- Friend ReadOnly Property crop_php() As System.Drawing.Bitmap
- Get
- Dim obj As Object = ResourceManager.GetObject("crop.php", resourceCulture)
- Return CType(obj,System.Drawing.Bitmap)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
- '''
- Friend ReadOnly Property Send_16x16() As System.Drawing.Bitmap
- Get
- Dim obj As Object = ResourceManager.GetObject("Send_16x16", resourceCulture)
- Return CType(obj,System.Drawing.Bitmap)
- End Get
- End Property
- End Module
-End Namespace
diff --git a/Controls.ChatNewConv/My Project/Resources.resx b/Controls.ChatNewConv/My Project/Resources.resx
deleted file mode 100644
index c8bf3f12..00000000
--- a/Controls.ChatNewConv/My Project/Resources.resx
+++ /dev/null
@@ -1,133 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
- ..\Resources\crop.php.jpeg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
-
-
- ..\Resources\Send_16x16.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
-
-
- ..\Resources\Action_Workflow_Activate.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
-
-
- ..\Resources\Action_Workflow_Deactivate.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
-
-
\ No newline at end of file
diff --git a/Controls.ChatNewConv/My Project/Settings.Designer.vb b/Controls.ChatNewConv/My Project/Settings.Designer.vb
deleted file mode 100644
index 44767256..00000000
--- a/Controls.ChatNewConv/My Project/Settings.Designer.vb
+++ /dev/null
@@ -1,73 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- _
- Partial Friend NotInheritable Class MySettings
- Inherits Global.System.Configuration.ApplicationSettingsBase
-
- Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
-
-#Region "Automatische My.Settings-Speicherfunktion"
-#If _MyType = "WindowsForms" Then
- Private Shared addedHandler As Boolean
-
- Private Shared addedHandlerLockObject As New Object
-
- _
- Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
- If My.Application.SaveMySettingsOnExit Then
- My.Settings.Save()
- End If
- End Sub
-#End If
-#End Region
-
- Public Shared ReadOnly Property [Default]() As MySettings
- Get
-
-#If _MyType = "WindowsForms" Then
- If Not addedHandler Then
- SyncLock addedHandlerLockObject
- If Not addedHandler Then
- AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
- addedHandler = True
- End If
- End SyncLock
- End If
-#End If
- Return defaultInstance
- End Get
- End Property
- End Class
-End Namespace
-
-Namespace My
-
- _
- Friend Module MySettingsProperty
-
- _
- Friend ReadOnly Property Settings() As Global.DigitalData.Controls.ChatNewConv.My.MySettings
- Get
- Return Global.DigitalData.Controls.ChatNewConv.My.MySettings.Default
- End Get
- End Property
- End Module
-End Namespace
diff --git a/Controls.ChatNewConv/My Project/licenses.licx b/Controls.ChatNewConv/My Project/licenses.licx
deleted file mode 100644
index e69de29b..00000000
diff --git a/Controls.ChatNewConv/My Project/licenses.licx.bak b/Controls.ChatNewConv/My Project/licenses.licx.bak
deleted file mode 100644
index 75eb9ac1..00000000
--- a/Controls.ChatNewConv/My Project/licenses.licx.bak
+++ /dev/null
@@ -1,6 +0,0 @@
-DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.GridLookUpEdit, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.LookUpEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.ButtonEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
diff --git a/Controls.ChatNewConv/Resources/Action_Workflow_Activate.png b/Controls.ChatNewConv/Resources/Action_Workflow_Activate.png
deleted file mode 100644
index 5d967b1f..00000000
Binary files a/Controls.ChatNewConv/Resources/Action_Workflow_Activate.png and /dev/null differ
diff --git a/Controls.ChatNewConv/Resources/Action_Workflow_Deactivate.png b/Controls.ChatNewConv/Resources/Action_Workflow_Deactivate.png
deleted file mode 100644
index 54a077fb..00000000
Binary files a/Controls.ChatNewConv/Resources/Action_Workflow_Deactivate.png and /dev/null differ
diff --git a/Controls.ChatNewConv/Resources/Send_16x16.png b/Controls.ChatNewConv/Resources/Send_16x16.png
deleted file mode 100644
index add634c2..00000000
Binary files a/Controls.ChatNewConv/Resources/Send_16x16.png and /dev/null differ
diff --git a/Controls.ChatNewConv/Resources/crop.php.jpeg b/Controls.ChatNewConv/Resources/crop.php.jpeg
deleted file mode 100644
index 68360c3b..00000000
Binary files a/Controls.ChatNewConv/Resources/crop.php.jpeg and /dev/null differ
diff --git a/Controls.ChatNewConv/packages.config b/Controls.ChatNewConv/packages.config
deleted file mode 100644
index 63f3075e..00000000
--- a/Controls.ChatNewConv/packages.config
+++ /dev/null
@@ -1,4 +0,0 @@
-
-
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Annotations.vb b/Controls.DocumentViewer/Annotations.vb
deleted file mode 100644
index 9bdc1aab..00000000
--- a/Controls.DocumentViewer/Annotations.vb
+++ /dev/null
@@ -1,68 +0,0 @@
-Imports DigitalData.Modules.Base
-Imports DigitalData.Modules.Logging
-Imports GdPicture14
-Imports GdPicture14.Annotations
-
-Public Class Annotations
- Inherits BaseClass
-
- Private Const DEFAULT_LEFT = 10
- Private Const DEFAULT_TOP = 10
- Private Const DEFAULT_WIDTH = 200
- Private Const DEFAULT_HEIGHT = 50
-
- Public Sub New(pLogConfig As LogConfig)
- MyBase.New(pLogConfig)
- End Sub
-
- Public Function AddAnnotationInteractive(pGDViewer As GdViewer, pText As String) As Boolean
- pGDViewer.AddTextAnnotationInteractive(pText, Color.Black, "Arial", Drawing.FontStyle.Bold Or Drawing.FontStyle.Underline, 12, True, Color.Red, Color.White, 1, 0)
- If pGDViewer.GetStat = GdPictureStatus.OK Then
- Return True
- Else
- Return False
- End If
- End Function
-
- Public Function AddAnnotation(pGDViewer As GdViewer, pText As String) As Boolean
- Try
- Dim oStatus As GdPictureStatus = GdPictureStatus.OK
- Using oManager As AnnotationManager = pGDViewer.GetAnnotationManager()
- If oManager.InitFromGdViewer(pGDViewer) = GdPictureStatus.OK AndAlso oManager.PageCount > 0 AndAlso oManager.SelectPage(1) = GdPictureStatus.OK Then
- Using oAnnotation As AnnotationText = oManager.AddTextAnnot(0, 0, 0, 0, pText)
- If oManager.GetStat = GdPictureStatus.OK AndAlso oAnnotation IsNot Nothing Then
- oAnnotation.Alignment = StringAlignment.Near
- oAnnotation.Author = Environment.UserName
- oAnnotation.Fill = True
- oAnnotation.FillColor = Color.LightYellow
- oAnnotation.FontSize = 16
- oAnnotation.ForeColor = Color.Black
- oAnnotation.Opacity = 0.7F
- oAnnotation.StrokeColor = Color.Yellow
- oAnnotation.Top = DEFAULT_TOP
- oAnnotation.Left = DEFAULT_LEFT
- oAnnotation.Width = DEFAULT_WIDTH
- oAnnotation.Height = DEFAULT_HEIGHT
- oAnnotation.Text = pText
-
- If oManager.SaveAnnotationsToPage() = GdPictureStatus.OK Then
- oManager.BurnAnnotationsToPage(True)
- End If
- End If
- End Using
- End If
- oStatus = oManager.GetStat()
- End Using
-
- If oStatus = GdPictureStatus.OK Then
- Return True
- Else
- Return False
- End If
- Catch ex As Exception
- Return False
- End Try
- End Function
-
-
-End Class
diff --git a/Controls.DocumentViewer/App.config b/Controls.DocumentViewer/App.config
deleted file mode 100644
index 5534e287..00000000
--- a/Controls.DocumentViewer/App.config
+++ /dev/null
@@ -1,6 +0,0 @@
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Config.vb b/Controls.DocumentViewer/Config.vb
deleted file mode 100644
index 54d76ae6..00000000
--- a/Controls.DocumentViewer/Config.vb
+++ /dev/null
@@ -1,10 +0,0 @@
-Public Class Config
- Public Enum PageFitSetting
- Undefined
- FitPage
- FitWidth
- End Enum
-
- Public Property PageFit
-
-End Class
diff --git a/Controls.DocumentViewer/DocumentViewer.Designer.vb b/Controls.DocumentViewer/DocumentViewer.Designer.vb
deleted file mode 100644
index b7cd68a9..00000000
--- a/Controls.DocumentViewer/DocumentViewer.Designer.vb
+++ /dev/null
@@ -1,441 +0,0 @@
-
-Partial Class DocumentViewer
- Inherits System.Windows.Forms.UserControl
-
- 'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
-
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- Try
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- Finally
- MyBase.Dispose(disposing)
- End Try
- End Sub
-
- 'Wird vom Windows Form-Designer benötigt.
- Private components As System.ComponentModel.IContainer
-
- 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
- 'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
- 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
-
- Private Sub InitializeComponent()
- Me.components = New System.ComponentModel.Container()
- Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(DocumentViewer))
- Me.GdViewer = New GdPicture14.GdViewer()
- Me.OpenFileDialog = New System.Windows.Forms.OpenFileDialog()
- Me.RichEditControl1 = New DevExpress.XtraRichEdit.RichEditControl()
- Me.BarManager1 = New DevExpress.XtraBars.BarManager(Me.components)
- Me.ToolbarDocumentViewer = New DevExpress.XtraBars.Bar()
- Me.buttonPrint = New DevExpress.XtraBars.BarButtonItem()
- Me.buttonFitWidth = New DevExpress.XtraBars.BarButtonItem()
- Me.buttonFitPage = New DevExpress.XtraBars.BarButtonItem()
- Me.buttonZoomIn = New DevExpress.XtraBars.BarButtonItem()
- Me.buttonZoomOut = New DevExpress.XtraBars.BarButtonItem()
- Me.buttonRotateLeft = New DevExpress.XtraBars.BarButtonItem()
- Me.buttonRotateRight = New DevExpress.XtraBars.BarButtonItem()
- Me.buttonFlipX = New DevExpress.XtraBars.BarButtonItem()
- Me.buttonFlipY = New DevExpress.XtraBars.BarButtonItem()
- Me.buttonFirstPage = New DevExpress.XtraBars.BarButtonItem()
- Me.buttonPrevPage = New DevExpress.XtraBars.BarButtonItem()
- Me.txtCurrentPage = New DevExpress.XtraBars.BarEditItem()
- Me.RepositoryItemTextEdit2 = New DevExpress.XtraEditors.Repository.RepositoryItemTextEdit()
- Me.labelPageCount = New DevExpress.XtraBars.BarStaticItem()
- Me.buttonNextPage = New DevExpress.XtraBars.BarButtonItem()
- Me.buttonLastPage = New DevExpress.XtraBars.BarButtonItem()
- Me.buttonSettings = New DevExpress.XtraBars.BarButtonItem()
- Me.barDockControlTop = New DevExpress.XtraBars.BarDockControl()
- Me.barDockControlBottom = New DevExpress.XtraBars.BarDockControl()
- Me.barDockControlLeft = New DevExpress.XtraBars.BarDockControl()
- Me.barDockControlRight = New DevExpress.XtraBars.BarDockControl()
- Me.BarStaticItem1 = New DevExpress.XtraBars.BarStaticItem()
- Me.RepositoryItemTextEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemTextEdit()
- Me.RepositoryItemColorEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemColorEdit()
- Me.RepositoryItemComboBox1 = New DevExpress.XtraEditors.Repository.RepositoryItemComboBox()
- Me.SpreadsheetControl1 = New DevExpress.XtraSpreadsheet.SpreadsheetControl()
- Me.PrintDocument1 = New System.Drawing.Printing.PrintDocument()
- CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.RepositoryItemTextEdit2, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.RepositoryItemTextEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.RepositoryItemColorEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.RepositoryItemComboBox1, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.SuspendLayout()
- '
- 'GdViewer
- '
- Me.GdViewer.AllowDropFile = False
- Me.GdViewer.AnimateGIF = True
- Me.GdViewer.AnnotationDropShadow = False
- Me.GdViewer.AnnotationEnableMultiSelect = True
- Me.GdViewer.AnnotationResizeRotateHandlesColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(128, Byte), Integer))
- Me.GdViewer.AnnotationResizeRotateHandlesScale = 1.0!
- Me.GdViewer.AnnotationSelectionLineColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer))
- Me.GdViewer.AutoScrollMargin = New System.Drawing.Size(0, 0)
- Me.GdViewer.AutoScrollMinSize = New System.Drawing.Size(0, 0)
- Me.GdViewer.BackColor = System.Drawing.SystemColors.AppWorkspace
- Me.GdViewer.BackgroundImage = Nothing
- Me.GdViewer.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
- Me.GdViewer.ClipAnnotsToPageBounds = True
- Me.GdViewer.ClipRegionsToPageBounds = True
- Me.GdViewer.ContinuousViewMode = True
- Me.GdViewer.DisplayQuality = GdPicture14.DisplayQuality.DisplayQualityAutomatic
- Me.GdViewer.DisplayQualityAuto = True
- Me.GdViewer.Dock = System.Windows.Forms.DockStyle.Fill
- Me.GdViewer.DocumentAlignment = GdPicture14.ViewerDocumentAlignment.DocumentAlignmentMiddleCenter
- Me.GdViewer.DocumentPosition = GdPicture14.ViewerDocumentPosition.DocumentPositionMiddleCenter
- Me.GdViewer.DrawPageBorders = True
- Me.GdViewer.EnableDeferredPainting = True
- Me.GdViewer.EnabledProgressBar = True
- Me.GdViewer.EnableICM = False
- Me.GdViewer.EnableMenu = True
- Me.GdViewer.EnableMouseWheel = True
- Me.GdViewer.EnableTextSelection = True
- Me.GdViewer.ForceScrollBars = False
- Me.GdViewer.ForceTemporaryMode = False
- Me.GdViewer.ForeColor = System.Drawing.Color.Black
- Me.GdViewer.Gamma = 1.0!
- Me.GdViewer.HQAnnotationRendering = True
- Me.GdViewer.IgnoreDocumentResolution = False
- Me.GdViewer.KeepDocumentPosition = False
- Me.GdViewer.Location = New System.Drawing.Point(0, 33)
- Me.GdViewer.LockViewer = False
- Me.GdViewer.MagnifierHeight = 90
- Me.GdViewer.MagnifierWidth = 160
- Me.GdViewer.MagnifierZoomX = 2.0!
- Me.GdViewer.MagnifierZoomY = 2.0!
- Me.GdViewer.MouseButtonForMouseMode = GdPicture14.MouseButton.MouseButtonLeft
- Me.GdViewer.MouseMode = GdPicture14.ViewerMouseMode.MouseModePan
- Me.GdViewer.MouseWheelMode = GdPicture14.ViewerMouseWheelMode.MouseWheelModeVerticalScroll
- Me.GdViewer.Name = "GdViewer"
- Me.GdViewer.PageBordersColor = System.Drawing.Color.Black
- Me.GdViewer.PageBordersPenSize = 1
- Me.GdViewer.PageDisplayMode = GdPicture14.PageDisplayMode.MultiplePagesView
- Me.GdViewer.PdfDisplayFormField = True
- Me.GdViewer.PdfEnableFileLinks = True
- Me.GdViewer.PdfEnableLinks = True
- Me.GdViewer.PdfIncreaseTextContrast = False
- Me.GdViewer.PdfShowDialogForPassword = True
- Me.GdViewer.PdfShowOpenFileDialogForDecryption = True
- Me.GdViewer.PdfVerifyDigitalCertificates = False
- Me.GdViewer.PreserveViewRotation = True
- Me.GdViewer.RectBorderColor = System.Drawing.Color.Black
- Me.GdViewer.RectBorderSize = 1
- Me.GdViewer.RectIsEditable = True
- Me.GdViewer.RegionsAreEditable = True
- Me.GdViewer.RenderGdPictureAnnots = True
- Me.GdViewer.ScrollBars = True
- Me.GdViewer.ScrollLargeChange = CType(50, Short)
- Me.GdViewer.ScrollSmallChange = CType(1, Short)
- Me.GdViewer.SilentMode = True
- Me.GdViewer.Size = New System.Drawing.Size(1079, 557)
- Me.GdViewer.TabIndex = 0
- Me.GdViewer.ViewRotation = System.Drawing.RotateFlipType.RotateNoneFlipNone
- Me.GdViewer.Zoom = 1.0R
- Me.GdViewer.ZoomCenterAtMousePosition = False
- Me.GdViewer.ZoomMode = GdPicture14.ViewerZoomMode.ZoomMode100
- Me.GdViewer.ZoomStep = 25
- '
- 'OpenFileDialog
- '
- Me.OpenFileDialog.FileName = "OpenFileDialog1"
- '
- 'RichEditControl1
- '
- Me.RichEditControl1.Location = New System.Drawing.Point(735, 377)
- Me.RichEditControl1.MenuManager = Me.BarManager1
- Me.RichEditControl1.Name = "RichEditControl1"
- Me.RichEditControl1.Options.HorizontalRuler.Visibility = DevExpress.XtraRichEdit.RichEditRulerVisibility.Hidden
- Me.RichEditControl1.Options.VerticalRuler.Visibility = DevExpress.XtraRichEdit.RichEditRulerVisibility.Hidden
- Me.RichEditControl1.ReadOnly = True
- Me.RichEditControl1.Size = New System.Drawing.Size(249, 161)
- Me.RichEditControl1.TabIndex = 8
- Me.RichEditControl1.Visible = False
- '
- 'BarManager1
- '
- Me.BarManager1.Bars.AddRange(New DevExpress.XtraBars.Bar() {Me.ToolbarDocumentViewer})
- Me.BarManager1.DockControls.Add(Me.barDockControlTop)
- Me.BarManager1.DockControls.Add(Me.barDockControlBottom)
- Me.BarManager1.DockControls.Add(Me.barDockControlLeft)
- Me.BarManager1.DockControls.Add(Me.barDockControlRight)
- Me.BarManager1.Form = Me
- Me.BarManager1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.buttonPrint, Me.buttonFitPage, Me.buttonFitWidth, Me.buttonZoomIn, Me.buttonZoomOut, Me.buttonRotateRight, Me.buttonRotateLeft, Me.buttonFlipX, Me.buttonFlipY, Me.buttonSettings, Me.buttonPrevPage, Me.buttonNextPage, Me.buttonFirstPage, Me.buttonLastPage, Me.txtCurrentPage, Me.BarStaticItem1, Me.labelPageCount})
- Me.BarManager1.MainMenu = Me.ToolbarDocumentViewer
- Me.BarManager1.MaxItemId = 26
- Me.BarManager1.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemTextEdit1, Me.RepositoryItemTextEdit2, Me.RepositoryItemColorEdit1, Me.RepositoryItemComboBox1})
- '
- 'ToolbarDocumentViewer
- '
- Me.ToolbarDocumentViewer.BarName = "Hauptmenü"
- Me.ToolbarDocumentViewer.DockCol = 0
- Me.ToolbarDocumentViewer.DockRow = 0
- Me.ToolbarDocumentViewer.DockStyle = DevExpress.XtraBars.BarDockStyle.Top
- Me.ToolbarDocumentViewer.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.buttonPrint), New DevExpress.XtraBars.LinkPersistInfo(Me.buttonFitWidth), New DevExpress.XtraBars.LinkPersistInfo(Me.buttonFitPage), New DevExpress.XtraBars.LinkPersistInfo(Me.buttonZoomIn), New DevExpress.XtraBars.LinkPersistInfo(Me.buttonZoomOut), New DevExpress.XtraBars.LinkPersistInfo(Me.buttonRotateLeft), New DevExpress.XtraBars.LinkPersistInfo(Me.buttonRotateRight), New DevExpress.XtraBars.LinkPersistInfo(Me.buttonFlipX), New DevExpress.XtraBars.LinkPersistInfo(Me.buttonFlipY), New DevExpress.XtraBars.LinkPersistInfo(Me.buttonFirstPage), New DevExpress.XtraBars.LinkPersistInfo(Me.buttonPrevPage), New DevExpress.XtraBars.LinkPersistInfo(Me.txtCurrentPage), New DevExpress.XtraBars.LinkPersistInfo(Me.labelPageCount), New DevExpress.XtraBars.LinkPersistInfo(Me.buttonNextPage), New DevExpress.XtraBars.LinkPersistInfo(Me.buttonLastPage), New DevExpress.XtraBars.LinkPersistInfo(DevExpress.XtraBars.BarLinkUserDefines.PaintStyle, Me.buttonSettings, DevExpress.XtraBars.BarItemPaintStyle.Standard)})
- Me.ToolbarDocumentViewer.OptionsBar.AllowCollapse = True
- Me.ToolbarDocumentViewer.OptionsBar.AllowQuickCustomization = False
- Me.ToolbarDocumentViewer.OptionsBar.DrawDragBorder = False
- Me.ToolbarDocumentViewer.OptionsBar.UseWholeRow = True
- Me.ToolbarDocumentViewer.Text = "Hauptmenü"
- '
- 'buttonPrint
- '
- Me.buttonPrint.Caption = "Drucken"
- Me.buttonPrint.Id = 0
- Me.buttonPrint.ImageOptions.SvgImage = CType(resources.GetObject("buttonPrint.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
- Me.buttonPrint.ImageOptions.SvgImageSize = New System.Drawing.Size(25, 25)
- Me.buttonPrint.Name = "buttonPrint"
- '
- 'buttonFitWidth
- '
- Me.buttonFitWidth.Caption = "An Breite anpassen"
- Me.buttonFitWidth.Id = 2
- Me.buttonFitWidth.ImageOptions.SvgImage = Global.DigitalData.Controls.DocumentViewer.My.Resources.Resources.fittowidth
- Me.buttonFitWidth.ImageOptions.SvgImageSize = New System.Drawing.Size(25, 25)
- Me.buttonFitWidth.Name = "buttonFitWidth"
- '
- 'buttonFitPage
- '
- Me.buttonFitPage.Caption = "An Seite Anpassen"
- Me.buttonFitPage.Id = 1
- Me.buttonFitPage.ImageOptions.SvgImage = Global.DigitalData.Controls.DocumentViewer.My.Resources.Resources.fittopage
- Me.buttonFitPage.ImageOptions.SvgImageSize = New System.Drawing.Size(25, 25)
- Me.buttonFitPage.Name = "buttonFitPage"
- '
- 'buttonZoomIn
- '
- Me.buttonZoomIn.Caption = "Zoom +"
- Me.buttonZoomIn.Id = 3
- Me.buttonZoomIn.ImageOptions.SvgImage = Global.DigitalData.Controls.DocumentViewer.My.Resources.Resources.zoomin
- Me.buttonZoomIn.ImageOptions.SvgImageSize = New System.Drawing.Size(25, 25)
- Me.buttonZoomIn.Name = "buttonZoomIn"
- '
- 'buttonZoomOut
- '
- Me.buttonZoomOut.Caption = "Zoom -"
- Me.buttonZoomOut.Id = 4
- Me.buttonZoomOut.ImageOptions.SvgImage = CType(resources.GetObject("buttonZoomOut.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
- Me.buttonZoomOut.ImageOptions.SvgImageSize = New System.Drawing.Size(25, 25)
- Me.buttonZoomOut.Name = "buttonZoomOut"
- '
- 'buttonRotateLeft
- '
- Me.buttonRotateLeft.Caption = "Drehen -90 Grad"
- Me.buttonRotateLeft.Id = 6
- Me.buttonRotateLeft.ImageOptions.SvgImage = Global.DigitalData.Controls.DocumentViewer.My.Resources.Resources.rotatecounterclockwise
- Me.buttonRotateLeft.ImageOptions.SvgImageSize = New System.Drawing.Size(25, 25)
- Me.buttonRotateLeft.Name = "buttonRotateLeft"
- '
- 'buttonRotateRight
- '
- Me.buttonRotateRight.Caption = "Drehen 90 Grad"
- Me.buttonRotateRight.Id = 5
- Me.buttonRotateRight.ImageOptions.SvgImage = Global.DigitalData.Controls.DocumentViewer.My.Resources.Resources.rotateclockwise
- Me.buttonRotateRight.ImageOptions.SvgImageSize = New System.Drawing.Size(25, 25)
- Me.buttonRotateRight.Name = "buttonRotateRight"
- '
- 'buttonFlipX
- '
- Me.buttonFlipX.Caption = "Spiegeln Horizontal"
- Me.buttonFlipX.Id = 7
- Me.buttonFlipX.ImageOptions.SvgImage = Global.DigitalData.Controls.DocumentViewer.My.Resources.Resources.flipimage_horizontal
- Me.buttonFlipX.ImageOptions.SvgImageSize = New System.Drawing.Size(25, 25)
- Me.buttonFlipX.Name = "buttonFlipX"
- '
- 'buttonFlipY
- '
- Me.buttonFlipY.Caption = "Spiegeln Vertikal"
- Me.buttonFlipY.Id = 8
- Me.buttonFlipY.ImageOptions.SvgImage = Global.DigitalData.Controls.DocumentViewer.My.Resources.Resources.flipimage_vertical
- Me.buttonFlipY.ImageOptions.SvgImageSize = New System.Drawing.Size(25, 25)
- Me.buttonFlipY.Name = "buttonFlipY"
- '
- 'buttonFirstPage
- '
- Me.buttonFirstPage.Caption = "Erste Seite"
- Me.buttonFirstPage.Id = 13
- Me.buttonFirstPage.ImageOptions.SvgImage = Global.DigitalData.Controls.DocumentViewer.My.Resources.Resources.doublefirst
- Me.buttonFirstPage.ImageOptions.SvgImageSize = New System.Drawing.Size(25, 25)
- Me.buttonFirstPage.Name = "buttonFirstPage"
- '
- 'buttonPrevPage
- '
- Me.buttonPrevPage.Caption = "Zurück"
- Me.buttonPrevPage.Id = 11
- Me.buttonPrevPage.ImageOptions.SvgImage = Global.DigitalData.Controls.DocumentViewer.My.Resources.Resources.prev
- Me.buttonPrevPage.ImageOptions.SvgImageSize = New System.Drawing.Size(25, 25)
- Me.buttonPrevPage.Name = "buttonPrevPage"
- '
- 'txtCurrentPage
- '
- Me.txtCurrentPage.Caption = "BarEditItem1"
- Me.txtCurrentPage.Edit = Me.RepositoryItemTextEdit2
- Me.txtCurrentPage.Id = 16
- Me.txtCurrentPage.Name = "txtCurrentPage"
- '
- 'RepositoryItemTextEdit2
- '
- Me.RepositoryItemTextEdit2.AutoHeight = False
- Me.RepositoryItemTextEdit2.DisplayFormat.FormatType = DevExpress.Utils.FormatType.Numeric
- Me.RepositoryItemTextEdit2.EditFormat.FormatType = DevExpress.Utils.FormatType.Numeric
- Me.RepositoryItemTextEdit2.Name = "RepositoryItemTextEdit2"
- '
- 'labelPageCount
- '
- Me.labelPageCount.Caption = "/ 0"
- Me.labelPageCount.Id = 24
- Me.labelPageCount.Name = "labelPageCount"
- '
- 'buttonNextPage
- '
- Me.buttonNextPage.Caption = "Vor"
- Me.buttonNextPage.Id = 12
- Me.buttonNextPage.ImageOptions.SvgImage = Global.DigitalData.Controls.DocumentViewer.My.Resources.Resources._next
- Me.buttonNextPage.ImageOptions.SvgImageSize = New System.Drawing.Size(25, 25)
- Me.buttonNextPage.Name = "buttonNextPage"
- '
- 'buttonLastPage
- '
- Me.buttonLastPage.Caption = "Letzte Seite"
- Me.buttonLastPage.Id = 14
- Me.buttonLastPage.ImageOptions.SvgImage = Global.DigitalData.Controls.DocumentViewer.My.Resources.Resources.doublelast
- Me.buttonLastPage.ImageOptions.SvgImageSize = New System.Drawing.Size(25, 25)
- Me.buttonLastPage.Name = "buttonLastPage"
- '
- 'buttonSettings
- '
- Me.buttonSettings.Alignment = DevExpress.XtraBars.BarItemLinkAlignment.Right
- Me.buttonSettings.Caption = "Einstellungen"
- Me.buttonSettings.Id = 9
- Me.buttonSettings.ImageOptions.SvgImage = Global.DigitalData.Controls.DocumentViewer.My.Resources.Resources.viewsettings
- Me.buttonSettings.ImageOptions.SvgImageSize = New System.Drawing.Size(25, 25)
- Me.buttonSettings.Name = "buttonSettings"
- Me.buttonSettings.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
- '
- 'barDockControlTop
- '
- Me.barDockControlTop.CausesValidation = False
- Me.barDockControlTop.Dock = System.Windows.Forms.DockStyle.Top
- Me.barDockControlTop.Location = New System.Drawing.Point(0, 0)
- Me.barDockControlTop.Manager = Me.BarManager1
- Me.barDockControlTop.Size = New System.Drawing.Size(1079, 33)
- '
- 'barDockControlBottom
- '
- Me.barDockControlBottom.CausesValidation = False
- Me.barDockControlBottom.Dock = System.Windows.Forms.DockStyle.Bottom
- Me.barDockControlBottom.Location = New System.Drawing.Point(0, 590)
- Me.barDockControlBottom.Manager = Me.BarManager1
- Me.barDockControlBottom.Size = New System.Drawing.Size(1079, 0)
- '
- 'barDockControlLeft
- '
- Me.barDockControlLeft.CausesValidation = False
- Me.barDockControlLeft.Dock = System.Windows.Forms.DockStyle.Left
- Me.barDockControlLeft.Location = New System.Drawing.Point(0, 33)
- Me.barDockControlLeft.Manager = Me.BarManager1
- Me.barDockControlLeft.Size = New System.Drawing.Size(0, 557)
- '
- 'barDockControlRight
- '
- Me.barDockControlRight.CausesValidation = False
- Me.barDockControlRight.Dock = System.Windows.Forms.DockStyle.Right
- Me.barDockControlRight.Location = New System.Drawing.Point(1079, 33)
- Me.barDockControlRight.Manager = Me.BarManager1
- Me.barDockControlRight.Size = New System.Drawing.Size(0, 557)
- '
- 'BarStaticItem1
- '
- Me.BarStaticItem1.Caption = "Seiten"
- Me.BarStaticItem1.Id = 17
- Me.BarStaticItem1.Name = "BarStaticItem1"
- '
- 'RepositoryItemTextEdit1
- '
- Me.RepositoryItemTextEdit1.AutoHeight = False
- Me.RepositoryItemTextEdit1.Name = "RepositoryItemTextEdit1"
- '
- 'RepositoryItemColorEdit1
- '
- Me.RepositoryItemColorEdit1.AutoHeight = False
- Me.RepositoryItemColorEdit1.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
- Me.RepositoryItemColorEdit1.Name = "RepositoryItemColorEdit1"
- Me.RepositoryItemColorEdit1.ShowCustomColors = False
- Me.RepositoryItemColorEdit1.ShowSystemColors = False
- Me.RepositoryItemColorEdit1.ShowWebColors = False
- '
- 'RepositoryItemComboBox1
- '
- Me.RepositoryItemComboBox1.AutoHeight = False
- Me.RepositoryItemComboBox1.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
- Me.RepositoryItemComboBox1.Items.AddRange(New Object() {"Arrow", "Text"})
- Me.RepositoryItemComboBox1.Name = "RepositoryItemComboBox1"
- '
- 'SpreadsheetControl1
- '
- Me.SpreadsheetControl1.Location = New System.Drawing.Point(461, 377)
- Me.SpreadsheetControl1.MenuManager = Me.BarManager1
- Me.SpreadsheetControl1.Name = "SpreadsheetControl1"
- Me.SpreadsheetControl1.ReadOnly = True
- Me.SpreadsheetControl1.Size = New System.Drawing.Size(268, 161)
- Me.SpreadsheetControl1.TabIndex = 9
- Me.SpreadsheetControl1.Text = "SpreadsheetControl1"
- Me.SpreadsheetControl1.Visible = False
- '
- 'DocumentViewer
- '
- Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.Controls.Add(Me.RichEditControl1)
- Me.Controls.Add(Me.SpreadsheetControl1)
- Me.Controls.Add(Me.GdViewer)
- Me.Controls.Add(Me.barDockControlLeft)
- Me.Controls.Add(Me.barDockControlRight)
- Me.Controls.Add(Me.barDockControlBottom)
- Me.Controls.Add(Me.barDockControlTop)
- Me.Name = "DocumentViewer"
- Me.Size = New System.Drawing.Size(1079, 590)
- CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.RepositoryItemTextEdit2, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.RepositoryItemTextEdit1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.RepositoryItemColorEdit1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.RepositoryItemComboBox1, System.ComponentModel.ISupportInitialize).EndInit()
- Me.ResumeLayout(False)
- Me.PerformLayout()
-
- End Sub
-
- Friend WithEvents GdViewer As GdPicture14.GdViewer
- Friend WithEvents OpenFileDialog As OpenFileDialog
- Friend WithEvents RichEditControl1 As DevExpress.XtraRichEdit.RichEditControl
- Friend WithEvents SpreadsheetControl1 As DevExpress.XtraSpreadsheet.SpreadsheetControl
- Friend WithEvents PrintDocument1 As Printing.PrintDocument
- Friend WithEvents BarManager1 As DevExpress.XtraBars.BarManager
- Friend WithEvents ToolbarDocumentViewer As DevExpress.XtraBars.Bar
- Friend WithEvents buttonPrint As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents buttonFitWidth As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents buttonFitPage As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents buttonZoomIn As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents buttonZoomOut As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents buttonRotateRight As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents buttonRotateLeft As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents buttonFlipX As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents buttonFlipY As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents buttonSettings As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents barDockControlTop As DevExpress.XtraBars.BarDockControl
- Friend WithEvents barDockControlBottom As DevExpress.XtraBars.BarDockControl
- Friend WithEvents barDockControlLeft As DevExpress.XtraBars.BarDockControl
- Friend WithEvents barDockControlRight As DevExpress.XtraBars.BarDockControl
- Friend WithEvents buttonFirstPage As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents buttonPrevPage As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents buttonNextPage As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents buttonLastPage As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents txtCurrentPage As DevExpress.XtraBars.BarEditItem
- Friend WithEvents RepositoryItemTextEdit2 As DevExpress.XtraEditors.Repository.RepositoryItemTextEdit
- Friend WithEvents RepositoryItemTextEdit1 As DevExpress.XtraEditors.Repository.RepositoryItemTextEdit
- Friend WithEvents BarStaticItem1 As DevExpress.XtraBars.BarStaticItem
- Friend WithEvents RepositoryItemColorEdit1 As DevExpress.XtraEditors.Repository.RepositoryItemColorEdit
- Friend WithEvents RepositoryItemComboBox1 As DevExpress.XtraEditors.Repository.RepositoryItemComboBox
- Friend WithEvents labelPageCount As DevExpress.XtraBars.BarStaticItem
-End Class
diff --git a/Controls.DocumentViewer/DocumentViewer.resx b/Controls.DocumentViewer/DocumentViewer.resx
deleted file mode 100644
index 13375f41..00000000
--- a/Controls.DocumentViewer/DocumentViewer.resx
+++ /dev/null
@@ -1,169 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- 6, 19
-
-
- 285, 22
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOcCAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkdyZWVue2ZpbGw6IzAzOUMyMzt9Cgku
- QmxhY2t7ZmlsbDojNzI3MjcyO30KCS5SZWR7ZmlsbDojRDExQzFDO30KCS5ZZWxsb3d7ZmlsbDojRkZC
- MTE1O30KCS5CbHVle2ZpbGw6IzExNzdENzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
- Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQo8L3N0eWxlPg0KICA8ZyBpZD0iUHJpbnRfMV8i
- Pg0KICAgIDxwYXRoIGQ9Ik0xMCw0aDEydjhoMlYySDh2MTBoMlY0eiBNMjgsMTBoLTJ2M2MwLDAuNi0w
- LjQsMS0xLDFIN2MtMC42LDAtMS0wLjQtMS0xdi0zSDRjLTEuMSwwLTIsMC45LTIsMiAgIHYxMmMwLDEu
- MSwwLjksMiwyLDJoNHY0aDE2di00aDRjMS4xLDAsMi0wLjksMi0yVjEyQzMwLDEwLjksMjkuMSwxMCwy
- OCwxMHogTTIyLDI0djJ2MkgxMHYtMnYtMnYtNGgxMlYyNHoiIGlkPSJQcmludCIgY2xhc3M9IkJsYWNr
- IiAvPg0KICA8L2c+DQo8L3N2Zz4L
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAM8CAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iWm9vbV9JbiIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cgku
- Qmx1ZXtmaWxsOiMxMTc3RDc7fQo8L3N0eWxlPg0KICA8ZyBpZD0iWm9vbV9PdXQiPg0KICAgIDxyZWN0
- IHg9IjgiIHk9IjEyIiB3aWR0aD0iMTAiIGhlaWdodD0iMiIgcng9IjAiIHJ5PSIwIiBjbGFzcz0iQmx1
- ZSIgLz4NCiAgICA8cGF0aCBkPSJNMjkuNywyNy4zbC03LjktNy45YzEuMy0xLjgsMi4xLTQsMi4xLTYu
- NWMwLTYuMS00LjktMTEtMTEtMTFDNi45LDIsMiw2LjksMiwxM3M0LjksMTEsMTEsMTEgICBjMi40LDAs
- NC42LTAuOCw2LjUtMi4xbDcuOSw3LjljMC4zLDAuMywwLjksMC4zLDEuMiwwbDEuMi0xLjJDMzAuMSwy
- OC4yLDMwLjEsMjcuNiwyOS43LDI3LjN6IE00LDEzYzAtNSw0LTksOS05YzUsMCw5LDQsOSw5ICAgcy00
- LDktOSw5QzgsMjIsNCwxOCw0LDEzeiIgY2xhc3M9IkJsYWNrIiAvPg0KICA8L2c+DQo8L3N2Zz4L
-
-
-
- 152, 18
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/DocumentViewer.resx.bak b/Controls.DocumentViewer/DocumentViewer.resx.bak
deleted file mode 100644
index 39f91ea5..00000000
--- a/Controls.DocumentViewer/DocumentViewer.resx.bak
+++ /dev/null
@@ -1,364 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- 6, 19
-
-
- 285, 22
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOcCAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkdyZWVue2ZpbGw6IzAzOUMyMzt9Cgku
- QmxhY2t7ZmlsbDojNzI3MjcyO30KCS5SZWR7ZmlsbDojRDExQzFDO30KCS5ZZWxsb3d7ZmlsbDojRkZC
- MTE1O30KCS5CbHVle2ZpbGw6IzExNzdENzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
- Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQo8L3N0eWxlPg0KICA8ZyBpZD0iUHJpbnRfMV8i
- Pg0KICAgIDxwYXRoIGQ9Ik0xMCw0aDEydjhoMlYySDh2MTBoMlY0eiBNMjgsMTBoLTJ2M2MwLDAuNi0w
- LjQsMS0xLDFIN2MtMC42LDAtMS0wLjQtMS0xdi0zSDRjLTEuMSwwLTIsMC45LTIsMiAgIHYxMmMwLDEu
- MSwwLjksMiwyLDJoNHY0aDE2di00aDRjMS4xLDAsMi0wLjksMi0yVjEyQzMwLDEwLjksMjkuMSwxMCwy
- OCwxMHogTTIyLDI0djJ2MkgxMHYtMnYtMnYtNGgxMlYyNHoiIGlkPSJQcmludCIgY2xhc3M9IkJsYWNr
- IiAvPg0KICA8L2c+DQo8L3N2Zz4L
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAANcCAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgdmlld0JveD0iMCAwIDIw
- IDIwIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC9zdmciIGlkPSJFYmVuZV8xIj4NCiAgPGRl
- ZnM+DQogICAgPHN0eWxlPi5jbHMtMXtmaWxsOiNhNTI0MzE7fS5jbHMtMntmaWxsOiM2NDYzNjM7fTwv
- c3R5bGU+DQogIDwvZGVmcz4NCiAgPHBvbHlnb24gcG9pbnRzPSIyLjkyMSAwLjg5MyAyLjkyMSAxLjg5
- MyAzLjkyMSAxLjg5MyA0LjAzOCAxLjg5MyA0LjAzOCAxNC40MzYgMy45MjEgMTQuNDM2IDIuOTIxIDE0
- LjQzNiAyLjkyMSAxNS40MzYgNS4wMzggMTUuNDM2IDUuMDM4IDAuODkzIDIuOTIxIDAuODkzIiBjbGFz
- cz0iY2xzLTEiIC8+DQogIDxwb2x5Z29uIHBvaW50cz0iNi41MzggMTYuOTg5IDYuNTM4IDE5LjEwNyA3
- LjYgMTkuMTA3IDcuNiAxOC4xMDcgNy41OTkgMTguMTA3IDcuNTk5IDE3Ljk4OSA3LjYgMTcuOTg5IDE2
- LjAxOCAxNy45ODkgMTYuMDE4IDE4LjEwNyAxNi4wMTggMTkuMTA3IDE3LjA3OSAxOS4xMDcgMTcuMDc5
- IDE2Ljk4OSA2LjUzOCAxNi45ODkiIGNsYXNzPSJjbHMtMSIgLz4NCiAgPHBhdGggZD0iTTExLjM3Mjks
- Mi44OTM1bDMuNzA2MywzLjQ5MzRWMTMuNDM2SDguNTM4MVYyLjg5MzVoMi44MzQ4bS43OTQxLTJINi41
- MzgxVjE1LjQzNkgxNy4wNzkyVjUuNTIzN0wxMi4xNjcuODkzNVoiIGNsYXNzPSJjbHMtMiIgLz4NCjwv
- c3ZnPgs=
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAJcCAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgdmlld0JveD0iMCAwIDIw
- IDIwIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC9zdmciIGlkPSJFYmVuZV8xIj4NCiAgPGRl
- ZnM+DQogICAgPHN0eWxlPi5jbHMtMXtmaWxsOiM3MDZmNmY7fTwvc3R5bGU+DQogIDwvZGVmcz4NCiAg
- PHJlY3QgeD0iNi4wNTg2IiB5PSI3LjYwNzUiIHdpZHRoPSI3Ljg4MzgiIGhlaWdodD0iMS41MDgxIiBy
- eD0iMCIgcnk9IjAiIGNsYXNzPSJjbHMtMSIgLz4NCiAgPHJlY3QgeD0iNi4wNTg2IiB5PSIxMC44ODQ0
- IiB3aWR0aD0iNy44ODM4IiBoZWlnaHQ9IjEuNTA4MSIgcng9IjAiIHJ5PSIwIiBjbGFzcz0iY2xzLTEi
- IC8+DQogIDxyZWN0IHg9IjYuMDU4NiIgeT0iMTQuMTYxOSIgd2lkdGg9IjcuODgzOCIgaGVpZ2h0PSIx
- LjUwODEiIHJ4PSIwIiByeT0iMCIgY2xhc3M9ImNscy0xIiAvPg0KICA8cmVjdCB4PSI2LjA1ODYiIHk9
- IjQuMzMiIHdpZHRoPSIzLjc3OTMiIGhlaWdodD0iMS41MDgxIiByeD0iMCIgcnk9IjAiIGNsYXNzPSJj
- bHMtMSIgLz4NCiAgPHBhdGggZD0iTTE3LDE5LjEwNjVIM1YuODkzNWg4Ljc1MUwxNyw2LjE3MVpNNSwx
- Ny4wOTU2SDE1VjcuMDAzNkwxMC45MjI5LDIuOTA0NEg1WiIgY2xhc3M9ImNscy0xIiAvPg0KPC9zdmc+
- Cw==
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAPMCAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iWm9vbV9JbiIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cgku
- Qmx1ZXtmaWxsOiMxMTc3RDc7fQo8L3N0eWxlPg0KICA8cG9seWdvbiBwb2ludHM9IjE4LDEyIDE0LDEy
- IDE0LDggMTIsOCAxMiwxMiA4LDEyIDgsMTQgMTIsMTQgMTIsMTggMTQsMTggMTQsMTQgMTgsMTQgIiBj
- bGFzcz0iQmx1ZSIgLz4NCiAgPHBhdGggZD0iTTI5LjcsMjcuM0wyMiwxOS42YzAsMC0wLjEtMC4xLTAu
- MS0wLjFjMS4zLTEuOCwyLjEtNC4xLDIuMS02LjVjMC02LjEtNC45LTExLTExLTExQzYuOSwyLDIsNi45
- LDIsMTMgIHM0LjksMTEsMTEsMTFjMi40LDAsNC43LTAuOCw2LjUtMi4xYzAsMCwwLDAuMSwwLjEsMC4x
- bDcuNyw3LjdjMC4zLDAuMywwLjksMC4zLDEuMiwwbDEuMi0xLjJDMzAuMSwyOC4yLDMwLjEsMjcuNiwy
- OS43LDI3LjN6ICAgTTQsMTNjMC01LDQtOSw5LTljNSwwLDksNCw5LDlzLTQsOS05LDlDOCwyMiw0LDE4
- LDQsMTN6IiBjbGFzcz0iQmxhY2siIC8+DQo8L3N2Zz4L
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAM8CAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iWm9vbV9JbiIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cgku
- Qmx1ZXtmaWxsOiMxMTc3RDc7fQo8L3N0eWxlPg0KICA8ZyBpZD0iWm9vbV9PdXQiPg0KICAgIDxyZWN0
- IHg9IjgiIHk9IjEyIiB3aWR0aD0iMTAiIGhlaWdodD0iMiIgcng9IjAiIHJ5PSIwIiBjbGFzcz0iQmx1
- ZSIgLz4NCiAgICA8cGF0aCBkPSJNMjkuNywyNy4zbC03LjktNy45YzEuMy0xLjgsMi4xLTQsMi4xLTYu
- NWMwLTYuMS00LjktMTEtMTEtMTFDNi45LDIsMiw2LjksMiwxM3M0LjksMTEsMTEsMTEgICBjMi40LDAs
- NC42LTAuOCw2LjUtMi4xbDcuOSw3LjljMC4zLDAuMywwLjksMC4zLDEuMiwwbDEuMi0xLjJDMzAuMSwy
- OC4yLDMwLjEsMjcuNiwyOS43LDI3LjN6IE00LDEzYzAtNSw0LTksOS05YzUsMCw5LDQsOSw5ICAgcy00
- LDktOSw5QzgsMjIsNCwxOCw0LDEzeiIgY2xhc3M9IkJsYWNrIiAvPg0KICA8L2c+DQo8L3N2Zz4L
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAHIBAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgdmlld0JveD0iMCAwIDIw
- IDIwIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC9zdmciIGlkPSJFYmVuZV8xIj4NCiAgPGRl
- ZnM+DQogICAgPHN0eWxlPi5jbHMtMXtmaWxsOiNhNTI0MzE7fTwvc3R5bGU+DQogIDwvZGVmcz4NCiAg
- PHBhdGggZD0iTTExLjI5MiwxOC42OTh2LTJBNi42OTgsNi42OTgsMCwxLDAsNC41OTM4LDEwaC0yQTgu
- Njk4Myw4LjY5ODMsMCwxLDEsMTEuMjkyLDE4LjY5OFoiIGNsYXNzPSJjbHMtMSIgLz4NCiAgPHBvbHls
- aW5lIHBvaW50cz0iMC4wMSAxMCAzLjU2NiAxNC45MjQgNy4xMjIgMTAiIGNsYXNzPSJjbHMtMSIgLz4N
- Cjwvc3ZnPgs=
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAHMBAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgdmlld0JveD0iMCAwIDIw
- IDIwIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC9zdmciIGlkPSJFYmVuZV8xIj4NCiAgPGRl
- ZnM+DQogICAgPHN0eWxlPi5jbHMtMXtmaWxsOiNhNTI0MzE7fTwvc3R5bGU+DQogIDwvZGVmcz4NCiAg
- PHBhdGggZD0iTTguNzA4LDE4LjY5OHYtMkE2LjY5OCw2LjY5OCwwLDEsMSwxNS40MDYyLDEwaDJBOC42
- OTgzLDguNjk4MywwLDEsMCw4LjcwOCwxOC42OThaIiBjbGFzcz0iY2xzLTEiIC8+DQogIDxwb2x5bGlu
- ZSBwb2ludHM9IjE5Ljk5IDEwIDE2LjQzNCAxNC45MjQgMTIuODc4IDEwIiBjbGFzcz0iY2xzLTEiIC8+
- DQo8L3N2Zz4L
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAIIBAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgdmlld0JveD0iMCAwIDIw
- IDIwIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC9zdmciIGlkPSJFYmVuZV8xIj4NCiAgPGRl
- ZnM+DQogICAgPHN0eWxlPi5jbHMtMXtmaWxsOiNhNTI0MzE7fS5jbHMtMntmaWxsOiM2NDYzNjM7fTwv
- c3R5bGU+DQogIDwvZGVmcz4NCiAgPHJlY3QgeD0iMi45ODk3IiB5PSIyLjk5MDEiIHdpZHRoPSI3LjAx
- MDMiIGhlaWdodD0iMTQuMDIiIHJ4PSIwIiByeT0iMCIgY2xhc3M9ImNscy0xIiAvPg0KICA8cGF0aCBk
- PSJNMTkuMDEsMTkuMDFILjk5Vi45OUgxOS4wMVpNMi45OSwxNy4wMUgxNy4wMVYyLjk5SDIuOTlaIiBj
- bGFzcz0iY2xzLTIiIC8+DQo8L3N2Zz4L
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAIABAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgdmlld0JveD0iMCAwIDIw
- IDIwIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC9zdmciIGlkPSJFYmVuZV8xIj4NCiAgPGRl
- ZnM+DQogICAgPHN0eWxlPi5jbHMtMXtmaWxsOiNhNTI0MzE7fS5jbHMtMntmaWxsOiM2NDYzNjM7fTwv
- c3R5bGU+DQogIDwvZGVmcz4NCiAgPHJlY3QgeD0iMi45ODk3IiB5PSIyLjk5IiB3aWR0aD0iMTQuMDIw
- NSIgaGVpZ2h0PSI3LjAxIiByeD0iMCIgcnk9IjAiIGNsYXNzPSJjbHMtMSIgLz4NCiAgPHBhdGggZD0i
- TTE5LjAxLDE5LjAxSC45OVYuOTlIMTkuMDFaTTIuOTksMTcuMDFIMTcuMDFWMi45OUgyLjk5WiIgY2xh
- c3M9ImNscy0yIiAvPg0KPC9zdmc+Cw==
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAANUBAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgdmlld0JveD0iMCAwIDIw
- IDIwIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC9zdmciIGlkPSJFYmVuZV8xIj4NCiAgPGRl
- ZnM+DQogICAgPHN0eWxlPi5jbHMtMXtmaWxsOiNhNTI0MzE7fTwvc3R5bGU+DQogIDwvZGVmcz4NCiAg
- PHBhdGggZD0iTTIwLDIwLDYuNjY2NywxMC4wMDA3LDIwLDBaIiBjbGFzcz0iY2xzLTEiIC8+DQogIDxw
- YXRoIGQ9Ik0xMy4zMzMzLDE1VjVsLTYuNjY2Niw1WiIgY2xhc3M9ImNscy0xIiAvPg0KICA8cG9seWdv
- biBwb2ludHM9IjEyLjYzIDE2LjQwNSA1Ljk2MyAxMS40MDUgNC4wOTEgMTAuMDAxIDUuOTYzIDguNTk2
- IDEyLjYzIDMuNTk2IDEzLjMzMyAzLjA2OCAxMy4zMzMgMCAwIDEwLjAwMSAxMy4zMzMgMjAgMTMuMzMz
- IDE2LjkzMiAxMi42MyAxNi40MDUiIGNsYXNzPSJjbHMtMSIgLz4NCjwvc3ZnPgs=
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAP8AAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgdmlld0JveD0iMCAwIDIw
- IDIwIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC9zdmciIGlkPSJFYmVuZV8xIj4NCiAgPGRl
- ZnM+DQogICAgPHN0eWxlPi5jbHMtMXtmaWxsOiNhNTI0MzE7fTwvc3R5bGU+DQogIDwvZGVmcz4NCiAg
- PHBhdGggZD0iTTE2LjY2NjcsMjAsMy4zMzMzLDEwLjAwMDcsMTYuNjY2NywwWiIgY2xhc3M9ImNscy0x
- IiAvPg0KPC9zdmc+Cw==
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAP0AAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgdmlld0JveD0iMCAwIDIw
- IDIwIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC9zdmciIGlkPSJFYmVuZV8xIj4NCiAgPGRl
- ZnM+DQogICAgPHN0eWxlPi5jbHMtMXtmaWxsOiNhNTI0MzE7fTwvc3R5bGU+DQogIDwvZGVmcz4NCiAg
- PHBhdGggZD0iTTMuMzMzMywyMGwxMy4zMzM0LTkuOTk5M0wzLjMzMzMsMFoiIGNsYXNzPSJjbHMtMSIg
- Lz4NCjwvc3ZnPgs=
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAM4BAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgdmlld0JveD0iMCAwIDIw
- IDIwIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC9zdmciIGlkPSJFYmVuZV8xIj4NCiAgPGRl
- ZnM+DQogICAgPHN0eWxlPi5jbHMtMXtmaWxsOiNhNTI0MzE7fTwvc3R5bGU+DQogIDwvZGVmcz4NCiAg
- PHBhdGggZD0iTTAsMjBsMTMuMzMzMy05Ljk5OTNMMCwwWiIgY2xhc3M9ImNscy0xIiAvPg0KICA8cGF0
- aCBkPSJNNi42NjY3LDE1VjVsNi42NjY2LDVaIiBjbGFzcz0iY2xzLTEiIC8+DQogIDxwb2x5Z29uIHBv
- aW50cz0iNy4zNyAxNi40MDUgMTQuMDM3IDExLjQwNSAxNS45MDkgMTAuMDAxIDE0LjAzNyA4LjU5NiA3
- LjM3IDMuNTk2IDYuNjY3IDMuMDY4IDYuNjY3IDAgMjAgMTAuMDAxIDYuNjY3IDIwIDYuNjY3IDE2Ljkz
- MiA3LjM3IDE2LjQwNSIgY2xhc3M9ImNscy0xIiAvPg0KPC9zdmc+Cw==
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGQEAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgdmlld0JveD0iMCAwIDIw
- IDIwIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC9zdmciIGlkPSJFYmVuZV8xIj4NCiAgPGRl
- ZnM+DQogICAgPHN0eWxlPi5jbHMtMXtmaWxsOiNhNTI0MzE7fTwvc3R5bGU+DQogIDwvZGVmcz4NCiAg
- PHBhdGggZD0iTTE5LjY5NDEsMTAuOTM3M0E3Ljc5NjcsNy43OTY3LDAsMCwwLDE5Ljc0MzUsMTBhNy43
- OTczLDcuNzk3MywwLDAsMC0uMDQ5NC0uOTM3NEwxNi44NDUyLDguMDM5YTcuMDYsNy4wNiwwLDAsMC0u
- NjI5MS0xLjUwNDhsMS4yOTUxLTIuNzI1NmE4Ljk4OTMsOC45ODkzLDAsMCwwLTEuMzItMS4zMzIxbC0y
- LjcyNTcsMS4yOTVhNy4zOSw3LjM5LDAsMCwwLTEuNTE3LS42MTY2TDEwLjkzNzQuMzA1OEE3LjgxOTIs
- Ny44MTkyLDAsMCwwLDEwLC4yNTY1YTcuODE5Miw3LjgxOTIsMCwwLDAtLjkzNzQuMDQ5M0w4LjA1MTIs
- My4xNTQ5YTcuMzksNy4zOSwwLDAsMC0xLjUxNy42MTY2TDMuODA4NSwyLjQ3NjVhOC45ODkzLDguOTg5
- MywwLDAsMC0xLjMyLDEuMzMyMUwzLjc4MzksNi41MzQyQTYuNDgwNiw2LjQ4MDYsMCwwLDAsMy4xNTQ4
- LDguMDM5TC4zMDU5LDkuMDYyNkE3Ljc5NzMsNy43OTczLDAsMCwwLC4yNTY1LDEwYTcuNzk2Nyw3Ljc5
- NjcsMCwwLDAsLjA0OTQuOTM3M2wyLjg0ODksMS4wMTE0YTYuNDc5MSw2LjQ3OTEsMCwwLDAsLjYyOTEs
- MS41MDQ2TDIuNDg4OCwxNi4xOTE0YTkuNTQ3Miw5LjU0NzIsMCwwLDAsMS4zMiwxLjMybDIuNzI1Ny0x
- LjI5NWE4LjIwMTQsOC4yMDE0LDAsMCwwLDEuNTE3LjYyOWwxLjAxMTQsMi44NDlBNy44MTksNy44MTks
- MCwwLDAsMTAsMTkuNzQzNWE3LjgxOSw3LjgxOSwwLDAsMCwuOTM3NC0uMDQ5NGwxLjAxMTQtMi44NDlh
- OC4yMDE0LDguMjAxNCwwLDAsMCwxLjUxNy0uNjI5bDIuNzI1NywxLjI5NWE5LjU0NzIsOS41NDcyLDAs
- MCwwLDEuMzItMS4zMmwtMS4yOTUxLTIuNzM4MWE3LjA1NzksNy4wNTc5LDAsMCwwLC42MjkxLTEuNTA0
- NlpNMTAsMTQuMTNBNC4xMzMxLDQuMTMzMSwwLDEsMSwxNC4xMzMxLDkuOTk3LDQuMTMzMiw0LjEzMzIs
- MCwwLDEsMTAsMTQuMTNaIiBjbGFzcz0iY2xzLTEiIC8+DQo8L3N2Zz4L
-
-
-
- 152, 18
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/DocumentViewer.vb b/Controls.DocumentViewer/DocumentViewer.vb
deleted file mode 100644
index a8bb89b6..00000000
--- a/Controls.DocumentViewer/DocumentViewer.vb
+++ /dev/null
@@ -1,686 +0,0 @@
-Imports System.IO
-Imports DevExpress
-Imports DevExpress.Spreadsheet
-Imports DevExpress.XtraRichEdit.Commands
-Imports DevExpress.Office.Utils
-Imports GdPicture14
-Imports DigitalData.Modules.Logging
-Imports DigitalData.Modules.Messaging
-Imports DigitalData.Modules.Config
-
-Public Class DocumentViewer
- Private Enum ZoomMode
- Zoom50
- Zoom100
- Zoom150
- Zoom200
- ZoomSelectedArea
- ZoomFitToViewer
- ZoomFitWidth
- ZoomFitHeight
- End Enum
-
- Private Enum ViewerMode
- GDPicture
- RichText
- Excel
- End Enum
-
- Private Enum FileLoadMode
- File
- Stream
- End Enum
-
- Private _ViewerMode As ViewerMode
- Private _currentSearchOccurence As Integer = 0
- Private _toggleGamma As Boolean = True
- Private _licenseKey As String = String.Empty
- Private _licenseManager As New GdPicture14.LicenseManager()
- Private _logConfig As LogConfig
- Private _logger As Logger
- Private _email As Email2
- Private _Config As ConfigManager(Of Config)
- Private _Annotations As Annotations
- Private _AnnotationsPending As Boolean = False
-
- Private _hide_file_info_from_user As Boolean = False
-
- Private _FileStream As Stream
- Private _FilePath As String
- Private _Fileinfo As FileInfo
- Private _FileLoadMode As FileLoadMode = FileLoadMode.File
-
- ' List of all created temp files when converting msg files
- Private _TempFiles As New List(Of String)
-
- Private Sub DocumentViewer_Load(sender As Object, e As EventArgs) Handles Me.Load
- UpdateMainUi()
- End Sub
-
-
- Public Property FileLoaded As Boolean = False
- Public ReadOnly Property AnnotationsSaved As Boolean
- Get
- Return Not _AnnotationsPending
- End Get
- End Property
-
- '''
- ''' Initialize the Viewer
- '''
- ''' A LogConfig object
- ''' The GDPicture.NET License Key
- Public Sub Init(pLogConfig As LogConfig, pLicenseKey As String)
- _logConfig = pLogConfig
- _logger = pLogConfig.GetLogger()
- _email = New Email2(pLogConfig)
- _licenseKey = pLicenseKey
- _licenseManager.RegisterKEY(_licenseKey)
- _Annotations = New Annotations(pLogConfig)
-
- Dim oConfigPath = ConfigPath()
- _Config = New ConfigManager(Of Config)(pLogConfig, oConfigPath)
- End Sub
-
- '''
- ''' Load a file from a path and display it
- '''
- Public Sub LoadFile(FilePath As String)
- FileLoaded = False
-
- If _licenseKey = String.Empty Then
- _logger.Warn("License key was not provided. File {0} not loaded.", FilePath)
- Exit Sub
- End If
-
- If FilePath Is Nothing OrElse FilePath.Trim().Length = 0 Then
- _logger.Warn("FilePath was not provided. File not loaded.")
- Exit Sub
- End If
-
- _FilePath = FilePath
- _FileLoadMode = FileLoadMode.File
- _Fileinfo = New FileInfo(FilePath)
-
- _logger.Info("Loading File [{0}] from Filesystem", FilePath)
- FileLoaded = DoLoadFile(FilePath)
-
- SetViewerMode(_Fileinfo.Extension)
- UpdateMainUi()
- End Sub
-
- '''
- ''' Load a file from a stream and display it
- '''
- Public Sub LoadFile(FileName As String, Stream As Stream)
- FileLoaded = False
-
- If _licenseKey = String.Empty Then
- _logger.Warn("License key was not provided. File [{0}] not loaded.", FileName)
- Exit Sub
- End If
-
- Dim oExtension As String = FileName.Substring(FileName.LastIndexOf("."))
-
- _FileStream = Stream
- _FileLoadMode = FileLoadMode.Stream
-
- _logger.Info("Loading file [{0}] from Stream", FileName)
- FileLoaded = DoLoadFile(Stream, oExtension)
-
- SetViewerMode(oExtension)
- UpdateMainUi()
- End Sub
-
- '''
- ''' Terminate Viewer, freeing up resources and deleting temp files
- '''
- Public Sub Done()
- Try
- _logger.Debug("Done: Deleting Temp Files")
- DeleteTempFiles()
-
- _logger.Debug("Done: Closing Documents")
- FreeFile()
-
- _logger.Debug("Done: Triggering GC")
- GC.Collect()
- Catch ex As Exception
- _logger.Warn("Error while cleaning up DocumentViewer")
- _logger.Error(ex)
- End Try
- End Sub
-
- Public Function AddAnnotation(pText As String) As Boolean
- Dim oFontStyle = FontStyle.Regular
- Dim oFontColor = Color.Black
- Dim oFontFamily = "Arial"
- Dim oFontSize = 8
- Dim oBorderColor = Color.Red
- Dim oBackColor = Color.LightYellow
- Dim oOpacity = 1.0F
- Dim oRotation = 0.0F
-
- GdViewer.AddTextAnnotationInteractive(pText, oFontColor, oFontFamily, oFontStyle, oFontSize, Fill:=True, oBorderColor, oBackColor, oOpacity, oRotation)
- _AnnotationsPending = True
-
- Return True
- End Function
-
-
-
- Public Function Save() As Boolean
- Dim oSaveResult As GdPictureStatus = GdPictureStatus.OK
-
- If GdViewer.BurnAnnotationsToPage(True, False) = GdPictureStatus.OK Then
- If _FileLoadMode = FileLoadMode.Stream Then
- oSaveResult = GdViewer.SaveDocumentToPDF(_FileStream)
- Else
- oSaveResult = GdViewer.SaveDocumentToPDF(_FilePath)
- End If
- End If
-
- If oSaveResult = GdPictureStatus.OK Then
- _AnnotationsPending = False
- Return True
- Else
- Return False
- End If
- End Function
-
- Public Sub CloseDocument()
- Try
- GdViewer.CloseDocument()
- UpdateMainUi()
- Catch ex As Exception
- _logger.Error(ex)
- End Try
- End Sub
-
- '''
- ''' Configures the viewer to hide the file path to the end-user.
- '''
- '''
- ''' True means that all file info should be hidden from the end-user
- ''' False means the end user may see the filepath or other info about the file
- '''
- Public Sub SetViewOnly(ViewOnly As Boolean)
- If ViewOnly Then
- buttonPrint.Visibility = XtraBars.BarItemVisibility.Never
- Else
- buttonPrint.Visibility = XtraBars.BarItemVisibility.Always
- End If
-
- _hide_file_info_from_user = ViewOnly
- End Sub
-
- Public Sub SetAllowAnnotations(AllowAnnotations As Boolean)
-
- End Sub
-
- '''
- ''' DEPRECATED: Use SetViewOnly
- '''
- Public Sub RightViewOnly(ViewOnly As Boolean)
- SetViewOnly(ViewOnly)
- End Sub
-
- '''
- ''' DEPRECATED: Use SetViewOnly
- '''
- Public Sub RightOnlyView(ViewOnly As Boolean)
- SetViewOnly(ViewOnly)
- End Sub
-
-
-
-
-
-#Region "Form Events"
-
- Private Sub btnFitWidth_Click(ByVal sender As Object, ByVal e As EventArgs) Handles buttonFitWidth.ItemClick
- FitToWidth()
- _Config.Config.PageFit = Config.PageFitSetting.FitWidth
- _Config.Save()
- End Sub
-
- Private Sub btnFitPage_Click(ByVal sender As Object, ByVal e As EventArgs) Handles buttonFitPage.ItemClick
- FitToPage()
- _Config.Config.PageFit = Config.PageFitSetting.FitPage
- _Config.Save()
- End Sub
-
- Private Sub RichEditControl1_SizeChanged(sender As Object, e As EventArgs) Handles RichEditControl1.SizeChanged
- Dim oControlWidth = RichEditControl1.Width - 100
- Dim oPageWidth = Units.DocumentsToPixelsF(RichEditControl1.Document.Sections(0).Page.Width, RichEditControl1.DpiX)
- RichEditControl1.Views.PrintLayoutView.ZoomFactor = oControlWidth / oPageWidth
- End Sub
-
- Private Sub btnOpen_Click(sender As Object, e As EventArgs)
- GdViewer.ZoomMode = ViewerZoomMode.ZoomModeWidthViewer
- GdViewer.DocumentAlignment = ViewerDocumentAlignment.DocumentAlignmentTopCenter
-
- If OpenFileDialog.ShowDialog() = DialogResult.OK Then
- GdViewer.DisplayFromFile(OpenFileDialog.FileName)
- End If
-
- GdViewer.Focus()
- UpdateMainUi()
- End Sub
- Private Sub btnFirstPage_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles buttonFirstPage.ItemClick
- GdViewer.DisplayFirstPage()
- End Sub
-
- Private Sub btnPreviousPage_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles buttonPrevPage.ItemClick
- If _ViewerMode = ViewerMode.GDPicture Then
- GdViewer.DisplayPreviousPage()
- ElseIf _ViewerMode = ViewerMode.RichText Then
- Dim oCmd As New PreviousPageCommand(RichEditControl1)
- oCmd.Execute()
- End If
- End Sub
-
- Private Sub btnNextPage_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles buttonNextPage.ItemClick
- If _ViewerMode = ViewerMode.GDPicture Then
- GdViewer.DisplayNextPage()
- ElseIf _ViewerMode = ViewerMode.RichText Then
- Dim oCmd As New NextPageCommand(RichEditControl1)
- oCmd.Execute()
- End If
- End Sub
-
- Private Sub btnLastPage_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles buttonLastPage.ItemClick
- GdViewer.DisplayLastPage()
- End Sub
-
- Private Sub tbCurrentPage_Leave(ByVal sender As System.Object, ByVal e As EventArgs) Handles txtCurrentPage.EditValueChanged
- Dim page As Integer = 0
- If Integer.TryParse(txtCurrentPage.EditValue, page) Then
- If page > 0 And page <= GdViewer.PageCount Then
- GdViewer.DisplayPage(page)
- UpdateaNavigationToolbar()
- End If
- End If
- End Sub
-
- Private Sub GdViewer1_PageChanged() Handles GdViewer.PageChanged
- UpdateaNavigationToolbar()
- End Sub
-
- Private Sub GdViewer1_AfterZoomChange() Handles GdViewer.AfterZoomChange
- UpdateaNavigationToolbar()
- If GdViewer.MouseMode = ViewerMouseMode.MouseModeAreaZooming Then
- GdViewer.MouseMode = ViewerMouseMode.MouseModePan
- End If
- End Sub
-
- Private Sub btnZoomOut_Click(sender As Object, e As EventArgs) Handles buttonZoomOut.ItemClick
- If _ViewerMode = ViewerMode.GDPicture Then
- GdViewer.ZoomOUT()
- ElseIf _ViewerMode = ViewerMode.RichText Then
- Dim oCmd As New ZoomOutCommand(RichEditControl1)
- oCmd.Execute()
- End If
- End Sub
-
- Private Sub btnZoomIn_Click(sender As Object, e As EventArgs) Handles buttonZoomIn.ItemClick
- If _ViewerMode = ViewerMode.GDPicture Then
- GdViewer.ZoomIN()
- ElseIf _ViewerMode = ViewerMode.RichText Then
- Dim oCmd As New ZoomInCommand(RichEditControl1)
- oCmd.Execute()
- End If
- End Sub
-
- Private Sub btnPrint_Click(sender As Object, e As EventArgs) Handles buttonPrint.ItemClick
- If GdViewer.PageCount = 0 Then
- Return
- End If
-
- GdViewer.PrintDialog()
- End Sub
-
- Private Sub btnRotateLeft_Click(sender As Object, e As EventArgs) Handles buttonRotateLeft.ItemClick
- GdViewer.Rotate(RotateFlipType.Rotate270FlipNone)
- End Sub
-
- Private Sub btnRotateRight_Click(sender As Object, e As EventArgs) Handles buttonRotateRight.ItemClick
- GdViewer.Rotate(RotateFlipType.Rotate90FlipNone)
- End Sub
-
- Private Sub btnFlipX_Click(sender As Object, e As EventArgs) Handles buttonFlipX.ItemClick
- GdViewer.Rotate(RotateFlipType.RotateNoneFlipX)
- End Sub
-
- Private Sub btnFlipY_Click(sender As Object, e As EventArgs) Handles buttonFlipY.ItemClick
- GdViewer.Rotate(RotateFlipType.RotateNoneFlipY)
- End Sub
-
- Private Sub GdViewer1_TransferEnded(ByVal status As GdPictureStatus, ByVal download As System.Boolean) Handles GdViewer.TransferEnded
- GdViewer.Focus()
- UpdateMainUi()
- End Sub
-
- Private Sub AddSearchRegion(ByVal occurence As Integer, ByVal leftCoordinate As Single, ByVal topCoordinate As Single, ByVal regionWidth As Single, ByVal regionheight As Single, ByVal ensureVisibility As Boolean)
- Dim searchRegion As Integer = GdViewer.AddRegionInches("SearchResult" & occurence, leftCoordinate, topCoordinate, regionWidth, regionheight, ForegroundMixMode.ForegroundMixModeMASKPEN, Color.Yellow)
- GdViewer.SetRegionEditable(searchRegion, False)
- If ensureVisibility Then
- GdViewer.EnsureRegionVisibility(searchRegion)
- End If
- End Sub
-
- Private Sub btnSettings_Click(ByVal sender As Object, ByVal e As EventArgs) Handles buttonSettings.ItemClick
- Using frmSettings As New frmViewerSettings(GdViewer)
- frmSettings.ShowDialog(Me)
- End Using
- UpdateaNavigationToolbar()
- End Sub
-#End Region
-
-#Region "Private Functions"
- Private Function ConfigPath() As String
- Return Path.Combine(Application.UserAppDataPath, "DocumentViewer")
- End Function
-
- Private Sub UpdateaNavigationToolbar()
- Try
- Dim oCurrentZoom As Double = GdViewer.Zoom
- Dim oCurrentPage As Integer = GdViewer.CurrentPage
- Dim oPageCount As Integer = GdViewer.PageCount
- txtCurrentPage.EditValue = oCurrentPage
- labelPageCount.Caption = $"/ {oPageCount}"
-
- If oCurrentPage = oPageCount Then
- buttonLastPage.Enabled = False
- buttonNextPage.Enabled = False
- buttonPrevPage.Enabled = True
- buttonFirstPage.Enabled = True
- ElseIf oCurrentPage = 1 Then
- buttonPrevPage.Enabled = False
- buttonFirstPage.Enabled = False
- buttonLastPage.Enabled = True
- buttonNextPage.Enabled = True
- Else
- buttonPrevPage.Enabled = True
- buttonFirstPage.Enabled = True
- buttonLastPage.Enabled = True
- buttonNextPage.Enabled = True
- End If
- Catch ex As Exception
- _logger.Error(ex)
- End Try
- End Sub
-
- Public Sub DeleteTempFiles()
- For Each oFile In _TempFiles
- Try
- _logger.Debug("Deleting temp file [{0}]", oFile)
- File.Delete(oFile)
- Catch ex As Exception
- _logger.Warn("Could not delete temp file [{0}]", oFile)
- End Try
- Next
- End Sub
-
- Private Sub SetViewerMode(Extension As String)
- Select Case Extension.ToUpper
- Case ".MSG"
- _ViewerMode = ViewerMode.RichText
- Case ".EML", ".DOC", ".DOCX", ".ODT", ".RTF", ".TXT"
- _ViewerMode = ViewerMode.RichText
- Case ".XLSX", ".XLS", "CSV"
- _ViewerMode = ViewerMode.Excel
- Case Else
- _ViewerMode = ViewerMode.GDPicture
- End Select
- End Sub
- Private Sub FreeFile()
- Try
- If Len(_FilePath) = 0 OrElse _Fileinfo Is Nothing Then
- Exit Sub
- End If
- Dim oExtension As String = _Fileinfo.Extension.ToUpper
- Select Case _ViewerMode
- Case ViewerMode.RichText
- _logger.Debug("Closing RichText Editor")
- RichEditControl1.CreateNewDocument()
-
- Case ViewerMode.Excel
- _logger.Debug("Closing Excel Editor")
- SpreadsheetControl1.CreateNewDocument()
-
- Case Else
- _logger.Debug("Closing GDPicture Viewer")
- GdViewer.CloseDocument()
-
- End Select
- Catch ex As Exception
- _logger.Warn($"Unexpected error in FreeFile: {ex.Message}")
- End Try
- End Sub
- Private Function DoLoadFile(FilePath As String) As Boolean
- Try
- Dim oFileInfo = New FileInfo(FilePath)
- Dim oExtension As String = oFileInfo.Extension.ToUpper
-
- RichEditControl1.Visible = False
- RichEditControl1.Dock = DockStyle.None
-
- SpreadsheetControl1.Visible = False
- SpreadsheetControl1.Dock = DockStyle.None
-
- Select Case oExtension.ToUpper
- Case ".MSG"
- Dim oEmlPath As String = _email.Convert_ToEml(FilePath)
- _TempFiles.Add(oEmlPath)
- DoLoadFile(oEmlPath)
-
- Case ".EML", ".DOC", ".DOCX", ".ODT", ".RTF", ".TXT"
- RichEditControl1.LoadDocument(FilePath, GetDocumentFormat(oExtension))
-
- RichEditControl1.Visible = True
- RichEditControl1.Dock = DockStyle.Fill
-
- Case ".XLSX", ".XLS", ".CSV"
- Dim oFormat = GetSpreadsheetFormat(oExtension)
- SpreadsheetControl1.LoadDocument(FilePath, oFormat)
-
- Dim oRange = SpreadsheetControl1.ActiveWorksheet.GetUsedRange()
- oRange.AutoFitColumns()
-
- SpreadsheetControl1.Visible = True
- SpreadsheetControl1.Dock = DockStyle.Fill
-
- Case Else
- GdViewer.ZoomMode = ViewerZoomMode.ZoomModeWidthViewer
- GdViewer.DocumentAlignment = ViewerDocumentAlignment.DocumentAlignmentTopCenter
- GdViewer.ForceTemporaryMode = True
- GdViewer.AnnotationDropShadow = True
-
- GdViewer.DisplayFromFile(FilePath)
-
- End Select
-
- UpdateMainUi()
-
- Return True
- Catch ex As Exception
- _logger.Error(ex)
- Return False
- End Try
- End Function
-
- Private Sub FitToPage()
- If _ViewerMode = ViewerMode.GDPicture Then
- GdViewer.ZoomMode = ViewerZoomMode.ZoomModeFitToViewer
- ElseIf _ViewerMode = ViewerMode.RichText Then
- Dim oCmd As New FitToPageCommand(RichEditControl1)
- oCmd.Execute()
- End If
- End Sub
-
- Private Sub FitToWidth()
- If _ViewerMode = ViewerMode.GDPicture Then
- GdViewer.ZoomMode = ViewerZoomMode.ZoomModeWidthViewer
- ElseIf _ViewerMode = ViewerMode.RichText Then
- Dim oCmd As New FitWidthCommand(RichEditControl1)
- oCmd.Execute()
- End If
- End Sub
-
- Private Function DoLoadFile(Stream As Stream, Extension As String) As Boolean
- Try
- RichEditControl1.Visible = False
- RichEditControl1.Dock = DockStyle.None
-
- SpreadsheetControl1.Visible = False
- SpreadsheetControl1.Dock = DockStyle.None
-
- Select Case Extension.ToUpper
- Case ".MSG"
-
- Dim oTempFileName = Path.Combine(IO.Path.GetTempPath(), Guid.NewGuid.ToString & ".msg")
- Using oFileStream As New FileStream(oTempFileName, FileMode.Create)
- Stream.Seek(0, SeekOrigin.Begin)
- Stream.CopyTo(oFileStream)
- Stream.Flush()
- End Using
-
- Dim oEmlPath As String = _email.Convert_ToEml(oTempFileName)
- DoLoadFile(oEmlPath)
-
- Case ".EML", ".DOC", ".DOCX", ".ODT", ".RTF", ".TXT"
- RichEditControl1.LoadDocument(Stream, GetDocumentFormat(Extension))
-
- RichEditControl1.ActiveViewType = XtraRichEdit.RichEditViewType.PrintLayout
- RichEditControl1.Visible = True
- RichEditControl1.Dock = DockStyle.Fill
-
- Case ".XLSX", ".XLS", ".CSV"
- SpreadsheetControl1.LoadDocument(Stream, GetSpreadsheetFormat(Extension))
-
- Dim oRange = SpreadsheetControl1.ActiveWorksheet.GetUsedRange()
- oRange.AutoFitColumns()
-
- SpreadsheetControl1.Visible = True
- SpreadsheetControl1.Dock = DockStyle.Fill
-
- Case Else
- GdViewer.ZoomMode = ViewerZoomMode.ZoomModeWidthViewer
- GdViewer.DocumentAlignment = ViewerDocumentAlignment.DocumentAlignmentTopCenter
- GdViewer.ForceTemporaryMode = True
- GdViewer.AnnotationDropShadow = True
-
- GdViewer.DisplayFromStream(Stream)
-
- End Select
-
- UpdateMainUi()
-
- Return True
- Catch ex As Exception
- _logger.Error(ex)
- Return False
- End Try
- End Function
-
- Private Function GetSpreadsheetFormat(Extension) As Spreadsheet.DocumentFormat
- Dim oFormat As Spreadsheet.DocumentFormat = Spreadsheet.DocumentFormat.Undefined
-
- Select Case Extension.ToUpper
- Case ".XLSX" : oFormat = Spreadsheet.DocumentFormat.Xlsx
- Case ".XLS" : oFormat = Spreadsheet.DocumentFormat.Xls
- Case ".CSV" : oFormat = Spreadsheet.DocumentFormat.Csv
- End Select
-
- Return oFormat
- End Function
-
- Private Function GetDocumentFormat(Extension) As XtraRichEdit.DocumentFormat
- Dim oFormat As XtraRichEdit.DocumentFormat = XtraRichEdit.DocumentFormat.Undefined
-
- Select Case Extension.ToUpper
- Case ".EML" : oFormat = XtraRichEdit.DocumentFormat.Mht
- Case ".DOC" : oFormat = XtraRichEdit.DocumentFormat.Doc
- Case ".DOCX" : oFormat = XtraRichEdit.DocumentFormat.OpenXml
- Case ".ODT" : oFormat = XtraRichEdit.DocumentFormat.OpenDocument
- Case ".RTF" : oFormat = XtraRichEdit.DocumentFormat.Rtf
- Case ".TXT" : oFormat = XtraRichEdit.DocumentFormat.PlainText
- End Select
-
- Return oFormat
- End Function
-
- Private Sub UpdateMainUi()
-
- Select Case _Config?.Config?.PageFit
- Case Config.PageFitSetting.FitPage
- FitToPage()
-
- Case Config.PageFitSetting.FitWidth
- FitToWidth()
-
- End Select
-
- Select Case _ViewerMode
- Case ViewerMode.GDPicture
- buttonPrint.Enabled = True
- buttonFitWidth.Enabled = True
- buttonFitPage.Enabled = True
- buttonZoomIn.Enabled = True
- buttonZoomOut.Enabled = True
- buttonRotateLeft.Enabled = True
- buttonRotateRight.Enabled = True
- buttonFlipX.Enabled = True
- buttonFlipY.Enabled = True
- buttonFirstPage.Enabled = True
- buttonPrevPage.Enabled = True
- buttonNextPage.Enabled = True
- buttonLastPage.Enabled = True
- buttonSettings.Enabled = True
- txtCurrentPage.Enabled = True
-
- Case ViewerMode.RichText
- buttonFitPage.Enabled = True
- buttonZoomIn.Enabled = True
- buttonZoomOut.Enabled = True
- buttonFitWidth.Enabled = True
- buttonNextPage.Enabled = True
- buttonPrevPage.Enabled = True
-
- buttonPrint.Enabled = False
- buttonRotateLeft.Enabled = False
- buttonRotateRight.Enabled = False
- buttonFlipX.Enabled = False
- buttonFlipY.Enabled = False
- buttonFirstPage.Enabled = False
- buttonLastPage.Enabled = False
- buttonSettings.Enabled = False
- txtCurrentPage.Enabled = False
-
- Case ViewerMode.Excel
- buttonPrint.Enabled = False
- buttonFitWidth.Enabled = False
- buttonFitPage.Enabled = False
- buttonZoomIn.Enabled = False
- buttonZoomOut.Enabled = False
- buttonRotateLeft.Enabled = False
- buttonRotateRight.Enabled = False
- buttonFlipX.Enabled = False
- buttonFlipY.Enabled = False
- buttonFirstPage.Enabled = False
- buttonPrevPage.Enabled = False
- buttonNextPage.Enabled = False
- buttonLastPage.Enabled = False
- buttonSettings.Enabled = False
- txtCurrentPage.Enabled = False
-
- End Select
-
- End Sub
-#End Region
-
-
-
-
-End Class
diff --git a/Controls.DocumentViewer/DocumentViewer.vbproj b/Controls.DocumentViewer/DocumentViewer.vbproj
deleted file mode 100644
index 935c47aa..00000000
--- a/Controls.DocumentViewer/DocumentViewer.vbproj
+++ /dev/null
@@ -1,239 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {0958CDDF-4A16-41F6-8837-8335F71D599C}
- Library
-
-
- DigitalData.Controls.DocumentViewer
- DigitalData.Controls.DocumentViewer
- 512
- Windows
- v4.6.1
- true
-
-
- AnyCPU
- true
- full
- true
- true
- bin\Debug\
- DigitalData.Controls.DocumentViewer.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- AnyCPU
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.Controls.DocumentViewer.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET (.NET Framework 4.5)\GdPicture.NET.14.dll
-
-
-
- ..\packages\NLog.4.7.10\lib\net45\NLog.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- DocumentViewer.vb
-
-
- UserControl
-
-
- frmViewerSettings.vb
-
-
- Form
-
-
-
- True
- Application.myapp
- True
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- DocumentViewer.vb
-
-
- frmViewerSettings.vb
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
- {6ea0c51f-c2b1-4462-8198-3de0b32b74f8}
- Base
-
-
- {44982f9b-6116-44e2-85d0-f39650b1ef99}
- Config
-
-
- {903B2D7D-3B80-4BE9-8713-7447B704E1B0}
- Logging
-
-
- {af664d85-0a4b-4bab-a2f8-83110c06553a}
- Messaging
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- PreserveNewest
-
-
- PreserveNewest
-
-
- PreserveNewest
-
-
- PreserveNewest
-
-
- PreserveNewest
-
-
- PreserveNewest
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/DocumentViewer.vbproj.bak b/Controls.DocumentViewer/DocumentViewer.vbproj.bak
deleted file mode 100644
index 336688a5..00000000
--- a/Controls.DocumentViewer/DocumentViewer.vbproj.bak
+++ /dev/null
@@ -1,195 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {0958CDDF-4A16-41F6-8837-8335F71D599C}
- Library
-
-
- DigitalData.Controls.DocumentViewer
- DigitalData.Controls.DocumentViewer
- 512
- Windows
- v4.6.1
- true
-
-
- AnyCPU
- true
- full
- true
- true
- bin\Debug\
- DigitalData.Controls.DocumentViewer.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- AnyCPU
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.Controls.DocumentViewer.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET (.NET Framework 4.5)\GdPicture.NET.14.dll
-
-
-
- ..\packages\NLog.4.7.10\lib\net45\NLog.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- DocumentViewer.vb
-
-
- UserControl
-
-
- frmViewerSettings.vb
-
-
- Form
-
-
-
- True
- Application.myapp
- True
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- DocumentViewer.vb
-
-
- frmViewerSettings.vb
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
- {903B2D7D-3B80-4BE9-8713-7447B704E1B0}
- Logging
-
-
- {af664d85-0a4b-4bab-a2f8-83110c06553a}
- Messaging
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/GdPicture.NET.14.Imaging.Rendering.Skia.64.dll b/Controls.DocumentViewer/GdPicture.NET.14.Imaging.Rendering.Skia.64.dll
deleted file mode 100644
index 7fd5aaf1..00000000
Binary files a/Controls.DocumentViewer/GdPicture.NET.14.Imaging.Rendering.Skia.64.dll and /dev/null differ
diff --git a/Controls.DocumentViewer/GdPicture.NET.14.filters.64.dll b/Controls.DocumentViewer/GdPicture.NET.14.filters.64.dll
deleted file mode 100644
index 57a62d8f..00000000
Binary files a/Controls.DocumentViewer/GdPicture.NET.14.filters.64.dll and /dev/null differ
diff --git a/Controls.DocumentViewer/GdPicture.NET.14.image.gdimgplug.64.dll b/Controls.DocumentViewer/GdPicture.NET.14.image.gdimgplug.64.dll
deleted file mode 100644
index a2fe9b80..00000000
Binary files a/Controls.DocumentViewer/GdPicture.NET.14.image.gdimgplug.64.dll and /dev/null differ
diff --git a/Controls.DocumentViewer/My Project/Application.myapp b/Controls.DocumentViewer/My Project/Application.myapp
deleted file mode 100644
index 7373f02e..00000000
--- a/Controls.DocumentViewer/My Project/Application.myapp
+++ /dev/null
@@ -1,10 +0,0 @@
-
-
- true
- frmTest
- false
- 0
- true
- 0
- true
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/My Project/AssemblyInfo.vb b/Controls.DocumentViewer/My Project/AssemblyInfo.vb
deleted file mode 100644
index af56e964..00000000
--- a/Controls.DocumentViewer/My Project/AssemblyInfo.vb
+++ /dev/null
@@ -1,35 +0,0 @@
-Imports System
-Imports System.Reflection
-Imports System.Runtime.InteropServices
-
-' Allgemeine Informationen über eine Assembly werden über die folgenden
-' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
-' die einer Assembly zugeordnet sind.
-
-' Werte der Assemblyattribute überprüfen
-
-
-
-
-
-
-
-
-
-
-'Die folgende GUID bestimmt die ID der Typbibliothek, wenn dieses Projekt für COM verfügbar gemacht wird.
-
-
-' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
-'
-' Hauptversion
-' Nebenversion
-' Buildnummer
-' Revision
-'
-' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
-' übernehmen, indem Sie "*" eingeben:
-'
-
-
-
diff --git a/Controls.DocumentViewer/My Project/Resources.Designer.vb b/Controls.DocumentViewer/My Project/Resources.Designer.vb
deleted file mode 100644
index 02455fdf..00000000
--- a/Controls.DocumentViewer/My Project/Resources.Designer.vb
+++ /dev/null
@@ -1,223 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-Imports System
-
-Namespace My.Resources
-
- 'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
- '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
- 'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
- 'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
- '''
- ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
- '''
- _
- Friend Module Resources
-
- Private resourceMan As Global.System.Resources.ResourceManager
-
- Private resourceCulture As Global.System.Globalization.CultureInfo
-
- '''
- ''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
- '''
- _
- Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
- Get
- If Object.ReferenceEquals(resourceMan, Nothing) Then
- Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DigitalData.Controls.DocumentViewer.Resources", GetType(Resources).Assembly)
- resourceMan = temp
- End If
- Return resourceMan
- End Get
- End Property
-
- '''
- ''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
- ''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
- '''
- _
- Friend Property Culture() As Global.System.Globalization.CultureInfo
- Get
- Return resourceCulture
- End Get
- Set
- resourceCulture = value
- End Set
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property _next() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("next", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property doublefirst() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("doublefirst", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property doublelast() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("doublelast", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property fittopage() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("fittopage", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property fittowidth() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("fittowidth", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property flipimage_horizontal() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("flipimage_horizontal", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property flipimage_vertical() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("flipimage_vertical", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property floatingobjectoutlinecolor() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("floatingobjectoutlinecolor", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property prev() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("prev", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property rotateclockwise() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("rotateclockwise", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property rotatecounterclockwise() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("rotatecounterclockwise", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property tooltips() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("tooltips", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property tooltips1() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("tooltips1", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property viewsettings() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("viewsettings", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property ZooFlow_10() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("ZooFlow-10", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property zoomin() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("zoomin", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
- End Module
-End Namespace
diff --git a/Controls.DocumentViewer/My Project/Resources.resx b/Controls.DocumentViewer/My Project/Resources.resx
deleted file mode 100644
index bc91f3a0..00000000
--- a/Controls.DocumentViewer/My Project/Resources.resx
+++ /dev/null
@@ -1,169 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
- ..\Resources\doublelast.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\tooltips1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\doublefirst.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\flipimage_vertical.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\rotatecounterclockwise.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\tooltips.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\fittopage.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\fittowidth.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\floatingobjectoutlinecolor.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\next.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\flipimage_horizontal.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\zoomin.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\prev.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\ZooFlow-10.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\rotateclockwise.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\viewsettings.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/My Project/Resources.resx.bak b/Controls.DocumentViewer/My Project/Resources.resx.bak
deleted file mode 100644
index 64ac3874..00000000
--- a/Controls.DocumentViewer/My Project/Resources.resx.bak
+++ /dev/null
@@ -1,133 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
- ..\Resources\tooltips.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\ZooFlow-10.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\floatingobjectoutlinecolor.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\tooltips1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/My Project/Settings.Designer.vb b/Controls.DocumentViewer/My Project/Settings.Designer.vb
deleted file mode 100644
index ab8c92d2..00000000
--- a/Controls.DocumentViewer/My Project/Settings.Designer.vb
+++ /dev/null
@@ -1,73 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- _
- Partial Friend NotInheritable Class MySettings
- Inherits Global.System.Configuration.ApplicationSettingsBase
-
- Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
-
-#Region "Automatische My.Settings-Speicherfunktion"
-#If _MyType = "WindowsForms" Then
- Private Shared addedHandler As Boolean
-
- Private Shared addedHandlerLockObject As New Object
-
- _
- Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
- If My.Application.SaveMySettingsOnExit Then
- My.Settings.Save()
- End If
- End Sub
-#End If
-#End Region
-
- Public Shared ReadOnly Property [Default]() As MySettings
- Get
-
-#If _MyType = "WindowsForms" Then
- If Not addedHandler Then
- SyncLock addedHandlerLockObject
- If Not addedHandler Then
- AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
- addedHandler = True
- End If
- End SyncLock
- End If
-#End If
- Return defaultInstance
- End Get
- End Property
- End Class
-End Namespace
-
-Namespace My
-
- _
- Friend Module MySettingsProperty
-
- _
- Friend ReadOnly Property Settings() As Global.DigitalData.Controls.DocumentViewer.My.MySettings
- Get
- Return Global.DigitalData.Controls.DocumentViewer.My.MySettings.Default
- End Get
- End Property
- End Module
-End Namespace
diff --git a/Controls.DocumentViewer/My Project/licenses.licx b/Controls.DocumentViewer/My Project/licenses.licx
deleted file mode 100644
index 73f111c0..00000000
--- a/Controls.DocumentViewer/My Project/licenses.licx
+++ /dev/null
@@ -1,5 +0,0 @@
-DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraRichEdit.RichEditControl, DevExpress.XtraRichEdit.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.Repository.RepositoryItemTextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.Repository.RepositoryItemComboBox, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraSpreadsheet.SpreadsheetControl, DevExpress.XtraSpreadsheet.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
diff --git a/Controls.DocumentViewer/My Project/licenses.licx.bak b/Controls.DocumentViewer/My Project/licenses.licx.bak
deleted file mode 100644
index 4ce8af85..00000000
--- a/Controls.DocumentViewer/My Project/licenses.licx.bak
+++ /dev/null
@@ -1,5 +0,0 @@
-DevExpress.XtraSpreadsheet.SpreadsheetControl, DevExpress.XtraSpreadsheet.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraRichEdit.RichEditControl, DevExpress.XtraRichEdit.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.Repository.RepositoryItemTextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.Repository.RepositoryItemComboBox, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
diff --git a/Controls.DocumentViewer/Resources/ZooFlow-10.svg b/Controls.DocumentViewer/Resources/ZooFlow-10.svg
deleted file mode 100644
index 0cdbf1a1..00000000
--- a/Controls.DocumentViewer/Resources/ZooFlow-10.svg
+++ /dev/null
@@ -1 +0,0 @@
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Resources/doublefirst.svg b/Controls.DocumentViewer/Resources/doublefirst.svg
deleted file mode 100644
index 3c189725..00000000
--- a/Controls.DocumentViewer/Resources/doublefirst.svg
+++ /dev/null
@@ -1,9 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Resources/doublelast.svg b/Controls.DocumentViewer/Resources/doublelast.svg
deleted file mode 100644
index 6ed1db63..00000000
--- a/Controls.DocumentViewer/Resources/doublelast.svg
+++ /dev/null
@@ -1,9 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Resources/fittopage.svg b/Controls.DocumentViewer/Resources/fittopage.svg
deleted file mode 100644
index bea60725..00000000
--- a/Controls.DocumentViewer/Resources/fittopage.svg
+++ /dev/null
@@ -1,17 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Resources/fittowidth.svg b/Controls.DocumentViewer/Resources/fittowidth.svg
deleted file mode 100644
index 44770ee7..00000000
--- a/Controls.DocumentViewer/Resources/fittowidth.svg
+++ /dev/null
@@ -1,21 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Resources/flipimage_horizontal.svg b/Controls.DocumentViewer/Resources/flipimage_horizontal.svg
deleted file mode 100644
index f4f2a41f..00000000
--- a/Controls.DocumentViewer/Resources/flipimage_horizontal.svg
+++ /dev/null
@@ -1,20 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Resources/flipimage_vertical.svg b/Controls.DocumentViewer/Resources/flipimage_vertical.svg
deleted file mode 100644
index 536c131e..00000000
--- a/Controls.DocumentViewer/Resources/flipimage_vertical.svg
+++ /dev/null
@@ -1,20 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Resources/floatingobjectoutlinecolor.svg b/Controls.DocumentViewer/Resources/floatingobjectoutlinecolor.svg
deleted file mode 100644
index 5af7cef5..00000000
--- a/Controls.DocumentViewer/Resources/floatingobjectoutlinecolor.svg
+++ /dev/null
@@ -1,9 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Resources/next.svg b/Controls.DocumentViewer/Resources/next.svg
deleted file mode 100644
index e87edcfa..00000000
--- a/Controls.DocumentViewer/Resources/next.svg
+++ /dev/null
@@ -1,7 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Resources/prev.svg b/Controls.DocumentViewer/Resources/prev.svg
deleted file mode 100644
index 0eae3489..00000000
--- a/Controls.DocumentViewer/Resources/prev.svg
+++ /dev/null
@@ -1,7 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Resources/rotateclockwise.svg b/Controls.DocumentViewer/Resources/rotateclockwise.svg
deleted file mode 100644
index d3f0be0a..00000000
--- a/Controls.DocumentViewer/Resources/rotateclockwise.svg
+++ /dev/null
@@ -1,15 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Resources/rotatecounterclockwise.svg b/Controls.DocumentViewer/Resources/rotatecounterclockwise.svg
deleted file mode 100644
index 8b8e24b1..00000000
--- a/Controls.DocumentViewer/Resources/rotatecounterclockwise.svg
+++ /dev/null
@@ -1,15 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Resources/tooltips.svg b/Controls.DocumentViewer/Resources/tooltips.svg
deleted file mode 100644
index 0a0fd012..00000000
--- a/Controls.DocumentViewer/Resources/tooltips.svg
+++ /dev/null
@@ -1,16 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Resources/tooltips1.svg b/Controls.DocumentViewer/Resources/tooltips1.svg
deleted file mode 100644
index 0a0fd012..00000000
--- a/Controls.DocumentViewer/Resources/tooltips1.svg
+++ /dev/null
@@ -1,16 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Resources/viewsettings.svg b/Controls.DocumentViewer/Resources/viewsettings.svg
deleted file mode 100644
index d7243dcb..00000000
--- a/Controls.DocumentViewer/Resources/viewsettings.svg
+++ /dev/null
@@ -1,17 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/Resources/zoomin.svg b/Controls.DocumentViewer/Resources/zoomin.svg
deleted file mode 100644
index 1bf31d16..00000000
--- a/Controls.DocumentViewer/Resources/zoomin.svg
+++ /dev/null
@@ -1,9 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/frmViewerSettings.Designer.vb b/Controls.DocumentViewer/frmViewerSettings.Designer.vb
deleted file mode 100644
index 37e0efc6..00000000
--- a/Controls.DocumentViewer/frmViewerSettings.Designer.vb
+++ /dev/null
@@ -1,451 +0,0 @@
- _
-Partial Class frmViewerSettings
- Inherits System.Windows.Forms.Form
-
- 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
- _
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- Try
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- Finally
- MyBase.Dispose(disposing)
- End Try
- End Sub
-
- 'Wird vom Windows Form-Designer benötigt.
- Private components As System.ComponentModel.IContainer
-
- 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
- 'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
- 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
- _
- Private Sub InitializeComponent()
- Me.GroupBox4 = New System.Windows.Forms.GroupBox()
- Me.chkPDFVerifyDigitalCertificates = New System.Windows.Forms.CheckBox()
- Me.chkPDFIncreaseTextContrast = New System.Windows.Forms.CheckBox()
- Me.chkPDFEnableLinks = New System.Windows.Forms.CheckBox()
- Me.chkPDFEnableFileLinks = New System.Windows.Forms.CheckBox()
- Me.chkPDFDisplayFormFields = New System.Windows.Forms.CheckBox()
- Me.GroupBox3 = New System.Windows.Forms.GroupBox()
- Me.chkEnableICM = New System.Windows.Forms.CheckBox()
- Me.GroupBox2 = New System.Windows.Forms.GroupBox()
- Me.chkHQAnnotationsRendering = New System.Windows.Forms.CheckBox()
- Me.chkAnnotationsDropShadow = New System.Windows.Forms.CheckBox()
- Me.GroupBox1 = New System.Windows.Forms.GroupBox()
- Me.chkEnableDeferredPainting = New System.Windows.Forms.CheckBox()
- Me.Label8 = New System.Windows.Forms.Label()
- Me.cbPageDisplayMode = New System.Windows.Forms.ComboBox()
- Me.chkIgnoreDocumentResolution = New System.Windows.Forms.CheckBox()
- Me.PictureBox1 = New System.Windows.Forms.PictureBox()
- Me.txtZoomStep = New System.Windows.Forms.NumericUpDown()
- Me.cbMouseWheelMode = New System.Windows.Forms.ComboBox()
- Me.cbDocumentPosition = New System.Windows.Forms.ComboBox()
- Me.cbDocumentAlignment = New System.Windows.Forms.ComboBox()
- Me.chkEnableMenu = New System.Windows.Forms.CheckBox()
- Me.Label6 = New System.Windows.Forms.Label()
- Me.Label5 = New System.Windows.Forms.Label()
- Me.Label4 = New System.Windows.Forms.Label()
- Me.Label3 = New System.Windows.Forms.Label()
- Me.Label2 = New System.Windows.Forms.Label()
- Me.cbDisplayQuality = New System.Windows.Forms.ComboBox()
- Me.chkContinuousViewMode = New System.Windows.Forms.CheckBox()
- Me.Label1 = New System.Windows.Forms.Label()
- Me.btnApply = New System.Windows.Forms.Button()
- Me.GroupBox4.SuspendLayout()
- Me.GroupBox3.SuspendLayout()
- Me.GroupBox2.SuspendLayout()
- Me.GroupBox1.SuspendLayout()
- CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.txtZoomStep, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.SuspendLayout()
- '
- 'GroupBox4
- '
- Me.GroupBox4.Controls.Add(Me.chkPDFVerifyDigitalCertificates)
- Me.GroupBox4.Controls.Add(Me.chkPDFIncreaseTextContrast)
- Me.GroupBox4.Controls.Add(Me.chkPDFEnableLinks)
- Me.GroupBox4.Controls.Add(Me.chkPDFEnableFileLinks)
- Me.GroupBox4.Controls.Add(Me.chkPDFDisplayFormFields)
- Me.GroupBox4.Location = New System.Drawing.Point(309, 101)
- Me.GroupBox4.Name = "GroupBox4"
- Me.GroupBox4.Size = New System.Drawing.Size(291, 184)
- Me.GroupBox4.TabIndex = 103
- Me.GroupBox4.TabStop = False
- Me.GroupBox4.Text = "PDF viewing options"
- '
- 'chkPDFVerifyDigitalCertificates
- '
- Me.chkPDFVerifyDigitalCertificates.AutoSize = True
- Me.chkPDFVerifyDigitalCertificates.CheckAlign = System.Drawing.ContentAlignment.MiddleRight
- Me.chkPDFVerifyDigitalCertificates.Location = New System.Drawing.Point(6, 119)
- Me.chkPDFVerifyDigitalCertificates.Name = "chkPDFVerifyDigitalCertificates"
- Me.chkPDFVerifyDigitalCertificates.Size = New System.Drawing.Size(136, 17)
- Me.chkPDFVerifyDigitalCertificates.TabIndex = 20
- Me.chkPDFVerifyDigitalCertificates.Text = "Verify digital certificates"
- Me.chkPDFVerifyDigitalCertificates.UseVisualStyleBackColor = True
- '
- 'chkPDFIncreaseTextContrast
- '
- Me.chkPDFIncreaseTextContrast.AutoSize = True
- Me.chkPDFIncreaseTextContrast.CheckAlign = System.Drawing.ContentAlignment.MiddleRight
- Me.chkPDFIncreaseTextContrast.Location = New System.Drawing.Point(6, 96)
- Me.chkPDFIncreaseTextContrast.Name = "chkPDFIncreaseTextContrast"
- Me.chkPDFIncreaseTextContrast.Size = New System.Drawing.Size(128, 17)
- Me.chkPDFIncreaseTextContrast.TabIndex = 18
- Me.chkPDFIncreaseTextContrast.Text = "Increase text contrast"
- Me.chkPDFIncreaseTextContrast.UseVisualStyleBackColor = True
- '
- 'chkPDFEnableLinks
- '
- Me.chkPDFEnableLinks.AutoSize = True
- Me.chkPDFEnableLinks.CheckAlign = System.Drawing.ContentAlignment.MiddleRight
- Me.chkPDFEnableLinks.Location = New System.Drawing.Point(6, 73)
- Me.chkPDFEnableLinks.Name = "chkPDFEnableLinks"
- Me.chkPDFEnableLinks.Size = New System.Drawing.Size(83, 17)
- Me.chkPDFEnableLinks.TabIndex = 17
- Me.chkPDFEnableLinks.Text = "Enable links"
- Me.chkPDFEnableLinks.UseVisualStyleBackColor = True
- '
- 'chkPDFEnableFileLinks
- '
- Me.chkPDFEnableFileLinks.AutoSize = True
- Me.chkPDFEnableFileLinks.CheckAlign = System.Drawing.ContentAlignment.MiddleRight
- Me.chkPDFEnableFileLinks.Location = New System.Drawing.Point(6, 50)
- Me.chkPDFEnableFileLinks.Name = "chkPDFEnableFileLinks"
- Me.chkPDFEnableFileLinks.Size = New System.Drawing.Size(99, 17)
- Me.chkPDFEnableFileLinks.TabIndex = 16
- Me.chkPDFEnableFileLinks.Text = "Enable file links"
- Me.chkPDFEnableFileLinks.UseVisualStyleBackColor = True
- '
- 'chkPDFDisplayFormFields
- '
- Me.chkPDFDisplayFormFields.AutoSize = True
- Me.chkPDFDisplayFormFields.CheckAlign = System.Drawing.ContentAlignment.MiddleRight
- Me.chkPDFDisplayFormFields.Location = New System.Drawing.Point(6, 27)
- Me.chkPDFDisplayFormFields.Name = "chkPDFDisplayFormFields"
- Me.chkPDFDisplayFormFields.Size = New System.Drawing.Size(110, 17)
- Me.chkPDFDisplayFormFields.TabIndex = 15
- Me.chkPDFDisplayFormFields.Text = "Display form fields"
- Me.chkPDFDisplayFormFields.UseVisualStyleBackColor = True
- '
- 'GroupBox3
- '
- Me.GroupBox3.Controls.Add(Me.chkEnableICM)
- Me.GroupBox3.Location = New System.Drawing.Point(12, 314)
- Me.GroupBox3.Name = "GroupBox3"
- Me.GroupBox3.Size = New System.Drawing.Size(291, 46)
- Me.GroupBox3.TabIndex = 101
- Me.GroupBox3.TabStop = False
- Me.GroupBox3.Text = "Image viewing options"
- '
- 'chkEnableICM
- '
- Me.chkEnableICM.AutoSize = True
- Me.chkEnableICM.CheckAlign = System.Drawing.ContentAlignment.MiddleRight
- Me.chkEnableICM.Location = New System.Drawing.Point(6, 19)
- Me.chkEnableICM.Name = "chkEnableICM"
- Me.chkEnableICM.Size = New System.Drawing.Size(81, 17)
- Me.chkEnableICM.TabIndex = 12
- Me.chkEnableICM.Text = "Enable ICM"
- Me.chkEnableICM.UseVisualStyleBackColor = True
- '
- 'GroupBox2
- '
- Me.GroupBox2.Controls.Add(Me.chkHQAnnotationsRendering)
- Me.GroupBox2.Controls.Add(Me.chkAnnotationsDropShadow)
- Me.GroupBox2.Location = New System.Drawing.Point(309, 12)
- Me.GroupBox2.Name = "GroupBox2"
- Me.GroupBox2.Size = New System.Drawing.Size(291, 83)
- Me.GroupBox2.TabIndex = 102
- Me.GroupBox2.TabStop = False
- Me.GroupBox2.Text = "Annotations options"
- '
- 'chkHQAnnotationsRendering
- '
- Me.chkHQAnnotationsRendering.AutoSize = True
- Me.chkHQAnnotationsRendering.CheckAlign = System.Drawing.ContentAlignment.MiddleRight
- Me.chkHQAnnotationsRendering.Location = New System.Drawing.Point(6, 42)
- Me.chkHQAnnotationsRendering.Name = "chkHQAnnotationsRendering"
- Me.chkHQAnnotationsRendering.Size = New System.Drawing.Size(147, 17)
- Me.chkHQAnnotationsRendering.TabIndex = 14
- Me.chkHQAnnotationsRendering.Text = "HQ annotations rendering"
- Me.chkHQAnnotationsRendering.UseVisualStyleBackColor = True
- '
- 'chkAnnotationsDropShadow
- '
- Me.chkAnnotationsDropShadow.AutoSize = True
- Me.chkAnnotationsDropShadow.CheckAlign = System.Drawing.ContentAlignment.MiddleRight
- Me.chkAnnotationsDropShadow.Location = New System.Drawing.Point(6, 19)
- Me.chkAnnotationsDropShadow.Name = "chkAnnotationsDropShadow"
- Me.chkAnnotationsDropShadow.Size = New System.Drawing.Size(146, 17)
- Me.chkAnnotationsDropShadow.TabIndex = 13
- Me.chkAnnotationsDropShadow.Text = "Annotations drop shadow"
- Me.chkAnnotationsDropShadow.UseVisualStyleBackColor = True
- '
- 'GroupBox1
- '
- Me.GroupBox1.Controls.Add(Me.chkEnableDeferredPainting)
- Me.GroupBox1.Controls.Add(Me.Label8)
- Me.GroupBox1.Controls.Add(Me.cbPageDisplayMode)
- Me.GroupBox1.Controls.Add(Me.chkIgnoreDocumentResolution)
- Me.GroupBox1.Controls.Add(Me.PictureBox1)
- Me.GroupBox1.Controls.Add(Me.txtZoomStep)
- Me.GroupBox1.Controls.Add(Me.cbMouseWheelMode)
- Me.GroupBox1.Controls.Add(Me.cbDocumentPosition)
- Me.GroupBox1.Controls.Add(Me.cbDocumentAlignment)
- Me.GroupBox1.Controls.Add(Me.chkEnableMenu)
- Me.GroupBox1.Controls.Add(Me.Label6)
- Me.GroupBox1.Controls.Add(Me.Label5)
- Me.GroupBox1.Controls.Add(Me.Label4)
- Me.GroupBox1.Controls.Add(Me.Label3)
- Me.GroupBox1.Controls.Add(Me.Label2)
- Me.GroupBox1.Controls.Add(Me.cbDisplayQuality)
- Me.GroupBox1.Controls.Add(Me.chkContinuousViewMode)
- Me.GroupBox1.Controls.Add(Me.Label1)
- Me.GroupBox1.Location = New System.Drawing.Point(12, 12)
- Me.GroupBox1.Name = "GroupBox1"
- Me.GroupBox1.Size = New System.Drawing.Size(291, 296)
- Me.GroupBox1.TabIndex = 100
- Me.GroupBox1.TabStop = False
- Me.GroupBox1.Text = "General options"
- '
- 'chkEnableDeferredPainting
- '
- Me.chkEnableDeferredPainting.AutoSize = True
- Me.chkEnableDeferredPainting.CheckAlign = System.Drawing.ContentAlignment.MiddleRight
- Me.chkEnableDeferredPainting.Location = New System.Drawing.Point(6, 270)
- Me.chkEnableDeferredPainting.Name = "chkEnableDeferredPainting"
- Me.chkEnableDeferredPainting.Size = New System.Drawing.Size(141, 17)
- Me.chkEnableDeferredPainting.TabIndex = 17
- Me.chkEnableDeferredPainting.Text = "Enable deferred painting"
- Me.chkEnableDeferredPainting.UseVisualStyleBackColor = True
- '
- 'Label8
- '
- Me.Label8.AutoSize = True
- Me.Label8.Location = New System.Drawing.Point(6, 95)
- Me.Label8.Name = "Label8"
- Me.Label8.Size = New System.Drawing.Size(70, 13)
- Me.Label8.TabIndex = 16
- Me.Label8.Text = "Display mode"
- '
- 'cbPageDisplayMode
- '
- Me.cbPageDisplayMode.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.cbPageDisplayMode.FormattingEnabled = True
- Me.cbPageDisplayMode.Location = New System.Drawing.Point(116, 93)
- Me.cbPageDisplayMode.Name = "cbPageDisplayMode"
- Me.cbPageDisplayMode.Size = New System.Drawing.Size(130, 21)
- Me.cbPageDisplayMode.TabIndex = 4
- '
- 'chkIgnoreDocumentResolution
- '
- Me.chkIgnoreDocumentResolution.AutoSize = True
- Me.chkIgnoreDocumentResolution.CheckAlign = System.Drawing.ContentAlignment.MiddleRight
- Me.chkIgnoreDocumentResolution.Location = New System.Drawing.Point(6, 248)
- Me.chkIgnoreDocumentResolution.Name = "chkIgnoreDocumentResolution"
- Me.chkIgnoreDocumentResolution.Size = New System.Drawing.Size(154, 17)
- Me.chkIgnoreDocumentResolution.TabIndex = 11
- Me.chkIgnoreDocumentResolution.Text = "Ignore document resolution"
- Me.chkIgnoreDocumentResolution.UseVisualStyleBackColor = True
- '
- 'PictureBox1
- '
- Me.PictureBox1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
- Me.PictureBox1.Location = New System.Drawing.Point(116, 198)
- Me.PictureBox1.Name = "PictureBox1"
- Me.PictureBox1.Size = New System.Drawing.Size(21, 21)
- Me.PictureBox1.TabIndex = 3
- Me.PictureBox1.TabStop = False
- '
- 'txtZoomStep
- '
- Me.txtZoomStep.Location = New System.Drawing.Point(69, 18)
- Me.txtZoomStep.Maximum = New Decimal(New Integer() {1000, 0, 0, 0})
- Me.txtZoomStep.Minimum = New Decimal(New Integer() {1, 0, 0, 0})
- Me.txtZoomStep.Name = "txtZoomStep"
- Me.txtZoomStep.Size = New System.Drawing.Size(79, 20)
- Me.txtZoomStep.TabIndex = 0
- Me.txtZoomStep.Value = New Decimal(New Integer() {1, 0, 0, 0})
- '
- 'cbMouseWheelMode
- '
- Me.cbMouseWheelMode.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.cbMouseWheelMode.FormattingEnabled = True
- Me.cbMouseWheelMode.Location = New System.Drawing.Point(116, 171)
- Me.cbMouseWheelMode.Name = "cbMouseWheelMode"
- Me.cbMouseWheelMode.Size = New System.Drawing.Size(107, 21)
- Me.cbMouseWheelMode.TabIndex = 7
- '
- 'cbDocumentPosition
- '
- Me.cbDocumentPosition.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.cbDocumentPosition.FormattingEnabled = True
- Me.cbDocumentPosition.Location = New System.Drawing.Point(116, 145)
- Me.cbDocumentPosition.Name = "cbDocumentPosition"
- Me.cbDocumentPosition.Size = New System.Drawing.Size(107, 21)
- Me.cbDocumentPosition.TabIndex = 6
- '
- 'cbDocumentAlignment
- '
- Me.cbDocumentAlignment.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.cbDocumentAlignment.FormattingEnabled = True
- Me.cbDocumentAlignment.Location = New System.Drawing.Point(116, 119)
- Me.cbDocumentAlignment.Name = "cbDocumentAlignment"
- Me.cbDocumentAlignment.Size = New System.Drawing.Size(107, 21)
- Me.cbDocumentAlignment.TabIndex = 5
- '
- 'chkEnableMenu
- '
- Me.chkEnableMenu.AutoSize = True
- Me.chkEnableMenu.CheckAlign = System.Drawing.ContentAlignment.MiddleRight
- Me.chkEnableMenu.Location = New System.Drawing.Point(6, 225)
- Me.chkEnableMenu.Name = "chkEnableMenu"
- Me.chkEnableMenu.Size = New System.Drawing.Size(140, 17)
- Me.chkEnableMenu.TabIndex = 10
- Me.chkEnableMenu.Text = "Enable contextual menu"
- Me.chkEnableMenu.UseVisualStyleBackColor = True
- '
- 'Label6
- '
- Me.Label6.AutoSize = True
- Me.Label6.Location = New System.Drawing.Point(6, 202)
- Me.Label6.Name = "Label6"
- Me.Label6.Size = New System.Drawing.Size(91, 13)
- Me.Label6.TabIndex = 9
- Me.Label6.Text = "Background color"
- '
- 'Label5
- '
- Me.Label5.AutoSize = True
- Me.Label5.Location = New System.Drawing.Point(7, 173)
- Me.Label5.Name = "Label5"
- Me.Label5.Size = New System.Drawing.Size(99, 13)
- Me.Label5.TabIndex = 8
- Me.Label5.Text = "Mouse wheel mode"
- '
- 'Label4
- '
- Me.Label4.AutoSize = True
- Me.Label4.Location = New System.Drawing.Point(7, 147)
- Me.Label4.Name = "Label4"
- Me.Label4.Size = New System.Drawing.Size(95, 13)
- Me.Label4.TabIndex = 7
- Me.Label4.Text = "Document position"
- '
- 'Label3
- '
- Me.Label3.AutoSize = True
- Me.Label3.Location = New System.Drawing.Point(7, 121)
- Me.Label3.Name = "Label3"
- Me.Label3.Size = New System.Drawing.Size(104, 13)
- Me.Label3.TabIndex = 6
- Me.Label3.Text = "Document alignment"
- '
- 'Label2
- '
- Me.Label2.AutoSize = True
- Me.Label2.Location = New System.Drawing.Point(6, 69)
- Me.Label2.Name = "Label2"
- Me.Label2.Size = New System.Drawing.Size(74, 13)
- Me.Label2.TabIndex = 4
- Me.Label2.Text = "Display quality"
- '
- 'cbDisplayQuality
- '
- Me.cbDisplayQuality.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
- Me.cbDisplayQuality.FormattingEnabled = True
- Me.cbDisplayQuality.Location = New System.Drawing.Point(116, 67)
- Me.cbDisplayQuality.Name = "cbDisplayQuality"
- Me.cbDisplayQuality.Size = New System.Drawing.Size(107, 21)
- Me.cbDisplayQuality.TabIndex = 3
- '
- 'chkContinuousViewMode
- '
- Me.chkContinuousViewMode.AutoSize = True
- Me.chkContinuousViewMode.CheckAlign = System.Drawing.ContentAlignment.MiddleRight
- Me.chkContinuousViewMode.Location = New System.Drawing.Point(6, 42)
- Me.chkContinuousViewMode.Name = "chkContinuousViewMode"
- Me.chkContinuousViewMode.Size = New System.Drawing.Size(133, 17)
- Me.chkContinuousViewMode.TabIndex = 2
- Me.chkContinuousViewMode.Text = "Continuous view mode"
- Me.chkContinuousViewMode.UseVisualStyleBackColor = True
- '
- 'Label1
- '
- Me.Label1.AutoSize = True
- Me.Label1.Location = New System.Drawing.Point(6, 20)
- Me.Label1.Name = "Label1"
- Me.Label1.Size = New System.Drawing.Size(57, 13)
- Me.Label1.TabIndex = 1
- Me.Label1.Text = "Zoom step"
- '
- 'btnApply
- '
- Me.btnApply.Location = New System.Drawing.Point(529, 338)
- Me.btnApply.Name = "btnApply"
- Me.btnApply.Size = New System.Drawing.Size(75, 23)
- Me.btnApply.TabIndex = 104
- Me.btnApply.Text = "Apply"
- Me.btnApply.UseVisualStyleBackColor = True
- '
- 'frmViewerSettings
- '
- Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.ClientSize = New System.Drawing.Size(625, 377)
- Me.Controls.Add(Me.GroupBox4)
- Me.Controls.Add(Me.GroupBox3)
- Me.Controls.Add(Me.GroupBox2)
- Me.Controls.Add(Me.GroupBox1)
- Me.Controls.Add(Me.btnApply)
- Me.Name = "frmViewerSettings"
- Me.Text = "frmViewerSettings"
- Me.GroupBox4.ResumeLayout(False)
- Me.GroupBox4.PerformLayout()
- Me.GroupBox3.ResumeLayout(False)
- Me.GroupBox3.PerformLayout()
- Me.GroupBox2.ResumeLayout(False)
- Me.GroupBox2.PerformLayout()
- Me.GroupBox1.ResumeLayout(False)
- Me.GroupBox1.PerformLayout()
- CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.txtZoomStep, System.ComponentModel.ISupportInitialize).EndInit()
- Me.ResumeLayout(False)
-
- End Sub
-
- Friend WithEvents GroupBox4 As GroupBox
- Friend WithEvents chkPDFVerifyDigitalCertificates As CheckBox
- Friend WithEvents chkPDFIncreaseTextContrast As CheckBox
- Friend WithEvents chkPDFEnableLinks As CheckBox
- Friend WithEvents chkPDFEnableFileLinks As CheckBox
- Friend WithEvents chkPDFDisplayFormFields As CheckBox
- Friend WithEvents GroupBox3 As GroupBox
- Friend WithEvents chkEnableICM As CheckBox
- Friend WithEvents GroupBox2 As GroupBox
- Friend WithEvents chkHQAnnotationsRendering As CheckBox
- Friend WithEvents chkAnnotationsDropShadow As CheckBox
- Friend WithEvents GroupBox1 As GroupBox
- Friend WithEvents chkEnableDeferredPainting As CheckBox
- Friend WithEvents Label8 As Label
- Friend WithEvents cbPageDisplayMode As ComboBox
- Friend WithEvents chkIgnoreDocumentResolution As CheckBox
- Friend WithEvents PictureBox1 As PictureBox
- Friend WithEvents txtZoomStep As NumericUpDown
- Friend WithEvents cbMouseWheelMode As ComboBox
- Friend WithEvents cbDocumentPosition As ComboBox
- Friend WithEvents cbDocumentAlignment As ComboBox
- Friend WithEvents chkEnableMenu As CheckBox
- Friend WithEvents Label6 As Label
- Friend WithEvents Label5 As Label
- Friend WithEvents Label4 As Label
- Friend WithEvents Label3 As Label
- Friend WithEvents Label2 As Label
- Friend WithEvents cbDisplayQuality As ComboBox
- Friend WithEvents chkContinuousViewMode As CheckBox
- Friend WithEvents Label1 As Label
- Friend WithEvents btnApply As Button
-End Class
diff --git a/Controls.DocumentViewer/frmViewerSettings.resx b/Controls.DocumentViewer/frmViewerSettings.resx
deleted file mode 100644
index 1af7de15..00000000
--- a/Controls.DocumentViewer/frmViewerSettings.resx
+++ /dev/null
@@ -1,120 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
\ No newline at end of file
diff --git a/Controls.DocumentViewer/frmViewerSettings.vb b/Controls.DocumentViewer/frmViewerSettings.vb
deleted file mode 100644
index a7232461..00000000
--- a/Controls.DocumentViewer/frmViewerSettings.vb
+++ /dev/null
@@ -1,100 +0,0 @@
-Option Strict On
-Option Explicit On
-
-Imports GdPicture14
-
-Public Class frmViewerSettings
-
- Private ReadOnly _owner As GdViewer
-
- Private ReadOnly _mouseWheelModes As New Dictionary(Of ViewerMouseWheelMode, String) From {
- {ViewerMouseWheelMode.MouseWheelModeZoom, "Zoom"},
- {ViewerMouseWheelMode.MouseWheelModeVerticalScroll, "Scroll"},
- {ViewerMouseWheelMode.MouseWheelModePageChange, "Page change"}
- }
- Private ReadOnly _documentAlignments As New Dictionary(Of ViewerDocumentAlignment, String) From {
- {ViewerDocumentAlignment.DocumentAlignmentBottomCenter, "Bottom center"},
- {ViewerDocumentAlignment.DocumentAlignmentBottomLeft, "Bottom left"},
- {ViewerDocumentAlignment.DocumentAlignmentBottomRight, "Bottom right"},
- {ViewerDocumentAlignment.DocumentAlignmentMiddleCenter, "Middle center"},
- {ViewerDocumentAlignment.DocumentAlignmentMiddleLeft, "Middle left"},
- {ViewerDocumentAlignment.DocumentAlignmentMiddleRight, "Middle right"},
- {ViewerDocumentAlignment.DocumentAlignmentTopCenter, "Top center"},
- {ViewerDocumentAlignment.DocumentAlignmentTopLeft, "Top left"},
- {ViewerDocumentAlignment.DocumentAlignmentTopRight, "Top right"}
- }
- Private ReadOnly _documentPositions As New Dictionary(Of ViewerDocumentPosition, String) From {
- {ViewerDocumentPosition.DocumentPositionBottomCenter, "Bottom center"},
- {ViewerDocumentPosition.DocumentPositionBottomLeft, "Bottom left"},
- {ViewerDocumentPosition.DocumentPositionBottomRight, "Bottom right"},
- {ViewerDocumentPosition.DocumentPositionMiddleCenter, "Middle center"},
- {ViewerDocumentPosition.DocumentPositionMiddleLeft, "Middle left"},
- {ViewerDocumentPosition.DocumentPositionMiddleRight, "Middle right"},
- {ViewerDocumentPosition.DocumentPositionTopCenter, "Top center"},
- {ViewerDocumentPosition.DocumentPositionTopLeft, "Top left"},
- {ViewerDocumentPosition.DocumentPositionTopRight, "Top right"}
- }
- Private ReadOnly _displayQualities As New Dictionary(Of DisplayQuality, String) From {
- {DisplayQuality.DisplayQualityLow, "Low"},
- {DisplayQuality.DisplayQualityBilinear, "Bilinear"},
- {DisplayQuality.DisplayQualityBicubic, "Bicubic"},
- {DisplayQuality.DisplayQualityBilinearHQ, "Bilinear HQ"},
- {DisplayQuality.DisplayQualityBicubicHQ, "Bicubic HQ"},
- {DisplayQuality.DisplayQualityAutomatic, "Automatic"}
- }
- Private ReadOnly _displayPageModes As New Dictionary(Of PageDisplayMode, String) From {
- {PageDisplayMode.MultiplePagesView, "Multiple pages"},
- {PageDisplayMode.SinglePageView, "Single page"}
- }
-
- Public Sub New(ByVal owner As GdViewer)
- InitializeComponent()
- _owner = owner
- End Sub
-
- Private Sub frmSettings_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- For Each item In _mouseWheelModes
- cbMouseWheelMode.Items.Add(item.Value)
- Next
- For Each item In _documentAlignments
- cbDocumentAlignment.Items.Add(item.Value)
- Next
- For Each item In _documentPositions
- cbDocumentPosition.Items.Add(item.Value)
- Next
- For Each item In _displayQualities
- cbDisplayQuality.Items.Add(item.Value)
- Next
- For Each item In _displayPageModes
- cbPageDisplayMode.Items.Add(item.Value)
- Next
-
- cbMouseWheelMode.SelectedIndex = CType(_owner.MouseWheelMode, Integer)
- cbDocumentAlignment.SelectedItem = _documentAlignments(_owner.DocumentAlignment)
- cbDocumentPosition.SelectedItem = _documentPositions(_owner.DocumentPosition)
- cbDisplayQuality.SelectedItem = _displayQualities(_owner.DisplayQuality)
- cbPageDisplayMode.SelectedItem = _displayPageModes(_owner.PageDisplayMode)
- txtZoomStep.Text = CStr(_owner.ZoomStep)
- chkContinuousViewMode.Checked = _owner.ContinuousViewMode
- chkEnableMenu.Checked = _owner.EnableMenu
- PictureBox1.BackColor = _owner.BackColor
- chkIgnoreDocumentResolution.Checked = _owner.IgnoreDocumentResolution
- chkEnableDeferredPainting.Checked = _owner.EnableDeferredPainting
-
- chkAnnotationsDropShadow.Checked = _owner.AnnotationDropShadow
- chkHQAnnotationsRendering.Checked = _owner.HQAnnotationRendering
-
- chkEnableICM.Checked = _owner.EnableICM
-
- chkPDFDisplayFormFields.Checked = _owner.PdfDisplayFormField
- chkPDFEnableFileLinks.Checked = _owner.PdfEnableFileLinks
- chkPDFEnableLinks.Checked = _owner.PdfEnableLinks
- chkPDFIncreaseTextContrast.Checked = _owner.PdfIncreaseTextContrast
- chkPDFVerifyDigitalCertificates.Checked = _owner.PdfVerifyDigitalCertificates
- End Sub
-
- Private Sub PictureBox1_Click(sender As Object, e As EventArgs) Handles PictureBox1.Click
-
- End Sub
-
-End Class
\ No newline at end of file
diff --git a/Controls.DocumentViewer/packages.config b/Controls.DocumentViewer/packages.config
deleted file mode 100644
index 63f3075e..00000000
--- a/Controls.DocumentViewer/packages.config
+++ /dev/null
@@ -1,4 +0,0 @@
-
-
-
-
\ No newline at end of file
diff --git a/Controls.LookupGrid/LookupControl.vbproj b/Controls.LookupGrid/LookupControl.vbproj
deleted file mode 100644
index d7ed49f5..00000000
--- a/Controls.LookupGrid/LookupControl.vbproj
+++ /dev/null
@@ -1,178 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {3DCD6D1A-C830-4241-B7E4-27430E7EA483}
- Library
- DigitalData.Controls.LookupGrid
- DigitalData.Controls.LookupGrid
- 512
- Windows
- v4.6.1
-
-
- true
- full
- true
- true
- bin\Debug\
- DigitalData.Controls.LookupGrid.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.Controls.LookupGrid.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
- False
-
-
- False
-
-
- False
-
-
- False
-
-
- False
-
-
- False
-
-
-
-
-
-
- False
-
-
- False
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- frmLookupGrid.vb
-
-
- Form
-
-
-
-
- True
- Application.myapp
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
- LookupControl3.vb
-
-
- Component
-
-
- Strings.en.resx
- True
- True
-
-
- True
- True
- Strings.resx
-
-
-
-
- frmLookupGrid.vb
-
-
- frmLookupGrid.vb
-
-
- LookupControl3.vb
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
- ResXFileCodeGenerator
- Strings.en.Designer.vb
- My.Resources
-
-
- My.Resources
- ResXFileCodeGenerator
- Strings.Designer.vb
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Controls.LookupGrid/LookupControl.vbproj.bak b/Controls.LookupGrid/LookupControl.vbproj.bak
deleted file mode 100644
index e025f218..00000000
--- a/Controls.LookupGrid/LookupControl.vbproj.bak
+++ /dev/null
@@ -1,177 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {3DCD6D1A-C830-4241-B7E4-27430E7EA483}
- Library
- DigitalData.Controls.LookupGrid
- DigitalData.Controls.LookupGrid
- 512
- Windows
- v4.6.1
-
-
- true
- full
- true
- true
- bin\Debug\
- DigitalData.Controls.LookupGrid.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.Controls.LookupGrid.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
- False
-
-
- False
-
-
- False
-
-
- False
-
-
- False
-
-
- False
-
-
-
-
-
- False
-
-
- False
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- frmLookupGrid.vb
-
-
- Form
-
-
-
-
- True
- Application.myapp
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
- LookupControl3.vb
-
-
- Component
-
-
- Strings.en.resx
- True
- True
-
-
- True
- True
- Strings.resx
-
-
-
-
- frmLookupGrid.vb
-
-
- frmLookupGrid.vb
-
-
- LookupControl3.vb
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
- ResXFileCodeGenerator
- Strings.en.Designer.vb
- My.Resources
-
-
- My.Resources
- ResXFileCodeGenerator
- Strings.Designer.vb
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Controls.LookupGrid/LookupControl3.Designer.vb b/Controls.LookupGrid/LookupControl3.Designer.vb
deleted file mode 100644
index 441a84d1..00000000
--- a/Controls.LookupGrid/LookupControl3.Designer.vb
+++ /dev/null
@@ -1,47 +0,0 @@
-Partial Class SimpleGridControl
- Inherits System.ComponentModel.Component
-
- _
- Public Sub New(ByVal container As System.ComponentModel.IContainer)
- MyClass.New()
-
- 'Erforderlich für die Unterstützung des Windows.Forms-Klassenkompositions-Designers
- If (container IsNot Nothing) Then
- container.Add(Me)
- End If
-
- End Sub
-
- _
- Public Sub New()
- MyBase.New()
-
- 'Dieser Aufruf ist für den Komponenten-Designer erforderlich.
- InitializeComponent()
-
- End Sub
-
- 'Die Komponente überschreibt den Löschvorgang zum Bereinigen der Komponentenliste.
- _
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- Try
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- Finally
- MyBase.Dispose(disposing)
- End Try
- End Sub
-
- 'Wird vom Komponenten-Designer benötigt.
- Private components As System.ComponentModel.IContainer
-
- 'Hinweis: Die folgende Prozedur ist für den Komponenten-Designer erforderlich.
- 'Das Bearbeiten ist mit dem Komponenten-Designer möglich.
- 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
- _
- Private Sub InitializeComponent()
- components = New System.ComponentModel.Container()
- End Sub
-
-End Class
diff --git a/Controls.LookupGrid/LookupControl3.resx b/Controls.LookupGrid/LookupControl3.resx
deleted file mode 100644
index e5858cc2..00000000
--- a/Controls.LookupGrid/LookupControl3.resx
+++ /dev/null
@@ -1,123 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- False
-
-
\ No newline at end of file
diff --git a/Controls.LookupGrid/LookupControl3.vb b/Controls.LookupGrid/LookupControl3.vb
deleted file mode 100644
index 86543c94..00000000
--- a/Controls.LookupGrid/LookupControl3.vb
+++ /dev/null
@@ -1,347 +0,0 @@
-Imports System.Drawing
-Imports System.ComponentModel
-Imports System.Windows.Forms
-Imports DevExpress.XtraEditors
-Imports DevExpress.XtraEditors.Repository
-Imports DevExpress.XtraEditors.Registrator
-Imports DevExpress.XtraEditors.ViewInfo
-Imports DevExpress.XtraEditors.Drawing
-Imports DevExpress.Accessibility
-Imports DevExpress.XtraEditors.Controls
-Imports DevExpress.XtraGrid.Views.Base
-Imports DevExpress.XtraGrid.Columns
-
-
-Public Class LookupControl3
- Inherits GridLookUpEdit
-
-
- Public Shadows ReadOnly Property Properties As RepositoryItemLookupControl3
- Get
- Return TryCast(MyBase.Properties, RepositoryItemLookupControl3)
- End Get
- End Property
-
- Public Overrides ReadOnly Property EditorTypeName As String
- Get
- Return RepositoryItemLookupControl3.CustomEditName
- End Get
- End Property
-
- Shared Sub New()
- RepositoryItemLookupControl3.RegisterLookupControl()
- End Sub
-
- Private Sub LookupControl3_EditValueChanging(sender As Object, e As ChangingEventArgs) Handles Me.EditValueChanging
- e.Cancel = True
- End Sub
-
- Friend WithEvents fProperties As RepositoryItemGridLookUpEdit
- Friend WithEvents fPropertiesView As DevExpress.XtraGrid.Views.Grid.GridView
-
- Private Sub InitializeComponent()
- Me.fProperties = New DevExpress.XtraEditors.Repository.RepositoryItemGridLookUpEdit()
- Me.fPropertiesView = New DevExpress.XtraGrid.Views.Grid.GridView()
- CType(Me.fProperties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.fPropertiesView, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.SuspendLayout()
- '
- 'fProperties
- '
- Me.fProperties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
- Me.fProperties.Name = "fProperties"
- Me.fProperties.PopupView = Me.fPropertiesView
- '
- 'fPropertiesView
- '
- Me.fPropertiesView.FocusRectStyle = DevExpress.XtraGrid.Views.Grid.DrawFocusRectStyle.RowFocus
- Me.fPropertiesView.Name = "fPropertiesView"
- Me.fPropertiesView.OptionsSelection.EnableAppearanceFocusedCell = False
- Me.fPropertiesView.OptionsView.ShowGroupPanel = False
- CType(Me.fProperties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.fPropertiesView, System.ComponentModel.ISupportInitialize).EndInit()
- Me.ResumeLayout(False)
-
- End Sub
-End Class
-
-
-Public Class RepositoryItemLookupControl3
- Inherits RepositoryItemGridLookUpEdit
-
- Shared Sub New()
- RegisterLookupControl()
- End Sub
-
- Public Sub New()
- SetDropdownButtonEnabled(_MultiSelect)
-
- UpdateSelectedValues(New List(Of String))
- End Sub
-
- Private Const NAME_DATATABLE_INTERNAL = "__INTERNAL_DATATABLE__"
- Private Const TAG_DROPDOWN = "openDropdown"
- Private Const TAG_BUTTON_LOOKUP_FORM = "openLookupForm"
-
- Public Const CustomEditName As String = "LookupControl3"
-
- Private _R As Resources.ResourceManager = My.Resources.Strings.ResourceManager
- Private _SelectedValues As New List(Of String)
- Private _MultiSelect As Boolean = False
- Private _ReadOnly As Boolean = False
-
- Public Property AllowAddNewValues As Boolean
- Public Property PreventDuplicates As Boolean
-
- Public Delegate Sub SelectedValuesChangedHandler(sender As Object, SelectedValues As List(Of String))
- Public Event SelectedValuesChanged As SelectedValuesChangedHandler
-
- Public Overrides ReadOnly Property EditorTypeName As String
- Get
- Return CustomEditName
- End Get
- End Property
-
- Public Overloads Property [ReadOnly] As Boolean
- Get
- Return _ReadOnly
- End Get
- Set(value As Boolean)
- SetFormButtonEnabled(Not value)
- _ReadOnly = value
- End Set
- End Property
-
- Public Property MultiSelect As Boolean
- Get
- Return _MultiSelect
- End Get
- Set(value As Boolean)
- SetDropdownButtonEnabled(value)
- _MultiSelect = value
- End Set
- End Property
-
- Public Property SelectedValues As List(Of String)
- Get
- Return _SelectedValues
- End Get
- Set(value As List(Of String))
- UpdateSelectedValues(value)
- End Set
- End Property
-
- Public Shared Sub RegisterLookupControl()
- Dim img As Image = Nothing
- Dim oClassInfo = New EditorClassInfo(
- CustomEditName,
- GetType(LookupControl3),
- GetType(RepositoryItemLookupControl3),
- GetType(GridLookUpEditBaseViewInfo),
- New ButtonEditPainter(),
- True,
- img,
- GetType(ButtonEditAccessible)
- )
- EditorRegistrationInfo.Default.Editors.Add(oClassInfo)
-
-
- End Sub
-
- Private Sub SetFormButtonEnabled(pVisible As Boolean)
- Dim oButton As EditorButton = Buttons.
- Where(Function(b) b.Tag = TAG_BUTTON_LOOKUP_FORM).
- FirstOrDefault()
-
- If oButton IsNot Nothing Then
- oButton.Visible = pVisible
- End If
- End Sub
-
- Private Sub SetDropdownButtonEnabled(pVisible As Boolean)
- Dim oButton As EditorButton = Buttons.
- Where(Function(b) b.Tag = TAG_DROPDOWN).
- FirstOrDefault()
-
- If oButton IsNot Nothing Then
- oButton.Visible = pVisible
- ActionButtonIndex = oButton.Index
- End If
- End Sub
-
- '''
- ''' Prevents Editvalue changing when multiselect is true
- '''
- Private Sub HandleEditValueChanging(sender As Object, e As ChangingEventArgs)
- If MultiSelect Then
- e.Cancel = True
- End If
- End Sub
-
- Private Sub UpdateSelectedValues(Values As List(Of String))
- If Values Is Nothing Then
- Exit Sub
- End If
-
- Values.RemoveAll(Function(v) String.IsNullOrEmpty(v))
-
- If MultiSelect = True Then
- Select Case Values.Count
- Case 0
- NullText = String.Format(_R.GetString("LookupControl_NoRecords"))
- Case 1
- NullText = Values.FirstOrDefault()
- OwnerEdit.EditValue = Values.FirstOrDefault()
- Case Else
- NullText = String.Format(_R.GetString("LookupControl_NRecords"), Values.Count)
- End Select
- Else
- Select Case Values.Count
- Case 0
- NullText = String.Format(_R.GetString("LookupControl_NoRecords"))
- Case Else
- NullText = Values.FirstOrDefault()
- ' JJ at 07.05.2021
- ' Setting the EditValue Is crucial for making the Control work as a Cell Editor!!!
- OwnerEdit.EditValue = Values.FirstOrDefault()
- End Select
- End If
-
- ' If No external Datasource is supplied, create one containing the currently selected values
- ' If the current datasource is the internal one, update it
- If DataSource Is Nothing OrElse (TypeOf DataSource Is DataTable AndAlso DirectCast(DataSource, DataTable).TableName = NAME_DATATABLE_INTERNAL) Then
- Dim oDataTable As New DataTable() With {
- .TableName = NAME_DATATABLE_INTERNAL
- }
- oDataTable.Columns.Add(New DataColumn("Data", GetType(String)))
-
- For Each oValue In Values
- Dim oRow = oDataTable.NewRow()
- oRow.Item(0) = oValue
- oDataTable.Rows.Add(oRow)
- Next
-
- DataSource = oDataTable
- End If
-
- _SelectedValues = Values
-
- RaiseEvent SelectedValuesChanged(Me, Values)
- End Sub
-
- Protected Overrides Function ShouldSerializeNullText() As Boolean
- Return False
- End Function
-
- Public Overrides Sub CreateDefaultButton()
- Dim oButtons As New List(Of EditorButton) From {
- New EditorButton() With {
- .Kind = ButtonPredefines.Combo,
- .Tag = TAG_DROPDOWN,
- .Width = 25
- },
- New EditorButton() With {
- .Kind = ButtonPredefines.Search,
- .Tag = TAG_BUTTON_LOOKUP_FORM,
- .Width = 25
- }
- }
-
- Buttons.AddRange(oButtons.ToArray)
- End Sub
-
- Private Function GetLookupForm() As frmLookupGrid
- Dim oForm As New frmLookupGrid() With {
- .MultiSelect = MultiSelect,
- .AddNewValues = AllowAddNewValues,
- .PreventDuplicates = PreventDuplicates,
- .DataSource = DataSource,
- .SelectedValues = SelectedValues,
- .StartPosition = FormStartPosition.Manual
- }
- Dim oScreen = Screen.FromControl(oForm)
- oForm.Location = GetFormLocation(oForm.Height, oForm.Width, oScreen)
-
- Return oForm
- End Function
-
- Private Function GetFormLocation(pFormHeight As Integer, pFormWidth As Integer, pScreen As Screen) As Point
- ' This is the location on the same height like the Lookup Control
- Dim oDefaultLocation = OwnerEdit.PointToScreen(New Point(OwnerEdit.Width, 0))
- Dim oScreenheight = pScreen.Bounds.Height
-
- If oScreenheight < (oDefaultLocation.Y + pFormHeight) Then
- Return OwnerEdit.PointToScreen(New Point(OwnerEdit.Width, -pFormHeight + OwnerEdit.Height))
- End If
-
- Return oDefaultLocation
- End Function
-
- Protected Overrides Sub RaiseButtonClick(e As ButtonPressedEventArgs)
- MyBase.RaiseButtonClick(e)
-
- If e.Button.Tag = TAG_BUTTON_LOOKUP_FORM Then
- Using oForm = GetLookupForm()
- Dim oResult = oForm.ShowDialog()
-
- If oResult = Windows.Forms.DialogResult.OK Then
- Dim oValues = oForm.SelectedValues
- UpdateSelectedValues(oValues)
-
- If oForm.NewValues.Count > 0 AndAlso TypeOf DataSource Is DataTable Then
- Dim oTable As DataTable = DirectCast(DataSource, DataTable)
-
- If oTable.TableName <> NAME_DATATABLE_INTERNAL Then
- For Each oValue In oForm.NewValues
- Dim oRow = oTable.NewRow()
- oRow.Item(0) = oValue
- oTable.Rows.Add(oRow)
- Next
- End If
- End If
- End If
- End Using
- End If
- End Sub
-
- Public Overrides Sub Assign(item As RepositoryItem)
- BeginUpdate()
- Try
- MyBase.Assign(item)
- Dim source As RepositoryItemLookupControl3 = TryCast(item, RepositoryItemLookupControl3)
- If source Is Nothing Then
- Return
- End If
- Finally
- EndUpdate()
- End Try
- End Sub
-
- Private Shadows Sub Popup(sender As LookupControl3, e As EventArgs) Handles Me.BeforePopup
- Try
- Dim oView As ColumnView = sender.Properties.View
-
- If DataSource IsNot Nothing AndAlso DataSource.Columns.Count > 0 Then
- Dim oFirstColumn As String = DataSource.Columns.Item(0).ColumnName
- Dim oOperator = New DevExpress.Data.Filtering.InOperator(oFirstColumn, SelectedValues)
-
- View.ActiveFilterCriteria = oOperator
- View.OptionsView.ShowFilterPanelMode = ShowFilterPanelMode.Never
- End If
- Catch ex As Exception
- 'noop
- End Try
- End Sub
-
- Public Sub HandleQueryPopup(sender As Object, e As CancelEventArgs) Handles Me.QueryPopUp
- If MultiSelect = False Then
- e.Cancel = True
- End If
- End Sub
-
- Protected Overrides Sub RaiseQueryPopUp(e As CancelEventArgs)
- If MultiSelect = False Then
- e.Cancel = True
- End If
- End Sub
-End Class
diff --git a/Controls.LookupGrid/LookupGridLocalizer.vb b/Controls.LookupGrid/LookupGridLocalizer.vb
deleted file mode 100644
index 6d47d58c..00000000
--- a/Controls.LookupGrid/LookupGridLocalizer.vb
+++ /dev/null
@@ -1,24 +0,0 @@
-Imports DevExpress.XtraEditors.Controls
-
-Public Class LookupGridLocalizer
- Inherits EditResLocalizer
-
- Private Const LANG_DE = "de-DE"
-
- Public Overrides Function GetLocalizedString(id As StringId) As String
- Dim oResult As String
-
- Select Case id
- Case StringId.LookUpEditValueIsNull
- If Language = LANG_DE Then
- oResult = "[Kein Wert ausgewählt]"
- Else
- oResult = "[No Value selected]"
- End If
- Case Else
- oResult = MyBase.GetLocalizedString(id)
- End Select
-
- Return oResult
- End Function
-End Class
diff --git a/Controls.LookupGrid/My Project/AssemblyInfo.vb b/Controls.LookupGrid/My Project/AssemblyInfo.vb
deleted file mode 100644
index 84600904..00000000
--- a/Controls.LookupGrid/My Project/AssemblyInfo.vb
+++ /dev/null
@@ -1,35 +0,0 @@
-Imports System
-Imports System.Reflection
-Imports System.Runtime.InteropServices
-
-' Allgemeine Informationen über eine Assembly werden über die folgenden
-' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
-' die einer Assembly zugeordnet sind.
-
-' Werte der Assemblyattribute überprüfen
-
-
-
-
-
-
-
-
-
-
-'Die folgende GUID bestimmt die ID der Typbibliothek, wenn dieses Projekt für COM verfügbar gemacht wird.
-
-
-' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
-'
-' Hauptversion
-' Nebenversion
-' Buildnummer
-' Revision
-'
-' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
-' übernehmen, indem Sie "*" eingeben:
-'
-
-
-
diff --git a/Controls.LookupGrid/My Project/Resources.Designer.vb b/Controls.LookupGrid/My Project/Resources.Designer.vb
deleted file mode 100644
index b3e49c5d..00000000
--- a/Controls.LookupGrid/My Project/Resources.Designer.vb
+++ /dev/null
@@ -1,63 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-Imports System
-
-Namespace My.Resources
-
- 'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
- '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
- 'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
- 'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
- '''
- ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
- '''
- _
- Friend Module Resources
-
- Private resourceMan As Global.System.Resources.ResourceManager
-
- Private resourceCulture As Global.System.Globalization.CultureInfo
-
- '''
- ''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
- '''
- _
- Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
- Get
- If Object.ReferenceEquals(resourceMan, Nothing) Then
- Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DigitalData.Controls.LookupGrid.Resources", GetType(Resources).Assembly)
- resourceMan = temp
- End If
- Return resourceMan
- End Get
- End Property
-
- '''
- ''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
- ''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
- '''
- _
- Friend Property Culture() As Global.System.Globalization.CultureInfo
- Get
- Return resourceCulture
- End Get
- Set
- resourceCulture = value
- End Set
- End Property
- End Module
-End Namespace
diff --git a/Controls.LookupGrid/My Project/Settings.Designer.vb b/Controls.LookupGrid/My Project/Settings.Designer.vb
deleted file mode 100644
index b0fbc3f3..00000000
--- a/Controls.LookupGrid/My Project/Settings.Designer.vb
+++ /dev/null
@@ -1,73 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- _
- Partial Friend NotInheritable Class MySettings
- Inherits Global.System.Configuration.ApplicationSettingsBase
-
- Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
-
-#Region "Automatische My.Settings-Speicherfunktion"
-#If _MyType = "WindowsForms" Then
- Private Shared addedHandler As Boolean
-
- Private Shared addedHandlerLockObject As New Object
-
- _
- Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
- If My.Application.SaveMySettingsOnExit Then
- My.Settings.Save()
- End If
- End Sub
-#End If
-#End Region
-
- Public Shared ReadOnly Property [Default]() As MySettings
- Get
-
-#If _MyType = "WindowsForms" Then
- If Not addedHandler Then
- SyncLock addedHandlerLockObject
- If Not addedHandler Then
- AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
- addedHandler = True
- End If
- End SyncLock
- End If
-#End If
- Return defaultInstance
- End Get
- End Property
- End Class
-End Namespace
-
-Namespace My
-
- _
- Friend Module MySettingsProperty
-
- _
- Friend ReadOnly Property Settings() As Global.DigitalData.Controls.LookupGrid.My.MySettings
- Get
- Return Global.DigitalData.Controls.LookupGrid.My.MySettings.Default
- End Get
- End Property
- End Module
-End Namespace
diff --git a/Controls.LookupGrid/My Project/licenses.licx b/Controls.LookupGrid/My Project/licenses.licx
deleted file mode 100644
index e69de29b..00000000
diff --git a/Controls.LookupGrid/My Project/licenses.licx.bak b/Controls.LookupGrid/My Project/licenses.licx.bak
deleted file mode 100644
index 0321d5c5..00000000
--- a/Controls.LookupGrid/My Project/licenses.licx.bak
+++ /dev/null
@@ -1,3 +0,0 @@
-DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.Repository.RepositoryItemGridLookUpEdit, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.GridLookUpEdit, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
diff --git a/Controls.LookupGrid/Resources/Strings.Designer.vb b/Controls.LookupGrid/Resources/Strings.Designer.vb
deleted file mode 100644
index 836aa51a..00000000
--- a/Controls.LookupGrid/Resources/Strings.Designer.vb
+++ /dev/null
@@ -1,103 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-Imports System
-
-Namespace My.Resources
-
- 'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
- '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
- 'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
- 'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
- '''
- ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
- '''
- _
- Friend Class Strings
-
- Private Shared resourceMan As Global.System.Resources.ResourceManager
-
- Private Shared resourceCulture As Global.System.Globalization.CultureInfo
-
- _
- Friend Sub New()
- MyBase.New
- End Sub
-
- '''
- ''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
- '''
- _
- Friend Shared ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
- Get
- If Object.ReferenceEquals(resourceMan, Nothing) Then
- Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DigitalData.Controls.LookupGrid.Strings", GetType(Strings).Assembly)
- resourceMan = temp
- End If
- Return resourceMan
- End Get
- End Property
-
- '''
- ''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
- ''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
- '''
- _
- Friend Shared Property Culture() As Global.System.Globalization.CultureInfo
- Get
- Return resourceCulture
- End Get
- Set
- resourceCulture = value
- End Set
- End Property
-
- '''
- ''' Sucht eine lokalisierte Zeichenfolge, die Keine Datensätze ausgewählt ähnelt.
- '''
- Friend Shared ReadOnly Property LookupControl_NoRecords() As String
- Get
- Return ResourceManager.GetString("LookupControl_NoRecords", resourceCulture)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Zeichenfolge, die {0} Datensätze ausgewählt ähnelt.
- '''
- Friend Shared ReadOnly Property LookupControl_NRecords() As String
- Get
- Return ResourceManager.GetString("LookupControl_NRecords", resourceCulture)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Zeichenfolge, die Bitte wählen Sie einen Wert aus: ähnelt.
- '''
- Friend Shared ReadOnly Property PopupForm_Text() As String
- Get
- Return ResourceManager.GetString("PopupForm_Text", resourceCulture)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Zeichenfolge, die Bitte wählen Sie einen oder mehrere Werte aus: ähnelt.
- '''
- Friend Shared ReadOnly Property PopupForm_TextMultiselect() As String
- Get
- Return ResourceManager.GetString("PopupForm_TextMultiselect", resourceCulture)
- End Get
- End Property
- End Class
-End Namespace
diff --git a/Controls.LookupGrid/Resources/Strings.en.Designer.vb b/Controls.LookupGrid/Resources/Strings.en.Designer.vb
deleted file mode 100644
index e69de29b..00000000
diff --git a/Controls.LookupGrid/Resources/Strings.en.resx b/Controls.LookupGrid/Resources/Strings.en.resx
deleted file mode 100644
index 4de38075..00000000
--- a/Controls.LookupGrid/Resources/Strings.en.resx
+++ /dev/null
@@ -1,132 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- No records selected
-
-
- {0} records selected
-
-
- Please choose a value:
-
-
- Please choose one or more values:
-
-
\ No newline at end of file
diff --git a/Controls.LookupGrid/Resources/Strings.resx b/Controls.LookupGrid/Resources/Strings.resx
deleted file mode 100644
index 6915b57d..00000000
--- a/Controls.LookupGrid/Resources/Strings.resx
+++ /dev/null
@@ -1,132 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- Keine Datensätze ausgewählt
-
-
- {0} Datensätze ausgewählt
-
-
- Bitte wählen Sie einen Wert aus:
-
-
- Bitte wählen Sie einen oder mehrere Werte aus:
-
-
\ No newline at end of file
diff --git a/Controls.LookupGrid/frmLookupGrid.Designer.vb b/Controls.LookupGrid/frmLookupGrid.Designer.vb
deleted file mode 100644
index 848e2eb9..00000000
--- a/Controls.LookupGrid/frmLookupGrid.Designer.vb
+++ /dev/null
@@ -1,90 +0,0 @@
- _
-Partial Class frmLookupGrid
- Inherits DevExpress.XtraEditors.XtraForm
-
- 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
- _
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- Try
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- Finally
- MyBase.Dispose(disposing)
- End Try
- End Sub
-
- 'Wird vom Windows Form-Designer benötigt.
- Private components As System.ComponentModel.IContainer
-
- 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
- 'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
- 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
- _
- Private Sub InitializeComponent()
- Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmLookupGrid))
- Me.gridLookup = New DevExpress.XtraGrid.GridControl()
- Me.viewLookup = New DevExpress.XtraGrid.Views.Grid.GridView()
- Me.Panel1 = New System.Windows.Forms.Panel()
- Me.btnOK = New System.Windows.Forms.Button()
- Me.btnClear = New System.Windows.Forms.Button()
- CType(Me.gridLookup, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.viewLookup, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.Panel1.SuspendLayout()
- Me.SuspendLayout()
- '
- 'gridLookup
- '
- resources.ApplyResources(Me.gridLookup, "gridLookup")
- Me.gridLookup.MainView = Me.viewLookup
- Me.gridLookup.Name = "gridLookup"
- Me.gridLookup.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.viewLookup})
- '
- 'viewLookup
- '
- Me.viewLookup.GridControl = Me.gridLookup
- Me.viewLookup.Name = "viewLookup"
- Me.viewLookup.OptionsView.ShowGroupPanel = False
- '
- 'Panel1
- '
- Me.Panel1.Controls.Add(Me.btnOK)
- Me.Panel1.Controls.Add(Me.btnClear)
- resources.ApplyResources(Me.Panel1, "Panel1")
- Me.Panel1.Name = "Panel1"
- '
- 'btnOK
- '
- resources.ApplyResources(Me.btnOK, "btnOK")
- Me.btnOK.Name = "btnOK"
- Me.btnOK.UseVisualStyleBackColor = True
- '
- 'btnClear
- '
- resources.ApplyResources(Me.btnClear, "btnClear")
- Me.btnClear.DialogResult = System.Windows.Forms.DialogResult.OK
- Me.btnClear.Name = "btnClear"
- Me.btnClear.UseVisualStyleBackColor = True
- '
- 'frmLookupGrid
- '
- resources.ApplyResources(Me, "$this")
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.Controls.Add(Me.gridLookup)
- Me.Controls.Add(Me.Panel1)
- Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.SizableToolWindow
- Me.Name = "frmLookupGrid"
- Me.TopMost = True
- CType(Me.gridLookup, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.viewLookup, System.ComponentModel.ISupportInitialize).EndInit()
- Me.Panel1.ResumeLayout(False)
- Me.ResumeLayout(False)
-
- End Sub
-
- Friend WithEvents gridLookup As DevExpress.XtraGrid.GridControl
- Friend WithEvents viewLookup As DevExpress.XtraGrid.Views.Grid.GridView
- Friend WithEvents Panel1 As Windows.Forms.Panel
- Friend WithEvents btnOK As Windows.Forms.Button
- Friend WithEvents btnClear As Windows.Forms.Button
-End Class
diff --git a/Controls.LookupGrid/frmLookupGrid.en.resx b/Controls.LookupGrid/frmLookupGrid.en.resx
deleted file mode 100644
index 2b9b7341..00000000
--- a/Controls.LookupGrid/frmLookupGrid.en.resx
+++ /dev/null
@@ -1,130 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- Clear
-
-
-
- 390, 293
-
-
- Choose a value:
-
-
\ No newline at end of file
diff --git a/Controls.LookupGrid/frmLookupGrid.resx b/Controls.LookupGrid/frmLookupGrid.resx
deleted file mode 100644
index a004d17c..00000000
--- a/Controls.LookupGrid/frmLookupGrid.resx
+++ /dev/null
@@ -1,249 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
- Fill
-
-
-
- 0, 0
-
-
- 388, 221
-
-
-
- 0
-
-
- gridLookup
-
-
- DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- $this
-
-
- 0
-
-
- 12, 6
-
-
- 117, 23
-
-
- 0
-
-
- OK (F2)
-
-
- btnOK
-
-
- System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- Panel1
-
-
- 0
-
-
- Top, Right
-
-
- 240, 6
-
-
- 136, 23
-
-
- 0
-
-
- Leeren
-
-
- btnClear
-
-
- System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- Panel1
-
-
- 1
-
-
- Bottom
-
-
- 0, 221
-
-
- 388, 40
-
-
- 1
-
-
- Panel1
-
-
- System.Windows.Forms.Panel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- $this
-
-
- 1
-
-
- True
-
-
- 6, 13
-
-
- 388, 261
-
-
- 390, 293
-
-
- Wählen Sie einen Wert:
-
-
- viewLookup
-
-
- DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- frmLookupGrid
-
-
- DevExpress.XtraEditors.XtraForm, DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
\ No newline at end of file
diff --git a/Controls.LookupGrid/frmLookupGrid.resx.bak b/Controls.LookupGrid/frmLookupGrid.resx.bak
deleted file mode 100644
index 3da5f00a..00000000
--- a/Controls.LookupGrid/frmLookupGrid.resx.bak
+++ /dev/null
@@ -1,291 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- OK (F2)
-
-
- Panel1
-
-
-
- 0, 0
-
-
- 0
-
-
- DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- 0, 0
-
-
-
- 0
-
-
- gridLookup
-
-
- 1
-
-
- $this
-
-
- DevExpress.XtraEditors.XtraForm, DevExpress.Utils.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- Panel1
-
-
- frmLookupGrid
-
-
-
- Bottom
-
-
- 0
-
-
- Leeren
-
-
- 400, 300
-
-
- 1
-
-
-
- None
-
-
-
- Center
-
-
- 388, 261
-
-
-
-
-
- $this
-
-
- 0
-
-
- 117, 23
-
-
- DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- 240, 6
-
-
- System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- 0
-
-
- Fill
-
-
- 136, 23
-
-
- viewLookup
-
-
- Tile
-
-
- btnClear
-
-
-
-
-
- Top, Left
-
-
- Wählen Sie einen oder mehrere Werte:
-
-
- Inherit
-
-
- Top, Right
-
-
-
- Default
-
-
- 388, 40
-
-
- 388, 221
-
-
- 0, 221
-
-
- Panel1
-
-
- btnOK
-
-
- System.Windows.Forms.Panel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
-
-
-
-
-
-
-
-
- 6, 13
-
-
- 12, 6
-
-
- Wählen Sie einen Wert:
-
-
- 1
-
-
- True
-
-
\ No newline at end of file
diff --git a/Controls.LookupGrid/frmLookupGrid.vb b/Controls.LookupGrid/frmLookupGrid.vb
deleted file mode 100644
index e0c43932..00000000
--- a/Controls.LookupGrid/frmLookupGrid.vb
+++ /dev/null
@@ -1,285 +0,0 @@
-Imports System.Windows.Forms
-Imports DevExpress.XtraGrid
-Imports DevExpress.XtraGrid.Columns
-Imports DevExpress.XtraGrid.Views.Base
-Imports DevExpress.XtraGrid.Views.Grid
-
-Public Class frmLookupGrid
- Public Property MultiSelect As Boolean
- Public Property AddNewValues As Boolean
- Public Property PreventDuplicates As Boolean
- Public Property DataSource As DataTable
- Public Property SelectedValues As List(Of String)
- Public Property NewValues As New HashSet(Of String)
-
- Public Const COLUMN_SELECTED = "SELECTED"
- Public Const COLUMN_VALUE = "VALUE"
- Public Const TABLE_TEMP = "TEMP"
-
- Private _DataColumn As Integer
- Private _DataSourceTemp As DataTable
- Private _View As GridView
- Private _Grid As GridControl
- Private ReadOnly _R As Resources.ResourceManager = My.Resources.Strings.ResourceManager
-
-#Region "Form Events"
- Private Sub frmLookupGrid_Load(sender As Object, e As EventArgs) Handles Me.Load
- _View = viewLookup
- _Grid = gridLookup
-
- ' Original Datasource soll nicht verändert werden
- If DataSource Is Nothing Then
- _DataSourceTemp = New DataTable(TABLE_TEMP)
- _DataSourceTemp.Columns.Add(New DataColumn(COLUMN_VALUE))
- Else
- _DataSourceTemp = DataSource.Copy()
- End If
-
- If MultiSelect Then
- If Not _DataSourceTemp.Columns.Contains(COLUMN_SELECTED) Then
- Dim oSelectedColumn = New DataColumn() With {
- .ColumnName = COLUMN_SELECTED,
- .DataType = GetType(Boolean),
- .DefaultValue = False
- }
- _DataSourceTemp.Columns.Add(oSelectedColumn)
- oSelectedColumn.SetOrdinal(0)
- End If
- End If
-
- ' Datasource setzen
- _Grid.DataSource = _DataSourceTemp
-
- ' Anzeige Eigeschaften setzen
- _View.OptionsFind.Condition = DevExpress.Data.Filtering.FilterCondition.Contains
- _View.OptionsFind.AlwaysVisible = True
- _View.OptionsSelection.MultiSelect = False
-
- If MultiSelect Then
- ' Selected Spalte anpassen
- Dim oCheckboxColumn = _View.Columns.Item(0)
- 'oCheckboxColumn.Visible = False
- oCheckboxColumn.Caption = " "
- oCheckboxColumn.MaxWidth = 30
- oCheckboxColumn.MinWidth = 30
- oCheckboxColumn.OptionsColumn.AllowFocus = False
-
-
- Text = _R.GetString("PopupForm_TextMultiselect")
- _DataColumn = 1
- Else
- Text = _R.GetString("PopupForm_Text")
- _DataColumn = 0
- End If
-
- If AddNewValues Then
- _View.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.True
- _View.OptionsView.NewItemRowPosition = NewItemRowPosition.Top
- Else
- _View.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.False
- _View.OptionsView.NewItemRowPosition = NewItemRowPosition.None
- End If
-
- If SelectedValues Is Nothing Then
- SelectedValues = New List(Of String)
- Else
- SelectedValues = SelectedValues.Where(Function(v) Not (IsDBNull(v) OrElse String.IsNullOrWhiteSpace(v))).ToList()
- End If
-
- ' Bereits ausgewählte Werte im grid auswählen
- SyncItemsWithView(_View)
-
- ' Focus auf Find panel setzen
- _View.ShowFindPanel()
-
- ' Spaltenbreite anpassen
- _View.BestFitColumns()
-
- ' Datenspalte zusätzlich in der Breite anpassen
- Dim oDataColumn As GridColumn = _View.Columns.Item(_DataColumn)
- oDataColumn.BestFit()
- End Sub
- Private Sub frmLookupGrid_Shown(sender As Object, e As EventArgs) Handles Me.Shown
- BringToFront()
- End Sub
-#End Region
-#Region "Button Events"
- Private Sub btnOK_Click(sender As Object, e As EventArgs) Handles btnOK.Click
- SaveSelectedValues()
-
- DialogResult = DialogResult.OK
- Close()
- End Sub
-
- Private Sub btnClear_Click(sender As Object, e As EventArgs) Handles btnClear.Click
- SelectedValues = New List(Of String)
-
- DialogResult = DialogResult.OK
- Close()
- End Sub
-#End Region
-#Region "Grid Events"
- Private Sub gridLookup_KeyUp(sender As Object, e As KeyEventArgs) Handles gridLookup.KeyUp
- HandleCustomKeys(e)
- End Sub
-
- Private Sub gridLookup_EditorKeyUp(sender As Object, e As KeyEventArgs) Handles gridLookup.EditorKeyUp
- HandleCustomKeys(e)
- End Sub
-
- Private Sub HandleCustomKeys(e As KeyEventArgs)
- If e.KeyCode = Keys.Escape Then
- Close()
-
- ElseIf e.KeyCode = Keys.F2 Then
- ' Make sure the currently focused row's state is saved
- viewLookup.PostEditor()
- SaveSelectedValues()
-
- DialogResult = DialogResult.OK
- Close()
- End If
- End Sub
-#End Region
-#Region "View Events"
- Private Sub viewLookup_ShowingEditor(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles viewLookup.ShowingEditor
- Dim rowHandleIsNewItemRow = (_View.FocusedRowHandle = GridControl.NewItemRowHandle)
- Dim columnIsCheckboxColumn = (_View.FocusedColumn.FieldName = COLUMN_SELECTED)
-
- ' Prevent editing of Data Column/allow editing for Checkbox Column and NewValue Row
- If rowHandleIsNewItemRow Or columnIsCheckboxColumn Then
- e.Cancel = False
- Else
- e.Cancel = True
- End If
- End Sub
-
- Private Sub viewLookup_RowClick(sender As Object, e As RowClickEventArgs) Handles viewLookup.RowClick
- ' If user double-clicks on a row
- If e.Clicks = 2 And e.Button = MouseButtons.Left Then
- ' And clicked row is a normal row
- If e.RowHandle >= 0 Then
- ' If multiselect is true, check the current row
- ' If multiselect is false, select the current row and close the window
- If MultiSelect = True Then
- Dim row As DataRow = _View.GetDataRow(e.RowHandle)
- row.Item(0) = Not CBool(row.Item(0))
- Else
- Dim row As DataRow = _View.GetDataRow(e.RowHandle)
- Dim value = row.Item(0)
-
- SelectedValues = New List(Of String) From {value}
-
- DialogResult = DialogResult.OK
- Close()
- End If
- End If
- End If
- End Sub
-
- Private Sub viewLookup_ValidateRow(sender As Object, e As ValidateRowEventArgs) Handles viewLookup.ValidateRow
- If e.RowHandle = GridControl.NewItemRowHandle Then
- Dim oRowView As DataRowView = viewLookup.GetRow(e.RowHandle)
- Dim oValue = GetValueFromRow(oRowView.Row)
- NewValues.Add(oValue)
-
- ' Automatically select newly added row when MultiSelect is enabled
- If MultiSelect Then
- oRowView.Row.Item(COLUMN_SELECTED) = True
- End If
- End If
- End Sub
-
- Private Sub viewLookup_RowCellClick(sender As Object, e As RowCellClickEventArgs) Handles viewLookup.RowCellClick
- If e.RowHandle = GridControl.InvalidRowHandle Or e.RowHandle = GridControl.NewItemRowHandle Then
- e.Handled = False
- Exit Sub
- End If
-
- ' When AllowFocus is used on the SELECTED Column, the checkbox can only be selected with a double click
- ' This function manually checks/unchecks the clicked cell
- If MultiSelect AndAlso e.Column.FieldName = COLUMN_SELECTED Then
- Dim row As DataRow = _View.GetDataRow(e.RowHandle)
- row.Item(0) = Not CBool(row.Item(0))
- End If
- End Sub
- Private Sub viewLookup_FocusedRowChanged(sender As Object, e As FocusedRowChangedEventArgs) Handles viewLookup.FocusedRowChanged
- ' Removed because it leads to some weird behaviour where you a locked in the new row forever
- 'If AddNewValues AndAlso e.PrevFocusedRowHandle = GridControl.NewItemRowHandle Then
- ' BeginInvoke(Sub() viewLookup.FocusedRowHandle = GridControl.NewItemRowHandle)
- 'End If
- End Sub
-#End Region
-
- Private Sub SaveSelectedValues()
- ' Filter vor dem Auslesen entfernen, damit alle Werte erfasst werden
- _View.FindFilterText = String.Empty
-
- If MultiSelect Then
- Dim oValues As New List(Of String)
-
- For oIndex = 0 To viewLookup.DataRowCount - 1
- Dim oRow As DataRow = _View.GetDataRow(oIndex)
- Dim oSelected As Boolean = oRow.Item(0)
- Dim oValue As Object = GetValueFromRow(oRow)
-
- If oSelected Then
- oValues.Add(oValue)
- End If
- Next
-
- ' Doppelte Werte entfernen, wenn konfiguriert
- If PreventDuplicates Then
- oValues = oValues.Distinct().ToList()
- End If
-
- SelectedValues = oValues
- Else
- Dim oRowHandle As Integer = _View.GetSelectedRows().ToList().FirstOrDefault()
- Dim oRow As DataRow = _View.GetDataRow(oRowHandle)
- Dim oValues As New List(Of String)
-
- If oRow IsNot Nothing Then
- Dim oValue = GetValueFromRow(oRow)
- oValues.Add(oValue)
- End If
-
- SelectedValues = oValues
- End If
- End Sub
-
- Private Function GetValueFromRow(pRow As DataRow) As String
- ' Converting to string explicitly to prevent DBNull crashing the function
- If MultiSelect Then
- Return pRow.Item(1).ToString()
- Else
- Return pRow.Item(0).ToString()
- End If
- End Function
-
- Private Sub SyncItemsWithView(view As GridView)
- ' Wenn Vorbelegungen existieren, werden diese angehakt
- If SelectedValues.Count > 0 Then
- For i = 0 To view.DataRowCount - 1
- Dim rowHandle = view.GetRowHandle(i)
- Dim rowView As DataRowView = view.GetRow(rowHandle)
-
- If rowView IsNot Nothing Then
- Dim row As DataRow = rowView.Row
- Dim value = row.Item(_DataColumn)
-
- If Not (IsDBNull(value) OrElse String.IsNullOrWhiteSpace(value)) Then
- If SelectedValues.Contains(value) Then
- If MultiSelect Then
- row.Item(0) = True
- Else
- view.SelectRow(rowHandle)
- End If
- End If
- End If
- End If
- Next
- End If
- End Sub
-
-End Class
\ No newline at end of file
diff --git a/Controls.RegexEditor/App.config b/Controls.RegexEditor/App.config
deleted file mode 100644
index 5534e287..00000000
--- a/Controls.RegexEditor/App.config
+++ /dev/null
@@ -1,6 +0,0 @@
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Controls.RegexEditor/My Project/Application.myapp b/Controls.RegexEditor/My Project/Application.myapp
deleted file mode 100644
index 1243847f..00000000
--- a/Controls.RegexEditor/My Project/Application.myapp
+++ /dev/null
@@ -1,11 +0,0 @@
-
-
- true
- Form1
- false
- 0
- true
- 0
- 0
- true
-
diff --git a/Controls.RegexEditor/My Project/AssemblyInfo.vb b/Controls.RegexEditor/My Project/AssemblyInfo.vb
deleted file mode 100644
index e26b97d7..00000000
--- a/Controls.RegexEditor/My Project/AssemblyInfo.vb
+++ /dev/null
@@ -1,35 +0,0 @@
-Imports System
-Imports System.Reflection
-Imports System.Runtime.InteropServices
-
-' Allgemeine Informationen über eine Assembly werden über die folgenden
-' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
-' die einer Assembly zugeordnet sind.
-
-' Werte der Assemblyattribute überprüfen
-
-
-
-
-
-
-
-
-
-
-'Die folgende GUID bestimmt die ID der Typbibliothek, wenn dieses Projekt für COM verfügbar gemacht wird.
-
-
-' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
-'
-' Hauptversion
-' Nebenversion
-' Buildnummer
-' Revision
-'
-' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
-' übernehmen, indem Sie "*" eingeben:
-'
-
-
-
diff --git a/Controls.RegexEditor/My Project/Resources.Designer.vb b/Controls.RegexEditor/My Project/Resources.Designer.vb
deleted file mode 100644
index 3229c33d..00000000
--- a/Controls.RegexEditor/My Project/Resources.Designer.vb
+++ /dev/null
@@ -1,123 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-Imports System
-
-Namespace My.Resources
-
- 'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
- '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
- 'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
- 'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
- '''
- ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
- '''
- _
- Friend Module Resources
-
- Private resourceMan As Global.System.Resources.ResourceManager
-
- Private resourceCulture As Global.System.Globalization.CultureInfo
-
- '''
- ''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
- '''
- _
- Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
- Get
- If Object.ReferenceEquals(resourceMan, Nothing) Then
- Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DigitalData.Controls.RegexEditor.Resources", GetType(Resources).Assembly)
- resourceMan = temp
- End If
- Return resourceMan
- End Get
- End Property
-
- '''
- ''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
- ''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
- '''
- _
- Friend Property Culture() As Global.System.Globalization.CultureInfo
- Get
- Return resourceCulture
- End Get
- Set
- resourceCulture = value
- End Set
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property about() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("about", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property actions_check() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("actions_check", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property actions_check1() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("actions_check1", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property definednameuseinformula() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("definednameuseinformula", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property definednameuseinformula1() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("definednameuseinformula1", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property definednameuseinformula2() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("definednameuseinformula2", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
- End Module
-End Namespace
diff --git a/Controls.RegexEditor/My Project/Resources.resx b/Controls.RegexEditor/My Project/Resources.resx
deleted file mode 100644
index 0f86f5b4..00000000
--- a/Controls.RegexEditor/My Project/Resources.resx
+++ /dev/null
@@ -1,139 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
- ..\Resources\definednameuseinformula.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\definednameuseinformula1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\actions_check.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\actions_check1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\definednameuseinformula2.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\about.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
\ No newline at end of file
diff --git a/Controls.RegexEditor/My Project/Resources.resx.bak b/Controls.RegexEditor/My Project/Resources.resx.bak
deleted file mode 100644
index 9f345215..00000000
--- a/Controls.RegexEditor/My Project/Resources.resx.bak
+++ /dev/null
@@ -1,139 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
- ..\Resources\definednameuseinformula.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\definednameuseinformula1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\actions_check.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\actions_check1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\definednameuseinformula2.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\about.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
\ No newline at end of file
diff --git a/Controls.RegexEditor/My Project/Settings.Designer.vb b/Controls.RegexEditor/My Project/Settings.Designer.vb
deleted file mode 100644
index 97fa07cf..00000000
--- a/Controls.RegexEditor/My Project/Settings.Designer.vb
+++ /dev/null
@@ -1,73 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- _
- Partial Friend NotInheritable Class MySettings
- Inherits Global.System.Configuration.ApplicationSettingsBase
-
- Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
-
-#Region "Automatische My.Settings-Speicherfunktion"
-#If _MyType = "WindowsForms" Then
- Private Shared addedHandler As Boolean
-
- Private Shared addedHandlerLockObject As New Object
-
- _
- Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
- If My.Application.SaveMySettingsOnExit Then
- My.Settings.Save()
- End If
- End Sub
-#End If
-#End Region
-
- Public Shared ReadOnly Property [Default]() As MySettings
- Get
-
-#If _MyType = "WindowsForms" Then
- If Not addedHandler Then
- SyncLock addedHandlerLockObject
- If Not addedHandler Then
- AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
- addedHandler = True
- End If
- End SyncLock
- End If
-#End If
- Return defaultInstance
- End Get
- End Property
- End Class
-End Namespace
-
-Namespace My
-
- _
- Friend Module MySettingsProperty
-
- _
- Friend ReadOnly Property Settings() As Global.DigitalData.Controls.RegexEditor.My.MySettings
- Get
- Return Global.DigitalData.Controls.RegexEditor.My.MySettings.Default
- End Get
- End Property
- End Module
-End Namespace
diff --git a/Controls.RegexEditor/My Project/licenses.licx b/Controls.RegexEditor/My Project/licenses.licx
deleted file mode 100644
index e69de29b..00000000
diff --git a/Controls.RegexEditor/My Project/licenses.licx.bak b/Controls.RegexEditor/My Project/licenses.licx.bak
deleted file mode 100644
index 773d16c2..00000000
--- a/Controls.RegexEditor/My Project/licenses.licx.bak
+++ /dev/null
@@ -1 +0,0 @@
-DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
diff --git a/Controls.RegexEditor/RegexEditor.vb b/Controls.RegexEditor/RegexEditor.vb
deleted file mode 100644
index e6ffbbaf..00000000
--- a/Controls.RegexEditor/RegexEditor.vb
+++ /dev/null
@@ -1,27 +0,0 @@
-Imports System.ComponentModel
-Imports System.Drawing.Design
-Imports System.Windows.Forms.Design
-Imports DigitalData.Modules.Language
-
-Public Class RegexEditor
- Inherits UITypeEditor
-
- Public Overrides Function GetEditStyle(context As ITypeDescriptorContext) As UITypeEditorEditStyle
- Return UITypeEditorEditStyle.Modal
- End Function
-
- Public Overrides Function EditValue(context As ITypeDescriptorContext, provider As IServiceProvider, value As Object) As Object
- Dim oService As IWindowsFormsEditorService = TryCast(provider.GetService(GetType(IWindowsFormsEditorService)), IWindowsFormsEditorService)
- Dim oRegexString As String = Utils.NotNull(value, String.Empty)
-
- If oService IsNot Nothing Then
- Using oform As New frmRegexEditor(oRegexString)
- If oService.ShowDialog(oform) = DialogResult.OK Then
- value = oform.RegexString
- End If
- End Using
- End If
-
- Return value
- End Function
-End Class
diff --git a/Controls.RegexEditor/RegexEditor.vbproj b/Controls.RegexEditor/RegexEditor.vbproj
deleted file mode 100644
index 518478d0..00000000
--- a/Controls.RegexEditor/RegexEditor.vbproj
+++ /dev/null
@@ -1,166 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {BCC6942F-CD4B-4B67-8200-1C0D002E7CC2}
- Library
-
-
- DigitalData.Controls.RegexEditor
- DigitalData.Controls.RegexEditor
- 512
- Windows
- v4.6.1
- true
-
-
- AnyCPU
- true
- full
- true
- true
- bin\Debug\
- DigitalData.Controls.RegexEditor.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- AnyCPU
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.Controls.RegexEditor.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
-
-
-
-
-
- False
-
-
-
- False
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- True
- Application.myapp
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
- frmRegexEditor.vb
-
-
- Form
-
-
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
- frmRegexEditor.vb
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
- {d3c8cfed-d6f6-43a8-9bdf-454145d0352f}
- Language
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Controls.RegexEditor/RegexEditor.vbproj.bak b/Controls.RegexEditor/RegexEditor.vbproj.bak
deleted file mode 100644
index bfcd372a..00000000
--- a/Controls.RegexEditor/RegexEditor.vbproj.bak
+++ /dev/null
@@ -1,165 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {BCC6942F-CD4B-4B67-8200-1C0D002E7CC2}
- Library
-
-
- DigitalData.Controls.RegexEditor
- DigitalData.Controls.RegexEditor
- 512
- Windows
- v4.6.1
- true
-
-
- AnyCPU
- true
- full
- true
- true
- bin\Debug\
- DigitalData.Controls.RegexEditor.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- AnyCPU
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.Controls.RegexEditor.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
-
-
-
-
- False
- D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraEditors.v19.2.dll
-
-
- False
- D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraLayout.v19.2.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- True
- Application.myapp
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
- frmRegexEditor.vb
-
-
- Form
-
-
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
- frmRegexEditor.vb
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
- {d3c8cfed-d6f6-43a8-9bdf-454145d0352f}
- Language
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Controls.RegexEditor/Resources/about.svg b/Controls.RegexEditor/Resources/about.svg
deleted file mode 100644
index 1f67213d..00000000
--- a/Controls.RegexEditor/Resources/about.svg
+++ /dev/null
@@ -1,19 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.RegexEditor/Resources/actions_check.svg b/Controls.RegexEditor/Resources/actions_check.svg
deleted file mode 100644
index 35c68028..00000000
--- a/Controls.RegexEditor/Resources/actions_check.svg
+++ /dev/null
@@ -1,15 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.RegexEditor/Resources/actions_check1.svg b/Controls.RegexEditor/Resources/actions_check1.svg
deleted file mode 100644
index 35c68028..00000000
--- a/Controls.RegexEditor/Resources/actions_check1.svg
+++ /dev/null
@@ -1,15 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.RegexEditor/Resources/definednameuseinformula.svg b/Controls.RegexEditor/Resources/definednameuseinformula.svg
deleted file mode 100644
index 0d27a20b..00000000
--- a/Controls.RegexEditor/Resources/definednameuseinformula.svg
+++ /dev/null
@@ -1,9 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.RegexEditor/Resources/definednameuseinformula1.svg b/Controls.RegexEditor/Resources/definednameuseinformula1.svg
deleted file mode 100644
index 0d27a20b..00000000
--- a/Controls.RegexEditor/Resources/definednameuseinformula1.svg
+++ /dev/null
@@ -1,9 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.RegexEditor/Resources/definednameuseinformula2.svg b/Controls.RegexEditor/Resources/definednameuseinformula2.svg
deleted file mode 100644
index 0d27a20b..00000000
--- a/Controls.RegexEditor/Resources/definednameuseinformula2.svg
+++ /dev/null
@@ -1,9 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.RegexEditor/frmRegexEditor.Designer.vb b/Controls.RegexEditor/frmRegexEditor.Designer.vb
deleted file mode 100644
index a6d6ac0a..00000000
--- a/Controls.RegexEditor/frmRegexEditor.Designer.vb
+++ /dev/null
@@ -1,194 +0,0 @@
- _
-Partial Class frmRegexEditor
- Inherits DevExpress.XtraBars.Ribbon.RibbonForm
-
- 'Form overrides dispose to clean up the component list.
- _
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- MyBase.Dispose(disposing)
- End Sub
-
- 'Required by the Windows Form Designer
- Private components As System.ComponentModel.IContainer
-
- 'NOTE: The following procedure is required by the Windows Form Designer
- 'It can be modified using the Windows Form Designer.
- 'Do not modify it using the code editor.
- _
- Private Sub InitializeComponent()
- Me.Label2 = New System.Windows.Forms.Label()
- Me.txtTest = New System.Windows.Forms.TextBox()
- Me.Label4 = New System.Windows.Forms.Label()
- Me.Label1 = New System.Windows.Forms.Label()
- Me.txtRegex = New System.Windows.Forms.TextBox()
- Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
- Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
- Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
- Me.BarStaticItem1 = New DevExpress.XtraBars.BarStaticItem()
- Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
- Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
- Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
- Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
- Me.labelResult = New DevExpress.XtraBars.BarStaticItem()
- CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.SuspendLayout()
- '
- 'Label2
- '
- Me.Label2.AutoSize = True
- Me.Label2.Location = New System.Drawing.Point(12, 151)
- Me.Label2.Name = "Label2"
- Me.Label2.Size = New System.Drawing.Size(64, 13)
- Me.Label2.TabIndex = 19
- Me.Label2.Text = "Test String:"
- '
- 'txtTest
- '
- Me.txtTest.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
- Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
- Me.txtTest.Font = New System.Drawing.Font("Consolas", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.txtTest.Location = New System.Drawing.Point(12, 167)
- Me.txtTest.Multiline = True
- Me.txtTest.Name = "txtTest"
- Me.txtTest.Size = New System.Drawing.Size(487, 136)
- Me.txtTest.TabIndex = 18
- '
- 'Label4
- '
- Me.Label4.Location = New System.Drawing.Point(12, 110)
- Me.Label4.Name = "Label4"
- Me.Label4.Size = New System.Drawing.Size(419, 33)
- Me.Label4.TabIndex = 17
- Me.Label4.Text = "Wenn die Eingabe insgesamt validiert werden soll, muss der Regex in ^ und $ einge" &
- "schlossen sein"
- '
- 'Label1
- '
- Me.Label1.AutoSize = True
- Me.Label1.Location = New System.Drawing.Point(12, 69)
- Me.Label1.Name = "Label1"
- Me.Label1.Size = New System.Drawing.Size(108, 13)
- Me.Label1.TabIndex = 16
- Me.Label1.Text = "Regular Expression:"
- '
- 'txtRegex
- '
- Me.txtRegex.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
- Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
- Me.txtRegex.Font = New System.Drawing.Font("Consolas", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.txtRegex.Location = New System.Drawing.Point(12, 85)
- Me.txtRegex.Name = "txtRegex"
- Me.txtRegex.Size = New System.Drawing.Size(487, 22)
- Me.txtRegex.TabIndex = 15
- '
- 'RibbonControl1
- '
- Me.RibbonControl1.CommandLayout = DevExpress.XtraBars.Ribbon.CommandLayout.Simplified
- Me.RibbonControl1.ExpandCollapseItem.Id = 0
- Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarStaticItem1, Me.labelResult})
- Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
- Me.RibbonControl1.MaxItemId = 6
- Me.RibbonControl1.Name = "RibbonControl1"
- Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
- Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
- Me.RibbonControl1.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide
- Me.RibbonControl1.ShowToolbarCustomizeItem = False
- Me.RibbonControl1.Size = New System.Drawing.Size(511, 66)
- Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
- Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
- '
- 'BarButtonItem1
- '
- Me.BarButtonItem1.Caption = "Speichern und schließen"
- Me.BarButtonItem1.Id = 1
- Me.BarButtonItem1.ImageOptions.SvgImage = Global.DigitalData.Controls.RegexEditor.My.Resources.Resources.actions_check1
- Me.BarButtonItem1.Name = "BarButtonItem1"
- '
- 'BarButtonItem2
- '
- Me.BarButtonItem2.Caption = "Regular Expression testen"
- Me.BarButtonItem2.Id = 2
- Me.BarButtonItem2.ImageOptions.SvgImage = Global.DigitalData.Controls.RegexEditor.My.Resources.Resources.definednameuseinformula1
- Me.BarButtonItem2.Name = "BarButtonItem2"
- '
- 'BarStaticItem1
- '
- Me.BarStaticItem1.Caption = "Ergebnis"
- Me.BarStaticItem1.Id = 3
- Me.BarStaticItem1.ImageOptions.SvgImage = Global.DigitalData.Controls.RegexEditor.My.Resources.Resources.about
- Me.BarStaticItem1.Name = "BarStaticItem1"
- Me.BarStaticItem1.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
- '
- 'RibbonPage1
- '
- Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1})
- Me.RibbonPage1.Name = "RibbonPage1"
- Me.RibbonPage1.Text = "RibbonPage1"
- '
- 'RibbonPageGroup1
- '
- Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1)
- Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2)
- Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
- Me.RibbonPageGroup1.Text = "RibbonPageGroup1"
- '
- 'RibbonStatusBar1
- '
- Me.RibbonStatusBar1.ItemLinks.Add(Me.BarStaticItem1)
- Me.RibbonStatusBar1.ItemLinks.Add(Me.labelResult)
- Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 309)
- Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
- Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
- Me.RibbonStatusBar1.Size = New System.Drawing.Size(511, 22)
- '
- 'RibbonPage2
- '
- Me.RibbonPage2.Name = "RibbonPage2"
- Me.RibbonPage2.Text = "RibbonPage2"
- '
- 'labelResult
- '
- Me.labelResult.Caption = ""
- Me.labelResult.Id = 5
- Me.labelResult.Name = "labelResult"
- '
- 'frmRegexEditor
- '
- Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.ClientSize = New System.Drawing.Size(511, 331)
- Me.Controls.Add(Me.Label2)
- Me.Controls.Add(Me.txtTest)
- Me.Controls.Add(Me.Label4)
- Me.Controls.Add(Me.Label1)
- Me.Controls.Add(Me.txtRegex)
- Me.Controls.Add(Me.RibbonStatusBar1)
- Me.Controls.Add(Me.RibbonControl1)
- Me.IconOptions.SvgImage = Global.DigitalData.Controls.RegexEditor.My.Resources.Resources.definednameuseinformula2
- Me.Name = "frmRegexEditor"
- Me.Ribbon = Me.RibbonControl1
- Me.StatusBar = Me.RibbonStatusBar1
- Me.Text = "Regex Editor"
- CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
- Me.ResumeLayout(False)
- Me.PerformLayout()
-
- End Sub
- Friend WithEvents Label2 As Label
- Friend WithEvents txtTest As TextBox
- Friend WithEvents Label4 As Label
- Friend WithEvents Label1 As Label
- Friend WithEvents txtRegex As TextBox
- Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
- Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
- Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
- Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
- Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
- Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents BarStaticItem1 As DevExpress.XtraBars.BarStaticItem
- Friend WithEvents labelResult As DevExpress.XtraBars.BarStaticItem
-End Class
diff --git a/Controls.RegexEditor/frmRegexEditor.resx b/Controls.RegexEditor/frmRegexEditor.resx
deleted file mode 100644
index 1af7de15..00000000
--- a/Controls.RegexEditor/frmRegexEditor.resx
+++ /dev/null
@@ -1,120 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
\ No newline at end of file
diff --git a/Controls.RegexEditor/frmRegexEditor.vb b/Controls.RegexEditor/frmRegexEditor.vb
deleted file mode 100644
index 0b5b6c9c..00000000
--- a/Controls.RegexEditor/frmRegexEditor.vb
+++ /dev/null
@@ -1,39 +0,0 @@
-Imports System.Text.RegularExpressions
-
-Public Class frmRegexEditor
- Public RegexString As String
-
- Public Sub New(RegexString As String)
- MyBase.New()
-
- ' Dieser Aufruf ist für den Designer erforderlich.
- InitializeComponent()
-
- ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
- Me.RegexString = RegexString
- End Sub
-
- Private Sub RegexEditor_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- txtRegex.Text = RegexString
- End Sub
-
- Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
- RegexString = txtRegex.Text
- DialogResult = DialogResult.OK
- Close()
- End Sub
-
- Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
- Try
- Dim oTestString As String = txtTest.Text
-
- If Regex.IsMatch(oTestString, txtRegex.Text) Then
- labelResult.Caption = "Test String ist gültig."
- Else
- labelResult.Caption = "Test String ist nicht gültig."
- End If
- Catch ex As Exception
- MsgBox(ex.Message, MsgBoxStyle.Critical, "Regex Test")
- End Try
- End Sub
-End Class
\ No newline at end of file
diff --git a/Controls.SQLEditor/App.config b/Controls.SQLEditor/App.config
deleted file mode 100644
index cd714553..00000000
--- a/Controls.SQLEditor/App.config
+++ /dev/null
@@ -1,14 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/My Project/Application.myapp b/Controls.SQLEditor/My Project/Application.myapp
deleted file mode 100644
index 60a8aa77..00000000
--- a/Controls.SQLEditor/My Project/Application.myapp
+++ /dev/null
@@ -1,10 +0,0 @@
-
-
- true
- frmSQLEditor
- false
- 0
- true
- 0
- true
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/My Project/AssemblyInfo.vb b/Controls.SQLEditor/My Project/AssemblyInfo.vb
deleted file mode 100644
index 66e02f32..00000000
--- a/Controls.SQLEditor/My Project/AssemblyInfo.vb
+++ /dev/null
@@ -1,35 +0,0 @@
-Imports System
-Imports System.Reflection
-Imports System.Runtime.InteropServices
-
-' Allgemeine Informationen über eine Assembly werden über die folgenden
-' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
-' die einer Assembly zugeordnet sind.
-
-' Werte der Assemblyattribute überprüfen
-
-
-
-
-
-
-
-
-
-
-'Die folgende GUID wird für die typelib-ID verwendet, wenn dieses Projekt für COM verfügbar gemacht wird.
-
-
-' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
-'
-' Hauptversion
-' Nebenversion
-' Buildnummer
-' Revision
-'
-' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
-' indem Sie "*" wie unten gezeigt eingeben:
-'
-
-
-
diff --git a/Controls.SQLEditor/My Project/Resources.Designer.vb b/Controls.SQLEditor/My Project/Resources.Designer.vb
deleted file mode 100644
index 2ffb5332..00000000
--- a/Controls.SQLEditor/My Project/Resources.Designer.vb
+++ /dev/null
@@ -1,293 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-Imports System
-
-Namespace My.Resources
-
- 'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
- '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
- 'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
- 'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
- '''
- ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
- '''
- _
- Friend Module Resources
-
- Private resourceMan As Global.System.Resources.ResourceManager
-
- Private resourceCulture As Global.System.Globalization.CultureInfo
-
- '''
- ''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
- '''
- _
- Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
- Get
- If Object.ReferenceEquals(resourceMan, Nothing) Then
- Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DigitalData.Controls.SQLEditor.Resources", GetType(Resources).Assembly)
- resourceMan = temp
- End If
- Return resourceMan
- End Get
- End Property
-
- '''
- ''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
- ''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
- '''
- _
- Friend Property Culture() As Global.System.Globalization.CultureInfo
- Get
- Return resourceCulture
- End Get
- Set
- resourceCulture = value
- End Set
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property actions_check() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("actions_check", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property actions_checkcircled() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("actions_checkcircled", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property actions_database() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("actions_database", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property actions_database1() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("actions_database1", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property actions_database2() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("actions_database2", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property actions_user() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("actions_user", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property autoarrange() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("autoarrange", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property bo_contract() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("bo_contract", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property check() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("check", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property clearall() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("clearall", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property cleartablestyle() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("cleartablestyle", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property editdatasource() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("editdatasource", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property editdatasource1() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("editdatasource1", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property editdatasource2() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("editdatasource2", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property electronics_desktopmac() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("electronics_desktopmac", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property handtool() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("handtool", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property highimportance() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("highimportance", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property removegroupheader() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("removegroupheader", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property togglefieldcodes() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("togglefieldcodes", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property updatedataextract() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("updatedataextract", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property updatedataextract1() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("updatedataextract1", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property updatedataextract2() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("updatedataextract2", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
-
- '''
- ''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
- '''
- Friend ReadOnly Property updatedataextract3() As DevExpress.Utils.Svg.SvgImage
- Get
- Dim obj As Object = ResourceManager.GetObject("updatedataextract3", resourceCulture)
- Return CType(obj,DevExpress.Utils.Svg.SvgImage)
- End Get
- End Property
- End Module
-End Namespace
diff --git a/Controls.SQLEditor/My Project/Resources.resx b/Controls.SQLEditor/My Project/Resources.resx
deleted file mode 100644
index 92de47ad..00000000
--- a/Controls.SQLEditor/My Project/Resources.resx
+++ /dev/null
@@ -1,190 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
- ..\Resources\updatedataextract2.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\removegroupheader.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\togglefieldcodes.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\editdatasource.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\actions_check.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\check.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\highimportance.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\autoarrange.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\cleartablestyle.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\handtool.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\electronics_desktopmac.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\editdatasource2.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\clearall.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\actions_database2.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\updatedataextract3.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\actions_database1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\updatedataextract1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\actions_user.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\actions_checkcircled.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\editdatasource1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\updatedataextract.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\actions_database.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\bo_contract.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/My Project/Resources.resx.bak b/Controls.SQLEditor/My Project/Resources.resx.bak
deleted file mode 100644
index dbcd51c3..00000000
--- a/Controls.SQLEditor/My Project/Resources.resx.bak
+++ /dev/null
@@ -1,148 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
- ..\Resources\actions_database.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\editdatasource.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\actions_check.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\actions_database1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\updatedataextract1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\updatedataextract2.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\highimportance.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\updatedataextract.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
- ..\Resources\actions_checkcircled.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/My Project/Settings.Designer.vb b/Controls.SQLEditor/My Project/Settings.Designer.vb
deleted file mode 100644
index 494381b8..00000000
--- a/Controls.SQLEditor/My Project/Settings.Designer.vb
+++ /dev/null
@@ -1,73 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- _
- Partial Friend NotInheritable Class MySettings
- Inherits Global.System.Configuration.ApplicationSettingsBase
-
- Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
-
-#Region "Automatische My.Settings-Speicherfunktion"
-#If _MyType = "WindowsForms" Then
- Private Shared addedHandler As Boolean
-
- Private Shared addedHandlerLockObject As New Object
-
- _
- Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
- If My.Application.SaveMySettingsOnExit Then
- My.Settings.Save()
- End If
- End Sub
-#End If
-#End Region
-
- Public Shared ReadOnly Property [Default]() As MySettings
- Get
-
-#If _MyType = "WindowsForms" Then
- If Not addedHandler Then
- SyncLock addedHandlerLockObject
- If Not addedHandler Then
- AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
- addedHandler = True
- End If
- End SyncLock
- End If
-#End If
- Return defaultInstance
- End Get
- End Property
- End Class
-End Namespace
-
-Namespace My
-
- _
- Friend Module MySettingsProperty
-
- _
- Friend ReadOnly Property Settings() As Global.DigitalData.Controls.SQLEditor.My.MySettings
- Get
- Return Global.DigitalData.Controls.SQLEditor.My.MySettings.Default
- End Get
- End Property
- End Module
-End Namespace
diff --git a/Controls.SQLEditor/My Project/licenses.licx b/Controls.SQLEditor/My Project/licenses.licx
deleted file mode 100644
index e69de29b..00000000
diff --git a/Controls.SQLEditor/My Project/licenses.licx.bak b/Controls.SQLEditor/My Project/licenses.licx.bak
deleted file mode 100644
index c948fb7e..00000000
--- a/Controls.SQLEditor/My Project/licenses.licx.bak
+++ /dev/null
@@ -1,5 +0,0 @@
-DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraRichEdit.RichEditControl, DevExpress.XtraRichEdit.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
diff --git a/Controls.SQLEditor/Placeholder.vb b/Controls.SQLEditor/Placeholder.vb
deleted file mode 100644
index 1588548f..00000000
--- a/Controls.SQLEditor/Placeholder.vb
+++ /dev/null
@@ -1,45 +0,0 @@
-Imports DigitalData.Modules.Patterns
-
-Public Class Placeholder
- '''
- ''' The internal Category of the placeholder, ie. the INT Part of {#INT#USERNAME}
- '''
- Public Property [Module] As String
-
- '''
- ''' The internal Name of the placeholder, ie. the USERNAME Part of {#INT#USERNAME}
- '''
- Public Property Name As String
-
- '''
- ''' The Value that this palceholder is replaced by, user entry.
- '''
- '''
- Public Property Value As String
-
- '''
- ''' The internal pattern object
- '''
- '''
- Public Property Pattern As Pattern
-
- Public Title As String
- Public Description As String
-
- Public Enum PlaceholderType
- FileFlow
- End Enum
-
- Public Sub New(pTitle As String, pDescription As String, pModule As String, pName As String)
- Title = pTitle
- Description = pDescription
-
- Name = pName
- [Module] = pModule
- End Sub
-
- Public Overrides Function Equals(obj As Object) As Boolean
- Return DirectCast(obj, Placeholder).Module = [Module] And
- DirectCast(obj, Placeholder).Name = Name
- End Function
-End Class
\ No newline at end of file
diff --git a/Controls.SQLEditor/Placeholders.vb b/Controls.SQLEditor/Placeholders.vb
deleted file mode 100644
index 0b06dfe2..00000000
--- a/Controls.SQLEditor/Placeholders.vb
+++ /dev/null
@@ -1,135 +0,0 @@
-Imports DevExpress.Utils.Svg
-Imports DevExpress.XtraBars.Ribbon
-
-Public Class Placeholders
- Public Const AUTO_INDEX_ZOOFLOW = "ATTR_M"
- Public Const MAN_INDEX_ZOOFLOW = "ATTR_A"
-
- Public Function GetInternalPlaceholders() As GalleryItemGroup
- Dim oModule = "INT"
- Dim oImage = My.Resources.electronics_desktopmac
-
- Dim oItems As New List(Of GalleryItem)() From {
- GetGalleryItem(New Placeholder("USERNAME", "Benutzername", oModule, "USERNAME"), oImage),
- GetGalleryItem(New Placeholder("MACHINE", "Aktuelles Datum", oModule, "MACHINE"), oImage),
- GetGalleryItem(New Placeholder("DOMAIN", "Email-Adresse", oModule, "DOMAIN"), oImage),
- GetGalleryItem(New Placeholder("DATE", "Vorname", oModule, "DATE"), oImage)
- }
- Dim oGroup1 = New GalleryItemGroup() With {.Caption = "Intern"}
-
- oGroup1.Items.AddRange(oItems.ToArray)
- Return oGroup1
- End Function
-
- Public Function GetClipboardPlaceholder() As GalleryItemGroup
- Dim oModule = "CLIP"
- Dim oImage = My.Resources.electronics_desktopmac
-
- Dim oItems As New List(Of GalleryItem)() From {
- GetGalleryItem(New Placeholder("BOARD", "Zwischenablage", oModule, "BOARD"), oImage)
- }
- Dim oGroup1 = New GalleryItemGroup() With {.Caption = "Zwischenablage"}
-
- oGroup1.Items.AddRange(oItems.ToArray)
- Return oGroup1
- End Function
-
- Friend Function GetWindreamPlaceholders(pPlaceholders As List(Of String)) As GalleryItemGroup
- Dim oImage = My.Resources.bo_contract
- Dim oItems As New List(Of GalleryItem)()
-
- If pPlaceholders.Count > 0 Then
- For Each oWindreamPlaceholder In pPlaceholders
- Dim oPlaceholder = New Placeholder(oWindreamPlaceholder, "Windream Index", "WMI", oWindreamPlaceholder)
- oItems.Add(GetGalleryItem(oPlaceholder, oImage))
- Next
- Else Return Nothing
- End If
-
- Dim oGroup1 = New GalleryItemGroup() With {.Caption = "Windream Indizies"}
- oGroup1.Items.AddRange(oItems.ToArray)
- Return oGroup1
- End Function
-
- Public Function GetManualPlaceholders(pPlaceholders As List(Of String), pPrefix As String) As GalleryItemGroup
- Dim oImage As SvgImage = My.Resources.handtool
- Dim oItems As New List(Of GalleryItem)()
- Dim oPrefix As String = pPrefix
-
- If oPrefix Is Nothing Then
- oPrefix = AUTO_INDEX_ZOOFLOW
- End If
-
- If pPlaceholders.Count > 0 Then
- For Each oManualPlaceholder In pPlaceholders
- Dim oPlaceholder = New Placeholder(oManualPlaceholder, "Manuelles Attribut", oPrefix, oManualPlaceholder)
- oItems.Add(GetGalleryItem(oPlaceholder, oImage))
- Next
- Else Return Nothing
- End If
-
- Dim oGroup1 = New GalleryItemGroup() With {.Caption = "Manuelle Attribute"}
- oGroup1.Items.AddRange(oItems.ToArray)
- Return oGroup1
- End Function
-
- Public Function GetAutomaticPlaceholders(pPlaceholders As List(Of String), pPrefix As String) As GalleryItemGroup
- Dim oImage As SvgImage = My.Resources.autoarrange
- Dim oItems As New List(Of GalleryItem)()
- Dim oPrefix As String = pPrefix
-
- If oPrefix Is Nothing Then
- oPrefix = AUTO_INDEX_ZOOFLOW
- End If
-
- If pPlaceholders.Count > 0 Then
- For Each oManualPlaceholder In pPlaceholders
- Dim oPlaceholder = New Placeholder(oManualPlaceholder, "Automatisches Attribut", oPrefix, oManualPlaceholder)
- oItems.Add(GetGalleryItem(oPlaceholder, oImage))
- Next
-
- Else Return Nothing
- End If
-
- Dim oGroup1 = New GalleryItemGroup() With {.Caption = "Automatisches Attribut"}
-
- oGroup1.Items.AddRange(oItems.ToArray)
- Return oGroup1
- End Function
-
- Public Function GetUserPlaceholders() As GalleryItemGroup
- Dim oModule = "USER"
- Dim oImage = My.Resources.actions_user
-
- Dim oItems As New List(Of GalleryItem)() From {
- GetGalleryItem(New Placeholder("PRENAME", "Vorname", oModule, "PRENAME"), oImage),
- GetGalleryItem(New Placeholder("SURNAME", "Nachname", oModule, "SURNAME"), oImage),
- GetGalleryItem(New Placeholder("EMAIL", "Email-Adresse", oModule, "EMAIL"), oImage),
- GetGalleryItem(New Placeholder("USER_ID", "Benutzer-ID", oModule, "USER_ID"), oImage),
- GetGalleryItem(New Placeholder("PROFILE_ID", "Profil-ID", oModule, "PROFILE_ID"), oImage),
- GetGalleryItem(New Placeholder("PROFILE_TITLE", "Profil-Name", oModule, "PROFILE_TITLE"), oImage),
- GetGalleryItem(New Placeholder("LANGUAGE", "Sprache", oModule, "LANGUAGE"), oImage)
- }
- Dim oGroup1 = New GalleryItemGroup() With {.Caption = "Benutzer"}
-
- oGroup1.Items.AddRange(oItems.ToArray)
- Return oGroup1
- End Function
-
- Private Function GetGalleryItem(pPlaceholder As Placeholder) As GalleryItem
- Return New GalleryItem(Nothing, pPlaceholder.Title, pPlaceholder.Description) With {
- .Tag = pPlaceholder
- }
- End Function
-
- Private Function GetGalleryItem(pPlaceholder As Placeholder, pImage As SvgImage) As GalleryItem
- Dim oItem = New GalleryItem(Nothing, pPlaceholder.Title, pPlaceholder.Description) With {
- .Tag = pPlaceholder
- }
- oItem.ImageOptions.SvgImage = pImage
-
- Return oItem
- End Function
-
-
-End Class
diff --git a/Controls.SQLEditor/Resources/actions_check.svg b/Controls.SQLEditor/Resources/actions_check.svg
deleted file mode 100644
index 35c68028..00000000
--- a/Controls.SQLEditor/Resources/actions_check.svg
+++ /dev/null
@@ -1,15 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/actions_checkcircled.svg b/Controls.SQLEditor/Resources/actions_checkcircled.svg
deleted file mode 100644
index b1b6aa99..00000000
--- a/Controls.SQLEditor/Resources/actions_checkcircled.svg
+++ /dev/null
@@ -1,15 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/actions_database.svg b/Controls.SQLEditor/Resources/actions_database.svg
deleted file mode 100644
index af7a23c1..00000000
--- a/Controls.SQLEditor/Resources/actions_database.svg
+++ /dev/null
@@ -1,17 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/actions_database1.svg b/Controls.SQLEditor/Resources/actions_database1.svg
deleted file mode 100644
index af7a23c1..00000000
--- a/Controls.SQLEditor/Resources/actions_database1.svg
+++ /dev/null
@@ -1,17 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/actions_database2.svg b/Controls.SQLEditor/Resources/actions_database2.svg
deleted file mode 100644
index af7a23c1..00000000
--- a/Controls.SQLEditor/Resources/actions_database2.svg
+++ /dev/null
@@ -1,17 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/actions_user.svg b/Controls.SQLEditor/Resources/actions_user.svg
deleted file mode 100644
index 8c183040..00000000
--- a/Controls.SQLEditor/Resources/actions_user.svg
+++ /dev/null
@@ -1,16 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/autoarrange.svg b/Controls.SQLEditor/Resources/autoarrange.svg
deleted file mode 100644
index a736935b..00000000
--- a/Controls.SQLEditor/Resources/autoarrange.svg
+++ /dev/null
@@ -1,17 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/bo_contract.svg b/Controls.SQLEditor/Resources/bo_contract.svg
deleted file mode 100644
index 1d31dea8..00000000
--- a/Controls.SQLEditor/Resources/bo_contract.svg
+++ /dev/null
@@ -1,29 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/check.svg b/Controls.SQLEditor/Resources/check.svg
deleted file mode 100644
index bc91b5a7..00000000
--- a/Controls.SQLEditor/Resources/check.svg
+++ /dev/null
@@ -1,16 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/clearall.svg b/Controls.SQLEditor/Resources/clearall.svg
deleted file mode 100644
index 0ebb0456..00000000
--- a/Controls.SQLEditor/Resources/clearall.svg
+++ /dev/null
@@ -1,9 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/cleartablestyle.svg b/Controls.SQLEditor/Resources/cleartablestyle.svg
deleted file mode 100644
index f5becce1..00000000
--- a/Controls.SQLEditor/Resources/cleartablestyle.svg
+++ /dev/null
@@ -1,14 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/editdatasource.svg b/Controls.SQLEditor/Resources/editdatasource.svg
deleted file mode 100644
index 6e46621c..00000000
--- a/Controls.SQLEditor/Resources/editdatasource.svg
+++ /dev/null
@@ -1,17 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/editdatasource1.svg b/Controls.SQLEditor/Resources/editdatasource1.svg
deleted file mode 100644
index 6e46621c..00000000
--- a/Controls.SQLEditor/Resources/editdatasource1.svg
+++ /dev/null
@@ -1,17 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/editdatasource2.svg b/Controls.SQLEditor/Resources/editdatasource2.svg
deleted file mode 100644
index 6e46621c..00000000
--- a/Controls.SQLEditor/Resources/editdatasource2.svg
+++ /dev/null
@@ -1,17 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/electronics_desktopmac.svg b/Controls.SQLEditor/Resources/electronics_desktopmac.svg
deleted file mode 100644
index 919cfe4d..00000000
--- a/Controls.SQLEditor/Resources/electronics_desktopmac.svg
+++ /dev/null
@@ -1,9 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/handtool.svg b/Controls.SQLEditor/Resources/handtool.svg
deleted file mode 100644
index 1718d3f1..00000000
--- a/Controls.SQLEditor/Resources/handtool.svg
+++ /dev/null
@@ -1,15 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/highimportance.svg b/Controls.SQLEditor/Resources/highimportance.svg
deleted file mode 100644
index 7f7764cf..00000000
--- a/Controls.SQLEditor/Resources/highimportance.svg
+++ /dev/null
@@ -1,19 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/removegroupheader.svg b/Controls.SQLEditor/Resources/removegroupheader.svg
deleted file mode 100644
index beb2c741..00000000
--- a/Controls.SQLEditor/Resources/removegroupheader.svg
+++ /dev/null
@@ -1,22 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/togglefieldcodes.svg b/Controls.SQLEditor/Resources/togglefieldcodes.svg
deleted file mode 100644
index 31917a1e..00000000
--- a/Controls.SQLEditor/Resources/togglefieldcodes.svg
+++ /dev/null
@@ -1,13 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/updatedataextract.svg b/Controls.SQLEditor/Resources/updatedataextract.svg
deleted file mode 100644
index e7dda038..00000000
--- a/Controls.SQLEditor/Resources/updatedataextract.svg
+++ /dev/null
@@ -1,16 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/updatedataextract1.svg b/Controls.SQLEditor/Resources/updatedataextract1.svg
deleted file mode 100644
index e7dda038..00000000
--- a/Controls.SQLEditor/Resources/updatedataextract1.svg
+++ /dev/null
@@ -1,16 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/updatedataextract2.svg b/Controls.SQLEditor/Resources/updatedataextract2.svg
deleted file mode 100644
index e7dda038..00000000
--- a/Controls.SQLEditor/Resources/updatedataextract2.svg
+++ /dev/null
@@ -1,16 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/Resources/updatedataextract3.svg b/Controls.SQLEditor/Resources/updatedataextract3.svg
deleted file mode 100644
index e7dda038..00000000
--- a/Controls.SQLEditor/Resources/updatedataextract3.svg
+++ /dev/null
@@ -1,16 +0,0 @@
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/SQLEditor.vbproj b/Controls.SQLEditor/SQLEditor.vbproj
deleted file mode 100644
index 85f37d66..00000000
--- a/Controls.SQLEditor/SQLEditor.vbproj
+++ /dev/null
@@ -1,268 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {3E7BC8A9-91EF-49B8-8110-2C01F664C24A}
- Library
-
-
- DigitalData.Controls.SQLEditor
- DigitalData.Controls.SQLEditor
- 512
- Windows
- v4.6.1
- true
- true
-
-
- AnyCPU
- true
- full
- true
- true
- bin\Debug\
- DigitalData.Controls.SQLEditor.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- AnyCPU
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.Controls.SQLEditor.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- ..\packages\NLog.4.7.10\lib\net45\NLog.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- frmSQLEditor.vb
-
-
- Form
-
-
- frmSQLEditor_old.vb
-
-
- Form
-
-
- frmSQLResult.vb
-
-
- Form
-
-
-
- True
- Application.myapp
- True
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
-
-
-
- frmSQLEditor.vb
-
-
- frmSQLEditor_old.vb
-
-
- frmSQLResult.vb
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- {d20a6bf2-c7c6-4a7a-b34d-fa27d775a049}
- Common
-
-
- {eaf0ea75-5fa7-485d-89c7-b2d843b03a96}
- Database
-
-
- {d3c8cfed-d6f6-43a8-9bdf-454145d0352f}
- Language
-
-
- {903b2d7d-3b80-4be9-8713-7447b704e1b0}
- Logging
-
-
- {7c3b0c7e-59fe-4e1a-a655-27ae119f9444}
- Patterns
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/SQLSyntaxHighlightService.vb b/Controls.SQLEditor/SQLSyntaxHighlightService.vb
deleted file mode 100644
index d4cc1ea8..00000000
--- a/Controls.SQLEditor/SQLSyntaxHighlightService.vb
+++ /dev/null
@@ -1,163 +0,0 @@
-Imports System.Collections.Generic
-Imports System.Drawing
-Imports System.Windows.Forms
-Imports DevExpress.Office.Utils
-Imports DevExpress.XtraRichEdit.API.Native
-Imports DevExpress.XtraRichEdit.Services
-Imports System.Linq
-Imports System.Text.RegularExpressions
-
-Public Class SQLSyntaxHighlightService
- Implements ISyntaxHighlightService
-
- Private ReadOnly document As Document
-
- Private _keywords As Regex
- Private _quotedString As New Regex("'([^']|'')*'")
- Private _commentedString As New Regex("(/\*([^*]|[\r\n]|(\*+([^*/]|[\r\n])))*\*+/)")
- Private _placeholderString As New Regex("{#(\w+)#([\:\.\w\s_/-]+)}")
-
- Private ReadOnly keywords As New List(Of String) From {
- "INSERT",
- "SELECT",
- "CREATE",
- "TABLE",
- "USE",
- "IDENTITY",
- "JOIN",
- "ON",
- "OFF",
- "NOT",
- "NULL",
- "WITH",
- "SET",
- "GO",
- "DECLARE",
- "EXECUTE",
- "NVARCHAR",
- "FROM",
- "INTO",
- "VALUES",
- "WHERE",
- "AND"
- }
-
- Public Sub New(ByVal document As Document)
- Me.document = document
-
- Me._keywords = New Regex("\b(" & String.Join("|", keywords.Select(Function(w) Regex.Escape(w))) & ")\b")
- End Sub
- Public Sub ForceExecute() Implements ISyntaxHighlightService.ForceExecute
- Execute()
- End Sub
- Public Sub Execute() Implements ISyntaxHighlightService.Execute
- Dim tSqltokens As List(Of SyntaxHighlightToken) = ParseTokens()
- document.ApplySyntaxHighlight(tSqltokens)
- End Sub
-
- Private Function ParseTokens() As List(Of SyntaxHighlightToken)
- Dim tokens As New List(Of SyntaxHighlightToken)()
- Dim ranges() As DocumentRange = Nothing
-
- ' search for quoted strings
- ranges = TryCast(document.FindAll(_quotedString).GetAsFrozen(), DocumentRange())
- For i As Integer = 0 To ranges.Length - 1
- tokens.Add(CreateToken(ranges(i).Start.ToInt(), ranges(i).End.ToInt(), Color.Red))
- Next i
-
- 'Extract all keywords
- ranges = TryCast(document.FindAll(_keywords).GetAsFrozen(), DocumentRange())
- For j As Integer = 0 To ranges.Length - 1
- If Not IsRangeInTokens(ranges(j), tokens) Then
- tokens.Add(CreateToken(ranges(j).Start.ToInt(), ranges(j).End.ToInt(), Color.Blue))
- End If
- Next j
-
- 'Find all placeholders
- ranges = TryCast(document.FindAll(_placeholderString).GetAsFrozen(), DocumentRange())
- For j As Integer = 0 To ranges.Length - 1
- If Not IsRangeInTokens(ranges(j), tokens) Then
- tokens.Add(CreateToken(ranges(j).Start.ToInt(), ranges(j).End.ToInt(), Color.DarkTurquoise))
- End If
- Next j
-
- 'Find all comments
- ranges = TryCast(document.FindAll(_commentedString).GetAsFrozen(), DocumentRange())
- For j As Integer = 0 To ranges.Length - 1
- If Not IsRangeInTokens(ranges(j), tokens) Then
- tokens.Add(CreateToken(ranges(j).Start.ToInt(), ranges(j).End.ToInt(), Color.Green))
- End If
- Next j
-
- ' order tokens by their start position
- tokens.Sort(New SyntaxHighlightTokenComparer())
-
- ' fill in gaps in document coverage
- tokens = CombineWithPlainTextTokens(tokens)
- Return tokens
- End Function
-
- 'Parse the remaining text into tokens:
- Private Function CombineWithPlainTextTokens(ByVal tokens As List(Of SyntaxHighlightToken)) As List(Of SyntaxHighlightToken)
- Dim result As New List(Of SyntaxHighlightToken)(tokens.Count * 2 + 1)
- Dim documentStart As Integer = Me.document.Range.Start.ToInt()
- Dim documentEnd As Integer = Me.document.Range.End.ToInt()
- If tokens.Count = 0 Then
- result.Add(CreateToken(documentStart, documentEnd, Color.Black))
- Else
- Dim firstToken As SyntaxHighlightToken = tokens(0)
- If documentStart < firstToken.Start Then
- result.Add(CreateToken(documentStart, firstToken.Start, Color.Black))
- End If
- result.Add(firstToken)
- For i As Integer = 1 To tokens.Count - 1
- Dim token As SyntaxHighlightToken = tokens(i)
- Dim prevToken As SyntaxHighlightToken = tokens(i - 1)
- If prevToken.End <> token.Start Then
- result.Add(CreateToken(prevToken.End, token.Start, Color.Black))
- End If
- result.Add(token)
- Next i
- Dim lastToken As SyntaxHighlightToken = tokens(tokens.Count - 1)
- If documentEnd > lastToken.End Then
- result.Add(CreateToken(lastToken.End, documentEnd, Color.Black))
- End If
- End If
- Return result
- End Function
-
- 'Create a token from the retrieved range and specify its forecolor
- Private Function CreateToken(ByVal start As Integer, ByVal [end] As Integer, ByVal foreColor As Color) As SyntaxHighlightToken
- Dim properties As New SyntaxHighlightProperties()
- properties.ForeColor = foreColor
- Return New SyntaxHighlightToken(start, [end] - start, properties)
- End Function
-
- 'Check whether tokens intersect each other
- Private Function IsRangeInTokens(ByVal range As DocumentRange, ByVal tokens As List(Of SyntaxHighlightToken)) As Boolean
- Return tokens.Any(Function(t) IsIntersect(range, t))
- End Function
- Private Function IsIntersect(ByVal range As DocumentRange, ByVal token As SyntaxHighlightToken) As Boolean
- Dim start As Integer = range.Start.ToInt()
- If start >= token.Start AndAlso start < token.End Then
- Return True
- End If
- Dim [end] As Integer = range.End.ToInt() - 1
- If [end] >= token.Start AndAlso [end] < token.End Then
- Return True
- End If
- If start < token.Start AndAlso [end] >= token.End Then
- Return True
- End If
- Return False
- End Function
-End Class
-
-'Compare token's initial positions to sort them
-Public Class SyntaxHighlightTokenComparer
- Implements IComparer(Of SyntaxHighlightToken)
-
- Public Function Compare(ByVal x As SyntaxHighlightToken, ByVal y As SyntaxHighlightToken) As Integer Implements IComparer(Of SyntaxHighlightToken).Compare
- Return x.Start - y.Start
- End Function
-End Class
\ No newline at end of file
diff --git a/Controls.SQLEditor/frmSQLEditor.Designer.vb b/Controls.SQLEditor/frmSQLEditor.Designer.vb
deleted file mode 100644
index e6e78e85..00000000
--- a/Controls.SQLEditor/frmSQLEditor.Designer.vb
+++ /dev/null
@@ -1,329 +0,0 @@
-
-Partial Class frmSQLEditor
- Inherits DevExpress.XtraBars.Ribbon.RibbonForm
-
- 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
-
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- Try
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- Finally
- MyBase.Dispose(disposing)
- End Try
- End Sub
-
- 'Wird vom Windows Form-Designer benötigt.
- Private components As System.ComponentModel.IContainer
-
- 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
- 'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
- 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
-
- Private Sub InitializeComponent()
- Me.components = New System.ComponentModel.Container()
- Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
- Me.GalleryPlaceholders = New DevExpress.XtraBars.RibbonGalleryBarItem()
- Me.SvgImageCollection1 = New DevExpress.Utils.SvgImageCollection(Me.components)
- Me.btnEditConnections = New DevExpress.XtraBars.BarButtonItem()
- Me.btnSave = New DevExpress.XtraBars.BarButtonItem()
- Me.btnExecuteSQL = New DevExpress.XtraBars.BarButtonItem()
- Me.GalleryConnection = New DevExpress.XtraBars.RibbonGalleryBarItem()
- Me.chkClearPlaceholders = New DevExpress.XtraBars.BarCheckItem()
- Me.btnClearPlaceholders = New DevExpress.XtraBars.BarButtonItem()
- Me.chkShowPlaceholders = New DevExpress.XtraBars.BarCheckItem()
- Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
- Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
- Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
- Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
- Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
- Me.RibbonPageGroup4 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
- Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
- Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
- Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
- Me.txtSQLCommand = New DevExpress.XtraRichEdit.RichEditControl()
- Me.SplitContainerControl1 = New DevExpress.XtraEditors.SplitContainerControl()
- Me.GridPlaceholders = New DevExpress.XtraGrid.GridControl()
- Me.ViewPlaceholders = New DevExpress.XtraGrid.Views.Grid.GridView()
- Me.colPattern = New DevExpress.XtraGrid.Columns.GridColumn()
- Me.colValue = New DevExpress.XtraGrid.Columns.GridColumn()
- CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.SvgImageCollection1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.SplitContainerControl1.Panel1, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.SplitContainerControl1.Panel1.SuspendLayout()
- CType(Me.SplitContainerControl1.Panel2, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.SplitContainerControl1.Panel2.SuspendLayout()
- Me.SplitContainerControl1.SuspendLayout()
- CType(Me.GridPlaceholders, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.ViewPlaceholders, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.SuspendLayout()
- '
- 'RibbonControl1
- '
- Me.RibbonControl1.ExpandCollapseItem.Id = 0
- Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.GalleryPlaceholders, Me.btnEditConnections, Me.btnSave, Me.btnExecuteSQL, Me.GalleryConnection, Me.chkClearPlaceholders, Me.btnClearPlaceholders, Me.chkShowPlaceholders, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3})
- Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
- Me.RibbonControl1.MaxItemId = 16
- Me.RibbonControl1.Name = "RibbonControl1"
- Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
- Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
- Me.RibbonControl1.Size = New System.Drawing.Size(1056, 158)
- Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
- '
- 'GalleryPlaceholders
- '
- Me.GalleryPlaceholders.Caption = "RibbonGalleryBarItem1"
- '
- '
- '
- Me.GalleryPlaceholders.Gallery.Images = Me.SvgImageCollection1
- Me.GalleryPlaceholders.Gallery.ShowGroupCaption = True
- Me.GalleryPlaceholders.Gallery.ShowItemText = True
- Me.GalleryPlaceholders.Id = 1
- Me.GalleryPlaceholders.Name = "GalleryPlaceholders"
- '
- 'SvgImageCollection1
- '
- Me.SvgImageCollection1.Add("bo_list", "image://svgimages/business objects/bo_list.svg")
- '
- 'btnEditConnections
- '
- Me.btnEditConnections.Caption = "Verbindungen"
- Me.btnEditConnections.Id = 2
- Me.btnEditConnections.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.editdatasource1
- Me.btnEditConnections.Name = "btnEditConnections"
- '
- 'btnSave
- '
- Me.btnSave.Caption = "Speichern und Schließen"
- Me.btnSave.Id = 3
- Me.btnSave.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.check
- Me.btnSave.Name = "btnSave"
- '
- 'btnExecuteSQL
- '
- Me.btnExecuteSQL.Caption = "SQL Ausführen (F5)"
- Me.btnExecuteSQL.Id = 4
- Me.btnExecuteSQL.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.updatedataextract3
- Me.btnExecuteSQL.Name = "btnExecuteSQL"
- '
- 'GalleryConnection
- '
- Me.GalleryConnection.Caption = "RibbonGalleryBarItem2"
- '
- '
- '
- Me.GalleryConnection.Gallery.CheckDrawMode = DevExpress.XtraBars.Ribbon.Gallery.CheckDrawMode.ImageAndText
- Me.GalleryConnection.Gallery.ItemCheckMode = DevExpress.XtraBars.Ribbon.Gallery.ItemCheckMode.SingleRadio
- Me.GalleryConnection.Gallery.RowCount = 1
- Me.GalleryConnection.Gallery.ShowItemText = True
- Me.GalleryConnection.Id = 5
- Me.GalleryConnection.Name = "GalleryConnection"
- '
- 'chkClearPlaceholders
- '
- Me.chkClearPlaceholders.Caption = "Platzhalter nach Ausführung leeren"
- Me.chkClearPlaceholders.Id = 9
- Me.chkClearPlaceholders.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.cleartablestyle
- Me.chkClearPlaceholders.Name = "chkClearPlaceholders"
- '
- 'btnClearPlaceholders
- '
- Me.btnClearPlaceholders.Caption = "Platzhalter jetzt leeren"
- Me.btnClearPlaceholders.Id = 10
- Me.btnClearPlaceholders.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.clearall
- Me.btnClearPlaceholders.Name = "btnClearPlaceholders"
- '
- 'chkShowPlaceholders
- '
- Me.chkShowPlaceholders.BindableChecked = True
- Me.chkShowPlaceholders.Caption = "Platzhalter anzeigen"
- Me.chkShowPlaceholders.Checked = True
- Me.chkShowPlaceholders.Id = 12
- Me.chkShowPlaceholders.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.togglefieldcodes
- Me.chkShowPlaceholders.Name = "chkShowPlaceholders"
- '
- 'BarButtonItem1
- '
- Me.BarButtonItem1.Caption = "BarButtonItem1"
- Me.BarButtonItem1.Id = 13
- Me.BarButtonItem1.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.handtool
- Me.BarButtonItem1.Name = "BarButtonItem1"
- '
- 'BarButtonItem2
- '
- Me.BarButtonItem2.Caption = "BarButtonItem2"
- Me.BarButtonItem2.Id = 14
- Me.BarButtonItem2.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.autoarrange
- Me.BarButtonItem2.Name = "BarButtonItem2"
- '
- 'BarButtonItem3
- '
- Me.BarButtonItem3.Caption = "BarButtonItem3"
- Me.BarButtonItem3.Id = 15
- Me.BarButtonItem3.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.bo_contract
- Me.BarButtonItem3.Name = "BarButtonItem3"
- '
- 'RibbonPage1
- '
- Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup3, Me.RibbonPageGroup4, Me.RibbonPageGroup1})
- Me.RibbonPage1.Name = "RibbonPage1"
- Me.RibbonPage1.Text = "RibbonPage1"
- '
- 'RibbonPageGroup3
- '
- Me.RibbonPageGroup3.ItemLinks.Add(Me.btnSave)
- Me.RibbonPageGroup3.ItemLinks.Add(Me.btnExecuteSQL)
- Me.RibbonPageGroup3.Name = "RibbonPageGroup3"
- Me.RibbonPageGroup3.Text = "Start"
- '
- 'RibbonPageGroup4
- '
- Me.RibbonPageGroup4.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far
- Me.RibbonPageGroup4.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.actions_database2
- Me.RibbonPageGroup4.ItemLinks.Add(Me.GalleryConnection)
- Me.RibbonPageGroup4.Name = "RibbonPageGroup4"
- Me.RibbonPageGroup4.Text = "Verbindungen"
- '
- 'RibbonPageGroup1
- '
- Me.RibbonPageGroup1.ItemLinks.Add(Me.GalleryPlaceholders)
- Me.RibbonPageGroup1.ItemLinks.Add(Me.chkShowPlaceholders)
- Me.RibbonPageGroup1.ItemLinks.Add(Me.chkClearPlaceholders)
- Me.RibbonPageGroup1.ItemLinks.Add(Me.btnClearPlaceholders)
- Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
- Me.RibbonPageGroup1.Text = "Platzhalter"
- '
- 'RibbonStatusBar1
- '
- Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 666)
- Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
- Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
- Me.RibbonStatusBar1.Size = New System.Drawing.Size(1056, 24)
- '
- 'RibbonPage2
- '
- Me.RibbonPage2.Name = "RibbonPage2"
- Me.RibbonPage2.Text = "RibbonPage2"
- '
- 'txtSQLCommand
- '
- Me.txtSQLCommand.Dock = System.Windows.Forms.DockStyle.Fill
- Me.txtSQLCommand.Location = New System.Drawing.Point(0, 0)
- Me.txtSQLCommand.MenuManager = Me.RibbonControl1
- Me.txtSQLCommand.Name = "txtSQLCommand"
- Me.txtSQLCommand.Size = New System.Drawing.Size(802, 508)
- Me.txtSQLCommand.TabIndex = 2
- '
- 'SplitContainerControl1
- '
- Me.SplitContainerControl1.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel2
- Me.SplitContainerControl1.Dock = System.Windows.Forms.DockStyle.Fill
- Me.SplitContainerControl1.Location = New System.Drawing.Point(0, 158)
- Me.SplitContainerControl1.Name = "SplitContainerControl1"
- '
- 'SplitContainerControl1.Panel1
- '
- Me.SplitContainerControl1.Panel1.Controls.Add(Me.txtSQLCommand)
- Me.SplitContainerControl1.Panel1.Text = "Panel1"
- '
- 'SplitContainerControl1.Panel2
- '
- Me.SplitContainerControl1.Panel2.Controls.Add(Me.GridPlaceholders)
- Me.SplitContainerControl1.Panel2.Text = "Panel2"
- Me.SplitContainerControl1.Size = New System.Drawing.Size(1056, 508)
- Me.SplitContainerControl1.SplitterPosition = 802
- Me.SplitContainerControl1.TabIndex = 4
- '
- 'GridPlaceholders
- '
- Me.GridPlaceholders.Dock = System.Windows.Forms.DockStyle.Fill
- Me.GridPlaceholders.Location = New System.Drawing.Point(0, 0)
- Me.GridPlaceholders.MainView = Me.ViewPlaceholders
- Me.GridPlaceholders.MenuManager = Me.RibbonControl1
- Me.GridPlaceholders.Name = "GridPlaceholders"
- Me.GridPlaceholders.Size = New System.Drawing.Size(244, 508)
- Me.GridPlaceholders.TabIndex = 0
- Me.GridPlaceholders.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ViewPlaceholders})
- '
- 'ViewPlaceholders
- '
- Me.ViewPlaceholders.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colPattern, Me.colValue})
- Me.ViewPlaceholders.GridControl = Me.GridPlaceholders
- Me.ViewPlaceholders.Name = "ViewPlaceholders"
- '
- 'colPattern
- '
- Me.colPattern.Caption = "Platzhalter"
- Me.colPattern.FieldName = "Pattern"
- Me.colPattern.Name = "colPattern"
- Me.colPattern.OptionsColumn.AllowEdit = False
- Me.colPattern.OptionsColumn.ReadOnly = True
- Me.colPattern.Visible = True
- Me.colPattern.VisibleIndex = 0
- '
- 'colValue
- '
- Me.colValue.Caption = "Wert"
- Me.colValue.FieldName = "Value"
- Me.colValue.Name = "colValue"
- Me.colValue.Visible = True
- Me.colValue.VisibleIndex = 1
- '
- 'frmSQLEditor
- '
- Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.ClientSize = New System.Drawing.Size(1056, 690)
- Me.Controls.Add(Me.SplitContainerControl1)
- Me.Controls.Add(Me.RibbonStatusBar1)
- Me.Controls.Add(Me.RibbonControl1)
- Me.IconOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.editdatasource2
- Me.KeyPreview = True
- Me.Name = "frmSQLEditor"
- Me.Ribbon = Me.RibbonControl1
- Me.StatusBar = Me.RibbonStatusBar1
- Me.Text = "SQL Designer"
- CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.SvgImageCollection1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.SplitContainerControl1.Panel1, System.ComponentModel.ISupportInitialize).EndInit()
- Me.SplitContainerControl1.Panel1.ResumeLayout(False)
- CType(Me.SplitContainerControl1.Panel2, System.ComponentModel.ISupportInitialize).EndInit()
- Me.SplitContainerControl1.Panel2.ResumeLayout(False)
- CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).EndInit()
- Me.SplitContainerControl1.ResumeLayout(False)
- CType(Me.GridPlaceholders, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.ViewPlaceholders, System.ComponentModel.ISupportInitialize).EndInit()
- Me.ResumeLayout(False)
- Me.PerformLayout()
-
- End Sub
-
- Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
- Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
- Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
- Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
- Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
- Friend WithEvents GalleryPlaceholders As DevExpress.XtraBars.RibbonGalleryBarItem
- Friend WithEvents SvgImageCollection1 As DevExpress.Utils.SvgImageCollection
- Friend WithEvents txtSQLCommand As DevExpress.XtraRichEdit.RichEditControl
- Friend WithEvents SplitContainerControl1 As DevExpress.XtraEditors.SplitContainerControl
- Friend WithEvents GridPlaceholders As DevExpress.XtraGrid.GridControl
- Friend WithEvents ViewPlaceholders As DevExpress.XtraGrid.Views.Grid.GridView
- Friend WithEvents btnEditConnections As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents btnSave As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents btnExecuteSQL As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents RibbonPageGroup3 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
- Friend WithEvents colPattern As DevExpress.XtraGrid.Columns.GridColumn
- Friend WithEvents colValue As DevExpress.XtraGrid.Columns.GridColumn
- Friend WithEvents GalleryConnection As DevExpress.XtraBars.RibbonGalleryBarItem
- Friend WithEvents RibbonPageGroup4 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
- Friend WithEvents chkClearPlaceholders As DevExpress.XtraBars.BarCheckItem
- Friend WithEvents btnClearPlaceholders As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents chkShowPlaceholders As DevExpress.XtraBars.BarCheckItem
- Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem
-End Class
diff --git a/Controls.SQLEditor/frmSQLEditor.resx b/Controls.SQLEditor/frmSQLEditor.resx
deleted file mode 100644
index f722219e..00000000
--- a/Controls.SQLEditor/frmSQLEditor.resx
+++ /dev/null
@@ -1,123 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- 17, 17
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/frmSQLEditor.vb b/Controls.SQLEditor/frmSQLEditor.vb
deleted file mode 100644
index 5d1d68ba..00000000
--- a/Controls.SQLEditor/frmSQLEditor.vb
+++ /dev/null
@@ -1,274 +0,0 @@
-Imports DevExpress.XtraBars.Ribbon
-Imports DevExpress.XtraRichEdit.API.Native
-Imports DevExpress.XtraRichEdit.Services
-Imports DigitalData.Modules.Database
-Imports DigitalData.Modules.Logging
-Imports DigitalData.Modules.Patterns
-
-Public Class frmSQLEditor
-
- Private ReadOnly Patterns As ClassPatterns
- Private ReadOnly LogConfig As LogConfig
- Private ReadOnly Database As MSSQLServer
- Private ReadOnly Placeholders As Placeholders
-
- Private ClearPlaceholdersAfterSuccessfulExecute As Boolean = False
- Private FormLoading As Boolean = False
-
- Public Property SQLCommand As String = ""
- Public Property SQLConnection As Integer = 0
- Public Property LoadClipboardPlaceholders As Boolean = False
-
- Public Property PlaceholdersManual As List(Of String)
- Public Property PlaceholdersManualPrefix As String
-
- Public Property PlaceholdersAutomatic As List(Of String)
- Public Property PlaceholdersAutomaticPrefix As String
-
- Public Property PlaceholdersWindream As List(Of String)
-
- Public Sub New(pLogConfig As LogConfig, pDatabase As MSSQLServer)
- ' Dieser Aufruf ist für den Designer erforderlich.
- InitializeComponent()
-
- ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
- LogConfig = pLogConfig
- Database = pDatabase
- Patterns = New ClassPatterns(LogConfig)
- Placeholders = New Placeholders()
- End Sub
-
- Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- FormLoading = True
- Try
- If PlaceholdersAutomatic Is Nothing Then
- PlaceholdersAutomatic = New List(Of String)
- End If
-
- If PlaceholdersManual Is Nothing Then
- PlaceholdersManual = New List(Of String)
- End If
-
- If PlaceholdersWindream Is Nothing Then
- PlaceholdersWindream = New List(Of String)
- End If
-
- If SQLCommand <> String.Empty Then
- txtSQLCommand.Document.Text = SQLCommand
- End If
-
- Dim oConnectionGroup = LoadConnections()
- Dim oSelectedItem = Nothing
-
- If SQLConnection > 0 Then
- For Each oItem As GalleryItem In oConnectionGroup.Items
- Dim oConnection = oItem.Tag
- If SQLConnection = oConnection.id Then
- oSelectedItem = oItem
- End If
- Next
- End If
-
- GalleryConnection.Gallery.Groups.Add(oConnectionGroup)
- GalleryConnection.Gallery.SetItemCheck(oSelectedItem, True)
-
- Dim oPlaceholderGroups = LoadPlaceholders()
- GalleryPlaceholders.Gallery.Groups.AddRange(oPlaceholderGroups.ToArray)
-
- ConfigureRichEditControl()
-
- chkClearPlaceholders.Checked = ClearPlaceholdersAfterSuccessfulExecute
- Catch ex As Exception
- Finally
- FormLoading = False
- End Try
-
- End Sub
-
- Private Sub RibbonGalleryBarItem1_GalleryItemClick(sender As Object, e As GalleryItemClickEventArgs) Handles GalleryPlaceholders.GalleryItemClick
- Dim oPlaceholder As Placeholder = e.Item.Tag
- Dim pPosition = txtSQLCommand.Document.CaretPosition
- txtSQLCommand.Document.InsertSingleLineText(pPosition, Patterns.WrapPatternValue(oPlaceholder.Module, oPlaceholder.Name))
- End Sub
-
- Private Sub RibbonGalleryBarItem2_GalleryItemClick(sender As Object, e As GalleryItemClickEventArgs) Handles GalleryConnection.GalleryItemClick
- Dim oConnection As Connection = e.Item.Tag
- SQLConnection = oConnection.Id
- End Sub
-
- Private Function LoadPlaceholders() As List(Of GalleryItemGroup)
- Dim oPlaceholders = New List(Of GalleryItemGroup)() From {
- Placeholders.GetInternalPlaceholders(),
- Placeholders.GetUserPlaceholders()
- }
-
- Dim oAutomaticAttributes = Placeholders.GetAutomaticPlaceholders(PlaceholdersAutomatic, PlaceholdersAutomaticPrefix)
- If oAutomaticAttributes IsNot Nothing Then
- oPlaceholders.Add(oAutomaticAttributes)
- End If
-
- Dim oManualPlaceholders = Placeholders.GetManualPlaceholders(PlaceholdersManual, PlaceholdersManualPrefix)
- If oManualPlaceholders IsNot Nothing Then
- oPlaceholders.Add(oManualPlaceholders)
- End If
-
- Dim oWindreamPlaceholders = Placeholders.GetWindreamPlaceholders(PlaceholdersWindream)
- If oWindreamPlaceholders IsNot Nothing Then
- oPlaceholders.Add(oWindreamPlaceholders)
- End If
-
- If LoadClipboardPlaceholders Then
- oPlaceholders.Add(Placeholders.GetClipboardPlaceholder)
- End If
-
- Return oPlaceholders
- End Function
-
- Private Function LoadConnections() As GalleryItemGroup
- Try
- Dim oSql = "SELECT GUID, Bezeichnung FROM [DD_ECM].[dbo].[TBDD_CONNECTION] WHERE AKTIV = 1"
- Dim oTable = Database.GetDatatable(oSql)
- Dim oConnections = New List(Of Connection)
-
- For Each oRow As DataRow In oTable.Rows
- oConnections.Add(New Connection() With {
- .Id = oRow.Item("GUID"),
- .Name = oRow.Item("Bezeichnung")})
- Next
-
- Dim oConnectionGroup = New GalleryItemGroup() With {.Caption = "Verbindungen"}
- Dim oItems As New List(Of GalleryItem)
- For Each oConnection In oConnections
- oItems.Add(GetGalleryItem(oConnection))
- Next
- oConnectionGroup.Items.AddRange(oItems.ToArray)
-
- Return oConnectionGroup
- Catch ex As Exception
- Return Nothing
- End Try
- End Function
-
- Private Sub ConfigureRichEditControl()
- txtSQLCommand.Options.Search.RegExResultMaxGuaranteedLength = 500
- txtSQLCommand.ReplaceService(Of ISyntaxHighlightService)(New SQLSyntaxHighlightService(txtSQLCommand.Document))
- txtSQLCommand.ActiveViewType = DevExpress.XtraRichEdit.RichEditViewType.Simple
- txtSQLCommand.Document.Sections(0).Page.Width = DevExpress.Office.Utils.Units.InchesToDocumentsF(80.0F)
-
- txtSQLCommand.Document.DefaultCharacterProperties.FontName = "Courier New"
- txtSQLCommand.Document.DefaultCharacterProperties.FontSize = 12
- End Sub
-
-
- Private Sub ClearPlaceholders()
- GridPlaceholders.DataSource = New List(Of Placeholder)
- End Sub
-
- Private Function GetGalleryItem(pConnection As Connection) As GalleryItem
- Dim oItem = New GalleryItem(Nothing, pConnection.Name, Nothing) With {
- .Tag = pConnection
- }
-
- oItem.ImageOptions.SvgImage = My.Resources.actions_database
-
- Return oItem
- End Function
-
- Private Property LastPatterns As New List(Of Pattern)
-
- Private Sub RichEditControl1_ContentChanged(sender As Object, e As EventArgs) Handles txtSQLCommand.ContentChanged
- Dim oSqlText = txtSQLCommand.Document.Text
- Dim oPatterns = Patterns.GetAllPatterns(oSqlText)
-
- If oPatterns.Count = 0 Then
- GridPlaceholders.DataSource = New List(Of Placeholder)
- ElseIf oPatterns.Count.Equals(LastPatterns.Count) Then
- ' noop
- Else
- Dim oPlaceholders = oPatterns.
- Select(Function(pattern) New Placeholder(pattern.Value, pattern.Value, pattern.Type, pattern.Value) With {.Pattern = pattern}).
- ToList()
- GridPlaceholders.DataSource = oPlaceholders
- End If
-
- LastPatterns = oPatterns
- End Sub
-
- Private Sub BarButtonItem3_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles btnExecuteSQL.ItemClick
- ExecuteSQL()
- End Sub
-
- Private Class Connection
- Public Property Id As Integer
- Public Property Name As String
- End Class
-
- Private Sub ExecuteSQL()
- Try
- ViewPlaceholders.FocusInvalidRow()
-
- Dim oSql = txtSQLCommand.Document.Text
- Dim oPlaceholders As List(Of Placeholder) = GridPlaceholders.DataSource
-
- If oPlaceholders IsNot Nothing Then
- For Each oPlaceholder In oPlaceholders
- Dim oWrapped = Patterns.WrapPatternValue(oPlaceholder.Module, oPlaceholder.Name)
-
- If oPlaceholder.Value Is Nothing Then
- Throw New ApplicationException($"Der Platzhalter '{oWrapped}' wurde nicht ausgefüllt!")
- End If
-
-
- oSql = oSql.Replace(oWrapped, oPlaceholder.Value)
- Next
- End If
-
- Dim oDatatable As DataTable
-
- If SQLConnection > 0 Then
- Dim oConnectionString = Database.GetConnectionStringForId(SQLConnection)
- oDatatable = Database.GetDatatableWithConnection(oSql, oConnectionString)
- Else
- oDatatable = Database.GetDatatable(oSql)
- End If
-
-
- Dim oForm As New frmSQLResult(oDatatable)
- oForm.Show()
-
- Catch ex As ApplicationException
- MsgBox(ex.Message, MsgBoxStyle.Exclamation, Text)
-
- Catch ex As Exception
- MsgBox(ex.Message, MsgBoxStyle.Critical, Text)
- End Try
- End Sub
-
- Private Sub BarCheckItem1_CheckedChanged(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles chkClearPlaceholders.CheckedChanged
- If FormLoading = False Then
- ClearPlaceholdersAfterSuccessfulExecute = chkClearPlaceholders.Checked
- End If
- End Sub
-
- Private Sub btnClearPlaceholders_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles btnClearPlaceholders.ItemClick
- ClearPlaceholders()
- End Sub
-
- Private Sub chkShowPlaceholders_CheckedChanged(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles chkShowPlaceholders.CheckedChanged
- SplitContainerControl1.Collapsed = Not chkShowPlaceholders.Checked
- End Sub
- Private Sub SplitContainerControl1_SplitGroupPanelCollapsed(sender As Object, e As DevExpress.XtraEditors.SplitGroupPanelCollapsedEventArgs) Handles SplitContainerControl1.SplitGroupPanelCollapsed
- chkShowPlaceholders.Checked = Not e.Collapsed
- End Sub
-
- Private Sub btnSave_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles btnSave.ItemClick
- SQLCommand = txtSQLCommand.Text
- Close()
- End Sub
-
- Private Sub frmSQLEditor_KeyDown(sender As Object, e As KeyEventArgs) Handles MyBase.KeyDown
- If e.KeyCode = Keys.F5 Then
- ExecuteSQL()
- End If
- End Sub
-End Class
diff --git a/Controls.SQLEditor/frmSQLEditor_old.Designer.vb b/Controls.SQLEditor/frmSQLEditor_old.Designer.vb
deleted file mode 100644
index 86335469..00000000
--- a/Controls.SQLEditor/frmSQLEditor_old.Designer.vb
+++ /dev/null
@@ -1,660 +0,0 @@
-Imports DigitalData.GUIs.Common.Base
-
-
-Partial Class frmSQLEditor_old
- Inherits BaseRibbonForm
-
- 'Form overrides dispose to clean up the component list.
-
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- MyBase.Dispose(disposing)
- End Sub
-
- 'Required by the Windows Form Designer
- Private components As System.ComponentModel.IContainer
-
- 'NOTE: The following procedure is required by the Windows Form Designer
- 'It can be modified using the Windows Form Designer.
- 'Do not modify it using the code editor.
-
- Private Sub InitializeComponent()
- Me.components = New System.ComponentModel.Container()
- Dim EditorButtonImageOptions1 As DevExpress.XtraEditors.Controls.EditorButtonImageOptions = New DevExpress.XtraEditors.Controls.EditorButtonImageOptions()
- Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSQLEditor_old))
- Dim SerializableAppearanceObject1 As DevExpress.Utils.SerializableAppearanceObject = New DevExpress.Utils.SerializableAppearanceObject()
- Dim SerializableAppearanceObject2 As DevExpress.Utils.SerializableAppearanceObject = New DevExpress.Utils.SerializableAppearanceObject()
- Dim SerializableAppearanceObject3 As DevExpress.Utils.SerializableAppearanceObject = New DevExpress.Utils.SerializableAppearanceObject()
- Dim SerializableAppearanceObject4 As DevExpress.Utils.SerializableAppearanceObject = New DevExpress.Utils.SerializableAppearanceObject()
- Dim EditorButtonImageOptions2 As DevExpress.XtraEditors.Controls.EditorButtonImageOptions = New DevExpress.XtraEditors.Controls.EditorButtonImageOptions()
- Dim SerializableAppearanceObject5 As DevExpress.Utils.SerializableAppearanceObject = New DevExpress.Utils.SerializableAppearanceObject()
- Dim SerializableAppearanceObject6 As DevExpress.Utils.SerializableAppearanceObject = New DevExpress.Utils.SerializableAppearanceObject()
- Dim SerializableAppearanceObject7 As DevExpress.Utils.SerializableAppearanceObject = New DevExpress.Utils.SerializableAppearanceObject()
- Dim SerializableAppearanceObject8 As DevExpress.Utils.SerializableAppearanceObject = New DevExpress.Utils.SerializableAppearanceObject()
- Dim GalleryItemGroup1 As DevExpress.XtraBars.Ribbon.GalleryItemGroup = New DevExpress.XtraBars.Ribbon.GalleryItemGroup()
- Dim GalleryItem1 As DevExpress.XtraBars.Ribbon.GalleryItem = New DevExpress.XtraBars.Ribbon.GalleryItem()
- Dim GalleryItem2 As DevExpress.XtraBars.Ribbon.GalleryItem = New DevExpress.XtraBars.Ribbon.GalleryItem()
- Dim GalleryItem3 As DevExpress.XtraBars.Ribbon.GalleryItem = New DevExpress.XtraBars.Ribbon.GalleryItem()
- Dim GalleryItem4 As DevExpress.XtraBars.Ribbon.GalleryItem = New DevExpress.XtraBars.Ribbon.GalleryItem()
- Dim GalleryItem5 As DevExpress.XtraBars.Ribbon.GalleryItem = New DevExpress.XtraBars.Ribbon.GalleryItem()
- Dim GalleryItem6 As DevExpress.XtraBars.Ribbon.GalleryItem = New DevExpress.XtraBars.Ribbon.GalleryItem()
- Me.RepositoryItemRibbonSearchEdit2 = New DevExpress.XtraBars.Ribbon.Internal.RepositoryItemRibbonSearchEdit()
- Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl()
- Me.GridControlPlaceholders = New DevExpress.XtraGrid.GridControl()
- Me.BindingSourcePlaceholder = New System.Windows.Forms.BindingSource(Me.components)
- Me.GridViewPlaceholder = New DevExpress.XtraGrid.Views.Grid.GridView()
- Me.colPlaceholder = New DevExpress.XtraGrid.Columns.GridColumn()
- Me.colReplacement = New DevExpress.XtraGrid.Columns.GridColumn()
- Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
- Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
- Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
- Me.BarStaticItem1 = New DevExpress.XtraBars.BarStaticItem()
- Me.BarStaticItem2 = New DevExpress.XtraBars.BarStaticItem()
- Me.BarStaticItem3 = New DevExpress.XtraBars.BarStaticItem()
- Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
- Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
- Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
- Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
- Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
- Me.GridControlResult = New DevExpress.XtraGrid.GridControl()
- Me.GridViewResult = New DevExpress.XtraGrid.Views.Grid.GridView()
- Me.txtSQL = New DevExpress.XtraEditors.MemoEdit()
- Me.DropDownButton1 = New DevExpress.XtraEditors.DropDownButton()
- Me.DropDownButton11 = New DevExpress.XtraEditors.DropDownButton()
- Me.RibbonControl11 = New DevExpress.XtraBars.Ribbon.RibbonControl()
- Me.BarButtonItem11 = New DevExpress.XtraBars.BarButtonItem()
- Me.BarButtonItem21 = New DevExpress.XtraBars.BarButtonItem()
- Me.RibbonPage11 = New DevExpress.XtraBars.Ribbon.RibbonPage()
- Me.RibbonPageGroup11 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
- Me.RibbonStatusBar11 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
- Me.DropDownButton2 = New DevExpress.XtraEditors.DropDownButton()
- Me.DropDownButton3 = New DevExpress.XtraEditors.DropDownButton()
- Me.cmbConnections = New DevExpress.XtraEditors.ComboBoxEdit()
- Me.Root = New DevExpress.XtraLayout.LayoutControlGroup()
- Me.LayoutControlItem3 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem4 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.SimpleLabelItem2 = New DevExpress.XtraLayout.SimpleLabelItem()
- Me.LayoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem5 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem6 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem7 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem8 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.SimpleSeparator1 = New DevExpress.XtraLayout.SimpleSeparator()
- Me.SimpleLabelItem1 = New DevExpress.XtraLayout.SimpleLabelItem()
- Me.SimpleSeparator2 = New DevExpress.XtraLayout.SimpleSeparator()
- Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
- Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
- Me.RibbonGalleryBarItem1 = New DevExpress.XtraBars.RibbonGalleryBarItem()
- Me.GalleryDropDown1 = New DevExpress.XtraBars.Ribbon.GalleryDropDown(Me.components)
- Me.GalleryDropDown2 = New DevExpress.XtraBars.Ribbon.GalleryDropDown(Me.components)
- CType(Me.RepositoryItemRibbonSearchEdit2, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.LayoutControl1.SuspendLayout()
- CType(Me.GridControlPlaceholders, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.BindingSourcePlaceholder, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.GridViewPlaceholder, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.GridControlResult, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.GridViewResult, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.txtSQL.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.RibbonControl11, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.cmbConnections.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.Root, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.SimpleLabelItem2, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem8, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.SimpleSeparator1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.SimpleLabelItem1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.SimpleSeparator2, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.GalleryDropDown1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.GalleryDropDown2, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.SuspendLayout()
- '
- 'RepositoryItemRibbonSearchEdit2
- '
- Me.RepositoryItemRibbonSearchEdit2.AllowFocused = False
- Me.RepositoryItemRibbonSearchEdit2.AutoHeight = False
- Me.RepositoryItemRibbonSearchEdit2.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.NoBorder
- EditorButtonImageOptions1.AllowGlyphSkinning = DevExpress.Utils.DefaultBoolean.[True]
- EditorButtonImageOptions1.SvgImage = CType(resources.GetObject("EditorButtonImageOptions1.SvgImage"), DevExpress.Utils.Svg.SvgImage)
- Me.RepositoryItemRibbonSearchEdit2.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Glyph, "", -1, True, True, True, EditorButtonImageOptions1, New DevExpress.Utils.KeyShortcut(System.Windows.Forms.Keys.None), SerializableAppearanceObject1, SerializableAppearanceObject2, SerializableAppearanceObject3, SerializableAppearanceObject4, "", Nothing, Nothing, DevExpress.Utils.ToolTipAnchor.[Default]), New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Clear, "", -1, True, False, False, EditorButtonImageOptions2, New DevExpress.Utils.KeyShortcut(System.Windows.Forms.Keys.None), SerializableAppearanceObject5, SerializableAppearanceObject6, SerializableAppearanceObject7, SerializableAppearanceObject8, "", Nothing, Nothing, DevExpress.Utils.ToolTipAnchor.[Default])})
- Me.RepositoryItemRibbonSearchEdit2.Name = "RepositoryItemRibbonSearchEdit2"
- Me.RepositoryItemRibbonSearchEdit2.NullText = "Search"
- '
- 'LayoutControl1
- '
- Me.LayoutControl1.Controls.Add(Me.GridControlPlaceholders)
- Me.LayoutControl1.Controls.Add(Me.GridControlResult)
- Me.LayoutControl1.Controls.Add(Me.txtSQL)
- Me.LayoutControl1.Controls.Add(Me.DropDownButton1)
- Me.LayoutControl1.Controls.Add(Me.DropDownButton11)
- Me.LayoutControl1.Controls.Add(Me.DropDownButton2)
- Me.LayoutControl1.Controls.Add(Me.DropDownButton3)
- Me.LayoutControl1.Controls.Add(Me.cmbConnections)
- Me.LayoutControl1.Dock = System.Windows.Forms.DockStyle.Fill
- Me.LayoutControl1.Location = New System.Drawing.Point(0, 132)
- Me.LayoutControl1.Name = "LayoutControl1"
- Me.LayoutControl1.Root = Me.Root
- Me.LayoutControl1.Size = New System.Drawing.Size(1283, 536)
- Me.LayoutControl1.TabIndex = 0
- Me.LayoutControl1.Text = "LayoutControl1"
- '
- 'GridControlPlaceholders
- '
- Me.GridControlPlaceholders.DataSource = Me.BindingSourcePlaceholder
- Me.GridControlPlaceholders.Location = New System.Drawing.Point(12, 316)
- Me.GridControlPlaceholders.MainView = Me.GridViewPlaceholder
- Me.GridControlPlaceholders.MenuManager = Me.RibbonControl1
- Me.GridControlPlaceholders.Name = "GridControlPlaceholders"
- Me.GridControlPlaceholders.Size = New System.Drawing.Size(417, 208)
- Me.GridControlPlaceholders.TabIndex = 7
- Me.GridControlPlaceholders.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewPlaceholder})
- '
- 'GridViewPlaceholder
- '
- Me.GridViewPlaceholder.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colPlaceholder, Me.colReplacement})
- Me.GridViewPlaceholder.GridControl = Me.GridControlPlaceholders
- Me.GridViewPlaceholder.Name = "GridViewPlaceholder"
- '
- 'colPlaceholder
- '
- Me.colPlaceholder.Caption = "Platzhalter"
- Me.colPlaceholder.Name = "colPlaceholder"
- Me.colPlaceholder.Visible = True
- Me.colPlaceholder.VisibleIndex = 0
- '
- 'colReplacement
- '
- Me.colReplacement.Caption = "Ersetzung"
- Me.colReplacement.Name = "colReplacement"
- Me.colReplacement.Visible = True
- Me.colReplacement.VisibleIndex = 1
- '
- 'RibbonControl1
- '
- Me.RibbonControl1.ExpandCollapseItem.Id = 0
- Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarStaticItem1, Me.BarStaticItem2, Me.BarStaticItem3, Me.BarButtonItem3, Me.RibbonGalleryBarItem1})
- Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
- Me.RibbonControl1.MaxItemId = 9
- Me.RibbonControl1.Name = "RibbonControl1"
- Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
- Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
- Me.RibbonControl1.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide
- Me.RibbonControl1.ShowToolbarCustomizeItem = False
- Me.RibbonControl1.Size = New System.Drawing.Size(1283, 132)
- Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
- Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
- '
- 'BarButtonItem1
- '
- Me.BarButtonItem1.Caption = "Speichern und schließen"
- Me.BarButtonItem1.Id = 1
- Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
- Me.BarButtonItem1.Name = "BarButtonItem1"
- '
- 'BarButtonItem2
- '
- Me.BarButtonItem2.Caption = "SQL testen"
- Me.BarButtonItem2.Id = 2
- Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
- Me.BarButtonItem2.Name = "BarButtonItem2"
- '
- 'BarStaticItem1
- '
- Me.BarStaticItem1.Caption = "Ergebnis"
- Me.BarStaticItem1.Id = 3
- Me.BarStaticItem1.Name = "BarStaticItem1"
- '
- 'BarStaticItem2
- '
- Me.BarStaticItem2.Caption = "Fehler bei Abfrage"
- Me.BarStaticItem2.Id = 4
- Me.BarStaticItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarStaticItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
- Me.BarStaticItem2.Name = "BarStaticItem2"
- Me.BarStaticItem2.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
- '
- 'BarStaticItem3
- '
- Me.BarStaticItem3.Caption = "Abfrage ausgeführt"
- Me.BarStaticItem3.Id = 5
- Me.BarStaticItem3.ImageOptions.SvgImage = CType(resources.GetObject("BarStaticItem3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
- Me.BarStaticItem3.Name = "BarStaticItem3"
- Me.BarStaticItem3.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
- '
- 'BarButtonItem3
- '
- Me.BarButtonItem3.Caption = "Verbindungen.."
- Me.BarButtonItem3.Id = 7
- Me.BarButtonItem3.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
- Me.BarButtonItem3.Name = "BarButtonItem3"
- '
- 'RibbonPage1
- '
- Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2, Me.RibbonPageGroup3})
- Me.RibbonPage1.Name = "RibbonPage1"
- Me.RibbonPage1.Text = "RibbonPage1"
- '
- 'RibbonPageGroup1
- '
- Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1)
- Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2)
- Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
- Me.RibbonPageGroup1.Text = "RibbonPageGroup1"
- '
- 'RibbonPageGroup2
- '
- Me.RibbonPageGroup2.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far
- Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem3)
- Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
- Me.RibbonPageGroup2.Text = "RibbonPageGroup2"
- '
- 'RibbonStatusBar1
- '
- Me.RibbonStatusBar1.ItemLinks.Add(Me.BarStaticItem1)
- Me.RibbonStatusBar1.ItemLinks.Add(Me.BarStaticItem2)
- Me.RibbonStatusBar1.ItemLinks.Add(Me.BarStaticItem3)
- Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 668)
- Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
- Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
- Me.RibbonStatusBar1.Size = New System.Drawing.Size(1283, 24)
- '
- 'GridControlResult
- '
- Me.GridControlResult.Location = New System.Drawing.Point(433, 316)
- Me.GridControlResult.MainView = Me.GridViewResult
- Me.GridControlResult.MenuManager = Me.RibbonControl1
- Me.GridControlResult.Name = "GridControlResult"
- Me.GridControlResult.Size = New System.Drawing.Size(838, 208)
- Me.GridControlResult.TabIndex = 5
- Me.GridControlResult.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewResult})
- '
- 'GridViewResult
- '
- Me.GridViewResult.GridControl = Me.GridControlResult
- Me.GridViewResult.Name = "GridViewResult"
- '
- 'txtSQL
- '
- Me.txtSQL.Location = New System.Drawing.Point(20, 99)
- Me.txtSQL.MenuManager = Me.RibbonControl1
- Me.txtSQL.Name = "txtSQL"
- Me.txtSQL.Properties.Appearance.Font = New System.Drawing.Font("Consolas", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.txtSQL.Properties.Appearance.Options.UseFont = True
- Me.txtSQL.Size = New System.Drawing.Size(1243, 168)
- Me.txtSQL.StyleController = Me.LayoutControl1
- Me.txtSQL.TabIndex = 4
- '
- 'DropDownButton1
- '
- Me.DropDownButton1.Location = New System.Drawing.Point(853, 12)
- Me.DropDownButton1.MenuManager = Me.RibbonControl1
- Me.DropDownButton1.Name = "DropDownButton1"
- Me.DropDownButton1.Size = New System.Drawing.Size(418, 22)
- Me.DropDownButton1.StyleController = Me.LayoutControl1
- Me.DropDownButton1.TabIndex = 8
- Me.DropDownButton1.Text = "Dokument-Indizies"
- '
- 'DropDownButton11
- '
- Me.DropDownButton11.Location = New System.Drawing.Point(433, 12)
- Me.DropDownButton11.MenuManager = Me.RibbonControl11
- Me.DropDownButton11.Name = "DropDownButton11"
- Me.DropDownButton11.Size = New System.Drawing.Size(416, 22)
- Me.DropDownButton11.StyleController = Me.LayoutControl1
- Me.DropDownButton11.TabIndex = 8
- Me.DropDownButton11.Text = "Controls (zur Laufzeit ausgewertet)"
- '
- 'RibbonControl11
- '
- Me.RibbonControl11.CommandLayout = DevExpress.XtraBars.Ribbon.CommandLayout.Simplified
- Me.RibbonControl11.ExpandCollapseItem.Id = 0
- Me.RibbonControl11.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl11.ExpandCollapseItem, Me.RibbonControl11.SearchEditItem, Me.BarButtonItem11, Me.BarButtonItem21})
- Me.RibbonControl11.Location = New System.Drawing.Point(0, 0)
- Me.RibbonControl11.MaxItemId = 3
- Me.RibbonControl11.Name = "RibbonControl11"
- Me.RibbonControl11.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage11})
- Me.RibbonControl11.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemRibbonSearchEdit2})
- Me.RibbonControl11.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
- Me.RibbonControl11.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide
- Me.RibbonControl11.ShowToolbarCustomizeItem = False
- Me.RibbonControl11.Size = New System.Drawing.Size(1283, 0)
- Me.RibbonControl11.StatusBar = Me.RibbonStatusBar11
- Me.RibbonControl11.Toolbar.ShowCustomizeItem = False
- '
- 'BarButtonItem11
- '
- Me.BarButtonItem11.Caption = "Speichern und schließen"
- Me.BarButtonItem11.Id = 1
- Me.BarButtonItem11.Name = "BarButtonItem11"
- '
- 'BarButtonItem21
- '
- Me.BarButtonItem21.Caption = "SQL testen"
- Me.BarButtonItem21.Id = 2
- Me.BarButtonItem21.Name = "BarButtonItem21"
- '
- 'RibbonPage11
- '
- Me.RibbonPage11.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup11})
- Me.RibbonPage11.Name = "RibbonPage11"
- Me.RibbonPage11.Text = "RibbonPage1"
- '
- 'RibbonPageGroup11
- '
- Me.RibbonPageGroup11.ItemLinks.Add(Me.BarButtonItem11)
- Me.RibbonPageGroup11.ItemLinks.Add(Me.BarButtonItem21)
- Me.RibbonPageGroup11.Name = "RibbonPageGroup11"
- Me.RibbonPageGroup11.Text = "RibbonPageGroup1"
- '
- 'RibbonStatusBar11
- '
- Me.RibbonStatusBar11.Location = New System.Drawing.Point(0, 752)
- Me.RibbonStatusBar11.Name = "RibbonStatusBar11"
- Me.RibbonStatusBar11.Ribbon = Me.RibbonControl11
- Me.RibbonStatusBar11.Size = New System.Drawing.Size(1283, 27)
- '
- 'DropDownButton2
- '
- Me.DropDownButton2.Location = New System.Drawing.Point(853, 38)
- Me.DropDownButton2.MenuManager = Me.RibbonControl1
- Me.DropDownButton2.Name = "DropDownButton2"
- Me.DropDownButton2.Size = New System.Drawing.Size(418, 22)
- Me.DropDownButton2.StyleController = Me.LayoutControl1
- Me.DropDownButton2.TabIndex = 9
- Me.DropDownButton2.Text = "Anwendungsdaten"
- '
- 'DropDownButton3
- '
- Me.DropDownButton3.Location = New System.Drawing.Point(433, 38)
- Me.DropDownButton3.MenuManager = Me.RibbonControl1
- Me.DropDownButton3.Name = "DropDownButton3"
- Me.DropDownButton3.Size = New System.Drawing.Size(416, 22)
- Me.DropDownButton3.StyleController = Me.LayoutControl1
- Me.DropDownButton3.TabIndex = 10
- Me.DropDownButton3.Text = "Umgebungsinformationen"
- '
- 'cmbConnections
- '
- Me.cmbConnections.Location = New System.Drawing.Point(20, 39)
- Me.cmbConnections.MenuManager = Me.RibbonControl1
- Me.cmbConnections.Name = "cmbConnections"
- Me.cmbConnections.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
- Me.cmbConnections.Size = New System.Drawing.Size(401, 20)
- Me.cmbConnections.StyleController = Me.LayoutControl1
- Me.cmbConnections.TabIndex = 6
- '
- 'Root
- '
- Me.Root.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
- Me.Root.GroupBordersVisible = False
- Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem3, Me.LayoutControlItem2, Me.LayoutControlItem4, Me.SimpleLabelItem2, Me.LayoutControlItem1, Me.LayoutControlItem5, Me.LayoutControlItem6, Me.LayoutControlItem7, Me.LayoutControlItem8, Me.SimpleSeparator1, Me.SimpleLabelItem1, Me.SimpleSeparator2})
- Me.Root.Name = "Root"
- Me.Root.Size = New System.Drawing.Size(1283, 536)
- Me.Root.TextVisible = False
- '
- 'LayoutControlItem3
- '
- Me.LayoutControlItem3.Control = Me.cmbConnections
- Me.LayoutControlItem3.ImageOptions.SvgImage = CType(resources.GetObject("LayoutControlItem3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
- Me.LayoutControlItem3.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16)
- Me.LayoutControlItem3.Location = New System.Drawing.Point(0, 0)
- Me.LayoutControlItem3.Name = "LayoutControlItem3"
- Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
- Me.LayoutControlItem3.Size = New System.Drawing.Size(421, 59)
- Me.LayoutControlItem3.Text = "SQL Verbindung"
- Me.LayoutControlItem3.TextLocation = DevExpress.Utils.Locations.Top
- Me.LayoutControlItem3.TextSize = New System.Drawing.Size(97, 16)
- '
- 'LayoutControlItem2
- '
- Me.LayoutControlItem2.Control = Me.GridControlResult
- Me.LayoutControlItem2.Location = New System.Drawing.Point(421, 304)
- Me.LayoutControlItem2.Name = "LayoutControlItem2"
- Me.LayoutControlItem2.Size = New System.Drawing.Size(842, 212)
- Me.LayoutControlItem2.TextSize = New System.Drawing.Size(0, 0)
- Me.LayoutControlItem2.TextVisible = False
- '
- 'LayoutControlItem4
- '
- Me.LayoutControlItem4.Control = Me.GridControlPlaceholders
- Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 304)
- Me.LayoutControlItem4.Name = "LayoutControlItem4"
- Me.LayoutControlItem4.Size = New System.Drawing.Size(421, 212)
- Me.LayoutControlItem4.TextSize = New System.Drawing.Size(0, 0)
- Me.LayoutControlItem4.TextVisible = False
- '
- 'SimpleLabelItem2
- '
- Me.SimpleLabelItem2.AllowHotTrack = False
- Me.SimpleLabelItem2.ImageOptions.SvgImage = CType(resources.GetObject("SimpleLabelItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
- Me.SimpleLabelItem2.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16)
- Me.SimpleLabelItem2.Location = New System.Drawing.Point(421, 268)
- Me.SimpleLabelItem2.Name = "SimpleLabelItem2"
- Me.SimpleLabelItem2.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
- Me.SimpleLabelItem2.Size = New System.Drawing.Size(842, 36)
- Me.SimpleLabelItem2.Text = "Ergebnis"
- Me.SimpleLabelItem2.TextSize = New System.Drawing.Size(97, 16)
- '
- 'LayoutControlItem1
- '
- Me.LayoutControlItem1.Control = Me.txtSQL
- Me.LayoutControlItem1.ImageOptions.SvgImage = CType(resources.GetObject("LayoutControlItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
- Me.LayoutControlItem1.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16)
- Me.LayoutControlItem1.Location = New System.Drawing.Point(0, 60)
- Me.LayoutControlItem1.Name = "LayoutControlItem1"
- Me.LayoutControlItem1.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
- Me.LayoutControlItem1.Size = New System.Drawing.Size(1263, 207)
- Me.LayoutControlItem1.Text = "SQL Abfrage"
- Me.LayoutControlItem1.TextLocation = DevExpress.Utils.Locations.Top
- Me.LayoutControlItem1.TextSize = New System.Drawing.Size(97, 16)
- '
- 'LayoutControlItem5
- '
- Me.LayoutControlItem5.Control = Me.DropDownButton1
- Me.LayoutControlItem5.Location = New System.Drawing.Point(841, 0)
- Me.LayoutControlItem5.Name = "LayoutControlItem5"
- Me.LayoutControlItem5.Size = New System.Drawing.Size(422, 26)
- Me.LayoutControlItem5.TextSize = New System.Drawing.Size(0, 0)
- Me.LayoutControlItem5.TextVisible = False
- '
- 'LayoutControlItem6
- '
- Me.LayoutControlItem6.Control = Me.DropDownButton11
- Me.LayoutControlItem6.ControlAlignment = System.Drawing.ContentAlignment.TopLeft
- Me.LayoutControlItem6.CustomizationFormText = "LayoutControlItem5"
- Me.LayoutControlItem6.Location = New System.Drawing.Point(421, 0)
- Me.LayoutControlItem6.Name = "LayoutControlItem6"
- Me.LayoutControlItem6.Size = New System.Drawing.Size(420, 26)
- Me.LayoutControlItem6.Text = "LayoutControlItem5"
- Me.LayoutControlItem6.TextSize = New System.Drawing.Size(0, 0)
- Me.LayoutControlItem6.TextVisible = False
- '
- 'LayoutControlItem7
- '
- Me.LayoutControlItem7.Control = Me.DropDownButton2
- Me.LayoutControlItem7.Location = New System.Drawing.Point(841, 26)
- Me.LayoutControlItem7.Name = "LayoutControlItem7"
- Me.LayoutControlItem7.Size = New System.Drawing.Size(422, 33)
- Me.LayoutControlItem7.TextSize = New System.Drawing.Size(0, 0)
- Me.LayoutControlItem7.TextVisible = False
- '
- 'LayoutControlItem8
- '
- Me.LayoutControlItem8.Control = Me.DropDownButton3
- Me.LayoutControlItem8.Location = New System.Drawing.Point(421, 26)
- Me.LayoutControlItem8.Name = "LayoutControlItem8"
- Me.LayoutControlItem8.Size = New System.Drawing.Size(420, 33)
- Me.LayoutControlItem8.TextSize = New System.Drawing.Size(0, 0)
- Me.LayoutControlItem8.TextVisible = False
- '
- 'SimpleSeparator1
- '
- Me.SimpleSeparator1.AllowHotTrack = False
- Me.SimpleSeparator1.Location = New System.Drawing.Point(0, 267)
- Me.SimpleSeparator1.Name = "SimpleSeparator1"
- Me.SimpleSeparator1.Size = New System.Drawing.Size(1263, 1)
- '
- 'SimpleLabelItem1
- '
- Me.SimpleLabelItem1.AllowHotTrack = False
- Me.SimpleLabelItem1.ImageOptions.SvgImage = CType(resources.GetObject("SimpleLabelItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
- Me.SimpleLabelItem1.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16)
- Me.SimpleLabelItem1.Location = New System.Drawing.Point(0, 268)
- Me.SimpleLabelItem1.Name = "SimpleLabelItem1"
- Me.SimpleLabelItem1.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
- Me.SimpleLabelItem1.Size = New System.Drawing.Size(421, 36)
- Me.SimpleLabelItem1.Text = "Platzhalter"
- Me.SimpleLabelItem1.TextSize = New System.Drawing.Size(97, 16)
- '
- 'SimpleSeparator2
- '
- Me.SimpleSeparator2.AllowHotTrack = False
- Me.SimpleSeparator2.Location = New System.Drawing.Point(0, 59)
- Me.SimpleSeparator2.Name = "SimpleSeparator2"
- Me.SimpleSeparator2.Size = New System.Drawing.Size(1263, 1)
- '
- 'RibbonPage2
- '
- Me.RibbonPage2.Name = "RibbonPage2"
- Me.RibbonPage2.Text = "RibbonPage2"
- '
- 'RibbonPageGroup3
- '
- Me.RibbonPageGroup3.ItemLinks.Add(Me.RibbonGalleryBarItem1)
- Me.RibbonPageGroup3.Name = "RibbonPageGroup3"
- Me.RibbonPageGroup3.Text = "RibbonPageGroup3"
- '
- 'RibbonGalleryBarItem1
- '
- Me.RibbonGalleryBarItem1.Caption = "RibbonGalleryBarItem1"
- Me.RibbonGalleryBarItem1.GalleryDropDown = Me.GalleryDropDown1
- Me.RibbonGalleryBarItem1.Id = 8
- Me.RibbonGalleryBarItem1.Name = "RibbonGalleryBarItem1"
- '
- 'GalleryDropDown1
- '
- Me.GalleryDropDown1.Name = "GalleryDropDown1"
- Me.GalleryDropDown1.Ribbon = Me.RibbonControl1
- '
- 'GalleryDropDown2
- '
- '
- '
- '
- GalleryItemGroup1.Caption = "Group1"
- GalleryItem1.Caption = "Item1"
- GalleryItem2.Caption = "Item2"
- GalleryItem3.Caption = "Item3"
- GalleryItem4.Caption = "Item4"
- GalleryItem5.Caption = "Item5"
- GalleryItem6.Caption = "Item6"
- GalleryItemGroup1.Items.AddRange(New DevExpress.XtraBars.Ribbon.GalleryItem() {GalleryItem1, GalleryItem2, GalleryItem3, GalleryItem4, GalleryItem5, GalleryItem6})
- Me.GalleryDropDown2.Gallery.Groups.AddRange(New DevExpress.XtraBars.Ribbon.GalleryItemGroup() {GalleryItemGroup1})
- Me.GalleryDropDown2.Name = "GalleryDropDown2"
- Me.GalleryDropDown2.Ribbon = Me.RibbonControl1
- '
- 'frmSQLEditor
- '
- Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.ClientSize = New System.Drawing.Size(1283, 692)
- Me.Controls.Add(Me.LayoutControl1)
- Me.Controls.Add(Me.RibbonStatusBar1)
- Me.Controls.Add(Me.RibbonControl1)
- Me.IconOptions.SvgImage = CType(resources.GetObject("frmSQLEditor.IconOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
- Me.Name = "frmSQLEditor"
- Me.Ribbon = Me.RibbonControl1
- Me.StatusBar = Me.RibbonStatusBar1
- Me.Text = "SQL Editor"
- CType(Me.RepositoryItemRibbonSearchEdit2, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
- Me.LayoutControl1.ResumeLayout(False)
- CType(Me.GridControlPlaceholders, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.BindingSourcePlaceholder, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.GridViewPlaceholder, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.GridControlResult, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.GridViewResult, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.txtSQL.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.RibbonControl11, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.cmbConnections.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.Root, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.SimpleLabelItem2, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem8, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.SimpleSeparator1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.SimpleLabelItem1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.SimpleSeparator2, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.GalleryDropDown1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.GalleryDropDown2, System.ComponentModel.ISupportInitialize).EndInit()
- Me.ResumeLayout(False)
- Me.PerformLayout()
-
- End Sub
-
- Friend WithEvents LayoutControl1 As DevExpress.XtraLayout.LayoutControl
- Friend WithEvents Root As DevExpress.XtraLayout.LayoutControlGroup
- Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
- Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
- Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
- Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
- Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
- Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents GridControlResult As DevExpress.XtraGrid.GridControl
- Friend WithEvents GridViewResult As DevExpress.XtraGrid.Views.Grid.GridView
- Friend WithEvents txtSQL As DevExpress.XtraEditors.MemoEdit
- Friend WithEvents LayoutControlItem1 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents LayoutControlItem2 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents LayoutControlItem3 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents GridControlPlaceholders As DevExpress.XtraGrid.GridControl
- Friend WithEvents GridViewPlaceholder As DevExpress.XtraGrid.Views.Grid.GridView
- Friend WithEvents DropDownButton1 As DevExpress.XtraEditors.DropDownButton
- Friend WithEvents LayoutControlItem4 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents SimpleLabelItem2 As DevExpress.XtraLayout.SimpleLabelItem
- Friend WithEvents SimpleLabelItem1 As DevExpress.XtraLayout.SimpleLabelItem
- Friend WithEvents LayoutControlItem5 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents DropDownButton11 As DevExpress.XtraEditors.DropDownButton
- Friend WithEvents RibbonControl11 As DevExpress.XtraBars.Ribbon.RibbonControl
- Friend WithEvents BarButtonItem11 As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents BarButtonItem21 As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents RibbonPage11 As DevExpress.XtraBars.Ribbon.RibbonPage
- Friend WithEvents RibbonPageGroup11 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
- Friend WithEvents RibbonStatusBar11 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
- Friend WithEvents DropDownButton2 As DevExpress.XtraEditors.DropDownButton
- Friend WithEvents DropDownButton3 As DevExpress.XtraEditors.DropDownButton
- Friend WithEvents LayoutControlItem6 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents LayoutControlItem7 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents LayoutControlItem8 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents RepositoryItemRibbonSearchEdit2 As DevExpress.XtraBars.Ribbon.Internal.RepositoryItemRibbonSearchEdit
- Friend WithEvents colPlaceholder As DevExpress.XtraGrid.Columns.GridColumn
- Friend WithEvents colReplacement As DevExpress.XtraGrid.Columns.GridColumn
- Friend WithEvents BarStaticItem1 As DevExpress.XtraBars.BarStaticItem
- Friend WithEvents BarStaticItem2 As DevExpress.XtraBars.BarStaticItem
- Friend WithEvents BarStaticItem3 As DevExpress.XtraBars.BarStaticItem
- Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem
- Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
- Friend WithEvents BindingSourcePlaceholder As BindingSource
- Friend WithEvents SimpleSeparator1 As DevExpress.XtraLayout.SimpleSeparator
- Friend WithEvents SimpleSeparator2 As DevExpress.XtraLayout.SimpleSeparator
- Friend WithEvents cmbConnections As DevExpress.XtraEditors.ComboBoxEdit
- Friend WithEvents RibbonGalleryBarItem1 As DevExpress.XtraBars.RibbonGalleryBarItem
- Friend WithEvents GalleryDropDown1 As DevExpress.XtraBars.Ribbon.GalleryDropDown
- Friend WithEvents RibbonPageGroup3 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
- Friend WithEvents GalleryDropDown2 As DevExpress.XtraBars.Ribbon.GalleryDropDown
-End Class
diff --git a/Controls.SQLEditor/frmSQLEditor_old.resx b/Controls.SQLEditor/frmSQLEditor_old.resx
deleted file mode 100644
index 3be68a32..00000000
--- a/Controls.SQLEditor/frmSQLEditor_old.resx
+++ /dev/null
@@ -1,373 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAFUCAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAxNiAxNiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBzdHlsZT0iZW5hYmxlLWJhY2tncm91bmQ6bmV3IDAgMCAxNiAxNiI+DQogIDxz
- dHlsZSB0eXBlPSJ0ZXh0L2NzcyI+CgkuTWFza3tmaWxsOiM3MDcwNzA7fQoJLnN0MHtvcGFjaXR5OjAu
- NTt9Cjwvc3R5bGU+DQogIDxnIGlkPSJJbnNpZGVfQm9yZGVyIj4NCiAgICA8cGF0aCBkPSJNOS41LDJD
- NywyLDUsNCw1LDYuNWMwLDEsMC4zLDEuOSwwLjksMi42bC00LjQsNC40bDEsMWw0LjQtNC40QzcuNiwx
- MC43LDguNSwxMSw5LjUsMTFDMTIsMTEsMTQsOSwxNCw2LjUgICBTMTIsMiw5LjUsMnogTTkuNSwxMEM3
- LjYsMTAsNiw4LjQsNiw2LjVTNy42LDMsOS41LDNTMTMsNC42LDEzLDYuNVMxMS40LDEwLDkuNSwxMHoi
- IGNsYXNzPSJNYXNrIiAvPg0KICA8L2c+DQogIDxnIGlkPSJMYXllcl8yIiAvPg0KPC9zdmc+Cw==
-
-
-
- 17, 17
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAACQCAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z
- ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5CbGFja3tmaWxsOiM3MjcyNzI7fQoJLkdyZWVue2ZpbGw6IzAz
- OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9Cgkuc3Qwe29wYWNpdHk6MC43NTt9Cgkuc3Qxe29wYWNp
- dHk6MC41O30KPC9zdHlsZT4NCiAgPGcgaWQ9IkNoZWNrIj4NCiAgICA8cG9seWdvbiBwb2ludHM9IjI3
- LDUgMTEsMjEgNSwxNSAyLDE4IDExLDI3IDMwLDggICIgY2xhc3M9IkdyZWVuIiAvPg0KICA8L2c+DQo8
- L3N2Zz4L
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAFoEAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
- LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD
- MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
- Y2l0eTowLjU7fQo8L3N0eWxlPg0KICA8ZyBpZD0iVXBkYXRlRGF0YUV4dHJhY3QiPg0KICAgIDxwYXRo
- IGQ9Ik00LDEwVjZjMC0yLjIsNC41LTQsMTAtNHMxMCwxLjgsMTAsNHY0YzAsMi4yLTQuNSw0LTEwLDRT
- NCwxMi4yLDQsMTB6IE0xNCwyMGMwLjUsMCwxLjEsMCwxLjYtMC4xICAgYzEuNi0yLjQsNC4zLTMuOSw3
- LjQtMy45YzAuMywwLDAuNywwLDEsMC4xYzAsMCwwLDAsMC0wLjF2LTRjMCwyLjItNC41LDQtMTAsNFM0
- LDE0LjIsNCwxMnY0QzQsMTguMiw4LjUsMjAsMTQsMjB6IE0xNCwyNEwxNCwyNCAgIGMwLjEtMC43LDAu
- My0xLjQsMC41LTJjLTAuMiwwLTAuNCwwLTAuNSwwYy01LjUsMC0xMC0xLjgtMTAtNHY0YzAsMi4yLDQu
- NSw0LDEwLDRWMjR6IiBjbGFzcz0iWWVsbG93IiAvPg0KICAgIDxwYXRoIGQ9Ik0zMCwxOHY2aC0wLjFI
- MjRsMi41LTIuNUMyNS42LDIwLjYsMjQuNCwyMCwyMywyMGMtMi40LDAtNC40LDEuNy00LjksNGgtMmMw
- LjUtMy40LDMuNC02LDYuOS02ICAgYzEuOSwwLDMuNywwLjgsNC45LDIuMUwzMCwxOHogTTIzLDMwYy0x
- LjQsMC0yLjYtMC42LTMuNS0xLjVMMjIsMjZoLTUuOUgxNnY2bDIuMS0yLjFjMS4zLDEuMywzLDIuMSw0
- LjksMi4xYzMuNSwwLDYuNC0yLjYsNi45LTYgICBoLTJDMjcuNCwyOC4zLDI1LjQsMzAsMjMsMzB6IiBj
- bGFzcz0iR3JlZW4iIC8+DQogIDwvZz4NCjwvc3ZnPgs=
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAABIDAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
- LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD
- MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
- Y2l0eTowLjU7fQoJLnN0MXtkaXNwbGF5Om5vbmU7fQoJLnN0MntkaXNwbGF5OmlubGluZTtmaWxsOiMw
- MzlDMjM7fQoJLnN0M3tkaXNwbGF5OmlubGluZTtmaWxsOiNEMTFDMUM7fQoJLnN0NHtkaXNwbGF5Omlu
- bGluZTtmaWxsOiM3MjcyNzI7fQo8L3N0eWxlPg0KICA8ZyBpZD0iSGlnaEltcG9ydGFuY2UiPg0KICAg
- IDxwYXRoIGQ9Ik0xNiwyQzguMywyLDIsOC4zLDIsMTZzNi4zLDE0LDE0LDE0czE0LTYuMywxNC0xNFMy
- My43LDIsMTYsMnogTTE2LDI0Yy0xLjEsMC0yLTAuOS0yLTJzMC45LTIsMi0yczIsMC45LDIsMiAgIFMx
- Ny4xLDI0LDE2LDI0eiBNMTgsMThoLTRWOGg0VjE4eiIgY2xhc3M9IlJlZCIgLz4NCiAgPC9nPg0KPC9z
- dmc+Cw==
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAHICAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z
- ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5CbGFja3tmaWxsOiM3MjcyNzI7fQoJLkdyZWVue2ZpbGw6IzAz
- OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9Cgkuc3Qwe29wYWNpdHk6MC43NTt9Cgkuc3Qxe29wYWNp
- dHk6MC41O30KPC9zdHlsZT4NCiAgPGcgaWQ9IkNoZWNrQ2lyY2xlZCI+DQogICAgPHBhdGggZD0iTTE2
- LDRDOS40LDQsNCw5LjQsNCwxNmMwLDYuNiw1LjQsMTIsMTIsMTJzMTItNS40LDEyLTEyQzI4LDkuNCwy
- Mi42LDQsMTYsNHogTTE0LDIybC02LTZsMi0ybDQsNGw4LThsMiwyICAgTDE0LDIyeiIgY2xhc3M9Ikdy
- ZWVuIiAvPg0KICA8L2c+DQo8L3N2Zz4L
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAAoEAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
- LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuQmx1ZXtmaWxsOiMxMTc3
- RDc7fQoJLldoaXRle2ZpbGw6I0ZGRkZGRjt9CgkuR3JlZW57ZmlsbDojMDM5QzIzO30KCS5zdDB7b3Bh
- Y2l0eTowLjc1O30KCS5zdDF7b3BhY2l0eTowLjU7fQoJLnN0MntvcGFjaXR5OjAuMjU7fQoJLnN0M3tm
- aWxsOiNGRkIxMTU7fQo8L3N0eWxlPg0KICA8ZyAvPg0KICA8ZyBpZD0iRWRpdENvbm5lY3Rpb24iPg0K
- ICAgIDxwYXRoIGQ9Ik0xOCwyNS45QzE3LjQsMjYsMTYuNywyNiwxNiwyNnMtMS40LDAtMi0wLjFWMjho
- LTR2NGg0aDRoNHYtNGgtNFYyNS45eiIgY2xhc3M9IkdyZWVuIiAvPg0KICAgIDxwYXRoIGQ9Ik02LDEw
- VjZjMC0yLjIsNC41LTQsMTAtNHMxMCwxLjgsMTAsNHY0YzAsMi4yLTQuNSw0LTEwLDRTNiwxMi4yLDYs
- MTB6IE0xNiwxNmMtNS41LDAtMTAtMS44LTEwLTR2NCAgIGMwLDIuMiw0LjUsNCwxMCw0czEwLTEuOCwx
- MC00di00QzI2LDE0LjIsMjEuNSwxNiwxNiwxNnogTTE2LDIyYy01LjUsMC0xMC0xLjgtMTAtNHY0YzAs
- Mi4yLDQuNSw0LDEwLDRzMTAtMS44LDEwLTR2LTQgICBDMjYsMjAuMiwyMS41LDIyLDE2LDIyeiIgY2xh
- c3M9IlllbGxvdyIgLz4NCiAgICA8ZyBjbGFzcz0ic3QxIj4NCiAgICAgIDxwYXRoIGQ9Ik0xMCwzMkgy
- di00aDhWMzJ6IE0zMCwyOGgtOHY0aDhWMjh6IiBjbGFzcz0iQmxhY2siIC8+DQogICAgPC9nPg0KICA8
- L2c+DQo8L3N2Zz4L
-
-
-
- 211, 17
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAAoEAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
- LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuQmx1ZXtmaWxsOiMxMTc3
- RDc7fQoJLldoaXRle2ZpbGw6I0ZGRkZGRjt9CgkuR3JlZW57ZmlsbDojMDM5QzIzO30KCS5zdDB7b3Bh
- Y2l0eTowLjc1O30KCS5zdDF7b3BhY2l0eTowLjU7fQoJLnN0MntvcGFjaXR5OjAuMjU7fQoJLnN0M3tm
- aWxsOiNGRkIxMTU7fQo8L3N0eWxlPg0KICA8ZyAvPg0KICA8ZyBpZD0iRWRpdENvbm5lY3Rpb24iPg0K
- ICAgIDxwYXRoIGQ9Ik0xOCwyNS45QzE3LjQsMjYsMTYuNywyNiwxNiwyNnMtMS40LDAtMi0wLjFWMjho
- LTR2NGg0aDRoNHYtNGgtNFYyNS45eiIgY2xhc3M9IkdyZWVuIiAvPg0KICAgIDxwYXRoIGQ9Ik02LDEw
- VjZjMC0yLjIsNC41LTQsMTAtNHMxMCwxLjgsMTAsNHY0YzAsMi4yLTQuNSw0LTEwLDRTNiwxMi4yLDYs
- MTB6IE0xNiwxNmMtNS41LDAtMTAtMS44LTEwLTR2NCAgIGMwLDIuMiw0LjUsNCwxMCw0czEwLTEuOCwx
- MC00di00QzI2LDE0LjIsMjEuNSwxNiwxNiwxNnogTTE2LDIyYy01LjUsMC0xMC0xLjgtMTAtNHY0YzAs
- Mi4yLDQuNSw0LDEwLDRzMTAtMS44LDEwLTR2LTQgICBDMjYsMjAuMiwyMS41LDIyLDE2LDIyeiIgY2xh
- c3M9IlllbGxvdyIgLz4NCiAgICA8ZyBjbGFzcz0ic3QxIj4NCiAgICAgIDxwYXRoIGQ9Ik0xMCwzMkgy
- di00aDhWMzJ6IE0zMCwyOGgtOHY0aDhWMjh6IiBjbGFzcz0iQmxhY2siIC8+DQogICAgPC9nPg0KICA8
- L2c+DQo8L3N2Zz4L
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGYCAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iRmllbGRfSGVhZGVycyIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5l
- dyAwIDAgMzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3
- O30KCS5CbGFja3tmaWxsOiM3MjcyNzI7fQoJLnN0MHtvcGFjaXR5OjAuNTt9Cjwvc3R5bGU+DQogIDxn
- IGNsYXNzPSJzdDAiPg0KICAgIDxwYXRoIGQ9Ik0yMCwxOGgtOHYtNmg4VjE4eiBNMzAsMTJoLTh2Nmg4
- VjEyeiBNMjAsMjBoLTh2Nmg4VjIweiBNMTAsMjBIMnY2aDhWMjB6IE0zMCwyMGgtOHY2aDhWMjB6IiBj
- bGFzcz0iQmxhY2siIC8+DQogIDwvZz4NCiAgPHBhdGggZD0iTTEyLDR2NmgxOFY0SDEyeiBNMTYsOGwt
- Mi0yaDRMMTYsOHogTTIsMTJ2Nmg4di02SDJ6IE02LDE2bC0yLTJoNEw2LDE2eiIgY2xhc3M9IkJsdWUi
- IC8+DQo8L3N2Zz4L
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAJkDAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
- LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuQmx1ZXtmaWxsOiMxMTc3
- RDc7fQoJLldoaXRle2ZpbGw6I0ZGRkZGRjt9CgkuR3JlZW57ZmlsbDojMDM5QzIzO30KCS5zdDB7b3Bh
- Y2l0eTowLjc1O30KCS5zdDF7b3BhY2l0eTowLjU7fQoJLnN0MntvcGFjaXR5OjAuMjU7fQoJLnN0M3tm
- aWxsOiNGRkIxMTU7fQo8L3N0eWxlPg0KICA8ZyAvPg0KICA8ZyBpZD0iRmlsdGVyUXVlcnkiPg0KICAg
- IDxwYXRoIGQ9Ik04LDEwSDB2Nmg4VjEweiBNOCwySDB2Nmg4VjJ6IE0xOCwyaC04djZoOFYyeiBNMTgs
- MTBoLTh2Nmg4VjEweiIgY2xhc3M9IkdyZWVuIiAvPg0KICAgIDxnIGNsYXNzPSJzdDEiPg0KICAgICAg
- PHBhdGggZD0iTTI4LDE2aC04di02aDhWMTZ6IE0yOCwyaC04djZoOFYyeiBNMCwyNGg4di02SDBWMjR6
- IE0xNC4zLDIxLjFjLTAuMi0wLjItMC4zLTAuNC0wLjMtMC43VjE4aC00djZoNy4yICAgIEwxNC4zLDIx
- LjF6IiBjbGFzcz0iQmxhY2siIC8+DQogICAgPC9nPg0KICAgIDxwb2x5Z29uIHBvaW50cz0iMTYsMTgg
- MzIsMTggMzIsMjAgMjYsMjYgMjYsMzIgMjIsMzIgMjIsMjYgMTYsMjAgICIgY2xhc3M9IlllbGxvdyIg
- Lz4NCiAgPC9nPg0KPC9zdmc+Cw==
-
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAPcEAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
- LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuQmx1ZXtmaWxsOiMxMTc3
- RDc7fQoJLldoaXRle2ZpbGw6I0ZGRkZGRjt9CgkuR3JlZW57ZmlsbDojMDM5QzIzO30KCS5zdDB7b3Bh
- Y2l0eTowLjc1O30KCS5zdDF7b3BhY2l0eTowLjU7fQoJLnN0MntvcGFjaXR5OjAuMjU7fQoJLnN0M3tm
- aWxsOiNGRkIxMTU7fQo8L3N0eWxlPg0KICA8ZyAvPg0KICA8ZyBpZD0iVGl0bGVfMV8iPg0KICAgIDxw
- YXRoIGQ9Ik0yOSwxNEgxYy0wLjUsMC0xLDAuNS0xLDF2MTJjMCwwLjUsMC41LDEsMSwxaDI4YzAuNSww
- LDEtMC41LDEtMVYxNUMzMCwxNC41LDI5LjUsMTQsMjksMTR6ICAgIE0yOCwyNkgyVjE2aDI2VjI2eiBN
- MjIuOSwxMS4yQzIzLjcsMTAuNiwyNCwxMCwyNCw5YzAtMC42LTAuMi0xLjItMC43LTEuNmMtMC41LTAu
- NC0xLjEtMC43LTEuOC0wLjhjMC42LTAuMiwxLjEtMC41LDEuNS0wLjkgICBjMC40LTAuNCwwLjYtMC45
- LDAuNi0xLjRjMC0wLjctMC4zLTEuMy0wLjktMS43QzIyLjEsMi4yLDIxLjEsMiwxOS45LDJIMTZ2OS45
- VjEyaDRDMjEuMiwxMiwyMi4zLDExLjgsMjIuOSwxMS4yeiBNMTguNCwzLjdoMC45ICAgYzEuMSwwLDEu
- NywwLjQsMS43LDEuMWMwLDAuNC0wLjEsMC43LTAuNCwwLjlDMjAuNCw1LjksMjAsNiwxOS41LDZoLTEu
- MVYzLjd6IE0xOC40LDEwLjJWNy42aDEuM2MwLjUsMCwwLjksMC4xLDEuMywwLjMgICBjMC4zLDAuMiww
- LjUsMC42LDAuNSwwLjljMCwwLjQtMC4xLDAuNy0wLjUsMWMtMC4zLDAuMi0wLjgsMC40LTEuMywwLjRI
- MTguNHogTTguOSw5LjhoMy4ybDAuNiwyLjNIMTVMMTEuOCwySDkuNEw2LjEsMTJoMi4yICAgTDguOSw5
- Ljh6IE0xMC40LDQuN2MwLjEtMC4zLDAuMS0wLjYsMC4xLTAuOWgwLjFjMCwwLjMsMC4xLDAuNiwwLjEs
- MC45bDEsMy4zSDkuNEwxMC40LDQuN3oiIGlkPSJUaXRsZSIgY2xhc3M9IkJsYWNrIiAvPg0KICA8L2c+
- DQo8L3N2Zz4L
-
-
-
- 366, 17
-
-
-
- AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
- LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
- dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOwDAAAC77u/
- PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
- IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
- MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
- Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
- MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkdyZWVue2ZpbGw6IzAzOUMyMzt9Cgku
- QmxhY2t7ZmlsbDojNzI3MjcyO30KCS5SZWR7ZmlsbDojRDExQzFDO30KCS5ZZWxsb3d7ZmlsbDojRkZC
- MTE1O30KCS5CbHVle2ZpbGw6IzExNzdENzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
- Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQo8L3N0eWxlPg0KICA8ZyBpZD0iRWRpdERhdGFT
- b3VyY2UiPg0KICAgIDxwYXRoIGQ9Ik00LDEwVjZjMC0yLjIsNC41LTQsMTAtNHMxMCwxLjgsMTAsNHY0
- YzAsMi4yLTQuNSw0LTEwLDRTNCwxMi4yLDQsMTB6IE0yNCwxOEwyNCwxOEMyNCwxOCwyNCwxOCwyNCwx
- OCAgIEMyNCwxOCwyNCwxOCwyNCwxOHogTTE0LDIwYzUuNSwwLDEwLTEuOCwxMC00di00YzAsMi4yLTQu
- NSw0LTEwLDRTNCwxNC4yLDQsMTJ2NEM0LDE4LjIsOC41LDIwLDE0LDIweiBNMTUuMiwyNmw0LjgtNC44
- ICAgYy0xLjcsMC41LTMuNywwLjgtNiwwLjhjLTUuNSwwLTEwLTEuOC0xMC00djRjMCwyLjIsNC41LDQs
- MTAsNEMxNC40LDI2LDE0LjgsMjYsMTUuMiwyNnoiIGNsYXNzPSJZZWxsb3ciIC8+DQogICAgPHBhdGgg
- ZD0iTTI5LDIzbC04LDhsLTQtNGw4LThMMjksMjN6IE0zMCwyMmwxLjctMS43YzAuNC0wLjQsMC40LTEs
- MC0xLjNMMjksMTYuM2MtMC40LTAuNC0xLTAuNC0xLjMsMEwyNiwxOEwzMCwyMnogICAgTTE2LDI4djRo
- NEwxNiwyOHoiIGNsYXNzPSJCbHVlIiAvPg0KICA8L2c+DQo8L3N2Zz4L
-
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/frmSQLEditor_old.vb b/Controls.SQLEditor/frmSQLEditor_old.vb
deleted file mode 100644
index 3f278974..00000000
--- a/Controls.SQLEditor/frmSQLEditor_old.vb
+++ /dev/null
@@ -1,146 +0,0 @@
-Imports DigitalData.Modules.Database
-Imports DigitalData.Modules.Logging
-Imports DigitalData.Modules.Patterns
-Imports DigitalData.Modules.Language.Utils
-Imports DigitalData.GUIs.Common
-Imports DevExpress.XtraGrid.Views.Grid
-
-Public Class frmSQLEditor_old
- Public SQLString As String
-
- Private LogConfig As LogConfig
- Private SQLServer As MSSQLServer
- Private CurrentPosition As String
-
- Private Placeholders As New List(Of Placeholder)
- Private Connections As New List(Of Connection)
-
- Private Patterns As ClassPatterns
-
- Friend Class Placeholder
- Public Property Placeholder As String
- Public Property Replacement As String
- End Class
-
- Friend Class Connection
- Public Property Guid As Integer
- Public Property Name As String
- Public Property Description As String
- Public Property Provider As String
- Public Property Server As String
- Public Property Database As String
- Public Property Username As String
- Public Property Password As String
-
- Public Overrides Function ToString() As String
- Return Name
- End Function
- End Class
-
- Public Sub New(LogConfig As LogConfig, SQLServer As MSSQLServer)
- InitializeComponent()
-
- Me.LogConfig = LogConfig
- Me.SQLServer = SQLServer
- Patterns = New ClassPatterns(LogConfig)
- End Sub
-
- Private Sub frmSQLEditor_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- Try
- InitializeBaseForm(LogConfig)
-
- txtSQL.Text = SQLString
-
- BindingSourcePlaceholder.DataSource = Placeholders
- Placeholders.Clear()
-
- Connections = Load_SQLConnections()
-
- Dim oViews As New List(Of GridView) From {GridViewResult, GridViewPlaceholder}
- Dim oGridBuilder As New GridBuilder(oViews)
- oGridBuilder.
- WithDefaults().
- WithReadOnlyOptions(GridViewResult)
-
- cmbConnections.Properties.Items.Clear()
- For Each oConnection In Connections
- cmbConnections.Properties.Items.Add(oConnection)
- Next
- Catch ex As Exception
- ShowErrorMessage(ex)
- End Try
- End Sub
-
- Private Function Load_SQLConnections()
- Try
- Dim oSQL As String = "SELECT * FROM TBDD_CONNECTION"
- Dim oTable As DataTable = SQLServer.GetDatatable(oSQL)
- Dim oConnections As New List(Of Connection)
-
- For Each oRow As DataRow In oTable.Rows
- oConnections.Add(New Connection With {
- .Guid = NotNull(oRow.Item("GUID"), String.Empty),
- .Name = NotNull(oRow.Item("BEZEICHNUNG"), String.Empty),
- .Provider = NotNull(oRow.Item("SQL_PROVIDER"), String.Empty),
- .Database = NotNull(oRow.Item("DATENBANK"), String.Empty),
- .Description = NotNull(oRow.Item("BEMERKUNG"), String.Empty),
- .Password = NotNull(oRow.Item("PASSWORD"), String.Empty),
- .Server = NotNull(oRow.Item("SERVER"), String.Empty),
- .Username = NotNull(oRow.Item("USERNAME"), String.Empty)
- })
- Next
-
- Return oConnections
- Catch ex As Exception
- ShowErrorMessage(ex)
- Return New List(Of Connection)
- End Try
- End Function
-
- Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
- SQLString = txtSQL.Text
- DialogResult = DialogResult.OK
- Close()
- End Sub
-
- Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
- If cmbConnections.SelectedItem Is Nothing Then
- ShowErrorMessage("Bitte wählen sie eine Datenbank Verbindung!")
- Exit Sub
- End If
-
- Try
- Dim oSQL As String = txtSQL.EditValue.ToString
- Dim oConnection As Connection = cmbConnections.SelectedItem
- Dim oConnectionString = SQLServer.GetConnectionString(oConnection.Server, oConnection.Database, oConnection.Username, oConnection.Password)
- Dim oTable As DataTable = SQLServer.GetDatatableWithConnection(oSQL, oConnectionString)
-
- GridControlResult.DataSource = oTable
- Catch ex As Exception
- ShowErrorMessage(ex)
- End Try
- End Sub
-
- Private Sub txtSQL_EditValueChanged(sender As Object, e As EventArgs) Handles txtSQL.EditValueChanged
- CurrentPosition = txtSQL.SelectionStart
- Dim oValue = txtSQL.EditValue.ToString.Trim
-
- If oValue.Length > 0 Then
- GridControlPlaceholders.Enabled = True
- CheckForPlaceholders(txtSQL.EditValue)
- Else
- GridControlPlaceholders.Enabled = False
- End If
- End Sub
-
- Private Sub CheckForPlaceholders(Text As String)
- Placeholders.Clear()
-
- For Each oPattern In Patterns.GetAllPatterns(Text)
- Placeholders.Add(New Placeholder With {
- .Placeholder = oPattern.ToString,
- .Replacement = ""
- })
- Next
- End Sub
-End Class
diff --git a/Controls.SQLEditor/frmSQLResult.Designer.vb b/Controls.SQLEditor/frmSQLResult.Designer.vb
deleted file mode 100644
index 6ecd114f..00000000
--- a/Controls.SQLEditor/frmSQLResult.Designer.vb
+++ /dev/null
@@ -1,62 +0,0 @@
- _
-Partial Class frmSQLResult
- Inherits DevExpress.XtraEditors.XtraForm
-
- 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
- _
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- Try
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- Finally
- MyBase.Dispose(disposing)
- End Try
- End Sub
-
- 'Wird vom Windows Form-Designer benötigt.
- Private components As System.ComponentModel.IContainer
-
- 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
- 'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
- 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
- _
- Private Sub InitializeComponent()
- Me.GridControlResult = New DevExpress.XtraGrid.GridControl()
- Me.GridViewResult = New DevExpress.XtraGrid.Views.Grid.GridView()
- CType(Me.GridControlResult, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.GridViewResult, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.SuspendLayout()
- '
- 'GridControlResult
- '
- Me.GridControlResult.Dock = System.Windows.Forms.DockStyle.Fill
- Me.GridControlResult.Location = New System.Drawing.Point(0, 0)
- Me.GridControlResult.MainView = Me.GridViewResult
- Me.GridControlResult.Name = "GridControlResult"
- Me.GridControlResult.Size = New System.Drawing.Size(800, 450)
- Me.GridControlResult.TabIndex = 0
- Me.GridControlResult.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewResult})
- '
- 'GridViewResult
- '
- Me.GridViewResult.GridControl = Me.GridControlResult
- Me.GridViewResult.Name = "GridViewResult"
- '
- 'frmSQLResult
- '
- Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.ClientSize = New System.Drawing.Size(800, 450)
- Me.Controls.Add(Me.GridControlResult)
- Me.Name = "frmSQLResult"
- Me.Text = "SQL Ergebnis"
- CType(Me.GridControlResult, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.GridViewResult, System.ComponentModel.ISupportInitialize).EndInit()
- Me.ResumeLayout(False)
-
- End Sub
-
- Friend WithEvents GridControlResult As DevExpress.XtraGrid.GridControl
- Friend WithEvents GridViewResult As DevExpress.XtraGrid.Views.Grid.GridView
-End Class
diff --git a/Controls.SQLEditor/frmSQLResult.resx b/Controls.SQLEditor/frmSQLResult.resx
deleted file mode 100644
index 1af7de15..00000000
--- a/Controls.SQLEditor/frmSQLResult.resx
+++ /dev/null
@@ -1,120 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
\ No newline at end of file
diff --git a/Controls.SQLEditor/frmSQLResult.vb b/Controls.SQLEditor/frmSQLResult.vb
deleted file mode 100644
index f7ced580..00000000
--- a/Controls.SQLEditor/frmSQLResult.vb
+++ /dev/null
@@ -1,20 +0,0 @@
-Imports DigitalData.GUIs.Common
-
-Public Class frmSQLResult
- Private ReadOnly Table As DataTable
- Private ReadOnly GridBuilder As GridBuilder
-
- Public Sub New(pTable As DataTable)
- ' Dieser Aufruf ist für den Designer erforderlich.
- InitializeComponent()
-
- ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
- Table = pTable
- GridBuilder = New GridBuilder(GridViewResult).
- WithClipboardHandler()
- End Sub
-
- Private Sub frmSQLResult_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- GridControlResult.DataSource = Table
- End Sub
-End Class
\ No newline at end of file
diff --git a/Controls.SQLEditor/packages.config b/Controls.SQLEditor/packages.config
deleted file mode 100644
index 63f3075e..00000000
--- a/Controls.SQLEditor/packages.config
+++ /dev/null
@@ -1,4 +0,0 @@
-
-
-
-
\ No newline at end of file
diff --git a/Controls.SnapPanel/My Project/AssemblyInfo.vb b/Controls.SnapPanel/My Project/AssemblyInfo.vb
deleted file mode 100644
index 0b10867b..00000000
--- a/Controls.SnapPanel/My Project/AssemblyInfo.vb
+++ /dev/null
@@ -1,35 +0,0 @@
-Imports System
-Imports System.Reflection
-Imports System.Runtime.InteropServices
-
-' Allgemeine Informationen über eine Assembly werden über die folgenden
-' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
-' die einer Assembly zugeordnet sind.
-
-' Werte der Assemblyattribute überprüfen
-
-
-
-
-
-
-
-
-
-
-'Die folgende GUID wird für die typelib-ID verwendet, wenn dieses Projekt für COM verfügbar gemacht wird.
-
-
-' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
-'
-' Hauptversion
-' Nebenversion
-' Buildnummer
-' Revision
-'
-' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
-' indem Sie "*" wie unten gezeigt eingeben:
-'
-
-
-
diff --git a/Controls.SnapPanel/My Project/Resources.Designer.vb b/Controls.SnapPanel/My Project/Resources.Designer.vb
deleted file mode 100644
index 0ed21c20..00000000
--- a/Controls.SnapPanel/My Project/Resources.Designer.vb
+++ /dev/null
@@ -1,63 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-Imports System
-
-Namespace My.Resources
-
- 'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
- '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
- 'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
- 'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
- '''
- ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
- '''
- _
- Friend Module Resources
-
- Private resourceMan As Global.System.Resources.ResourceManager
-
- Private resourceCulture As Global.System.Globalization.CultureInfo
-
- '''
- ''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
- '''
- _
- Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
- Get
- If Object.ReferenceEquals(resourceMan, Nothing) Then
- Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DigitalData.Controls.SnapPanel.Resources", GetType(Resources).Assembly)
- resourceMan = temp
- End If
- Return resourceMan
- End Get
- End Property
-
- '''
- ''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
- ''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
- '''
- _
- Friend Property Culture() As Global.System.Globalization.CultureInfo
- Get
- Return resourceCulture
- End Get
- Set
- resourceCulture = value
- End Set
- End Property
- End Module
-End Namespace
diff --git a/Controls.SnapPanel/My Project/Settings.Designer.vb b/Controls.SnapPanel/My Project/Settings.Designer.vb
deleted file mode 100644
index 17e322ee..00000000
--- a/Controls.SnapPanel/My Project/Settings.Designer.vb
+++ /dev/null
@@ -1,73 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- _
- Partial Friend NotInheritable Class MySettings
- Inherits Global.System.Configuration.ApplicationSettingsBase
-
- Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
-
-#Region "Automatische My.Settings-Speicherfunktion"
-#If _MyType = "WindowsForms" Then
- Private Shared addedHandler As Boolean
-
- Private Shared addedHandlerLockObject As New Object
-
- _
- Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
- If My.Application.SaveMySettingsOnExit Then
- My.Settings.Save()
- End If
- End Sub
-#End If
-#End Region
-
- Public Shared ReadOnly Property [Default]() As MySettings
- Get
-
-#If _MyType = "WindowsForms" Then
- If Not addedHandler Then
- SyncLock addedHandlerLockObject
- If Not addedHandler Then
- AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
- addedHandler = True
- End If
- End SyncLock
- End If
-#End If
- Return defaultInstance
- End Get
- End Property
- End Class
-End Namespace
-
-Namespace My
-
- _
- Friend Module MySettingsProperty
-
- _
- Friend ReadOnly Property Settings() As Global.DigitalData.Controls.SnapPanel.My.MySettings
- Get
- Return Global.DigitalData.Controls.SnapPanel.My.MySettings.Default
- End Get
- End Property
- End Module
-End Namespace
diff --git a/Controls.SnapPanel/SnapPanel.vb b/Controls.SnapPanel/SnapPanel.vb
deleted file mode 100644
index 4970d7bc..00000000
--- a/Controls.SnapPanel/SnapPanel.vb
+++ /dev/null
@@ -1,56 +0,0 @@
-Imports System.Drawing
-Imports System.Windows.Forms
-Public Class ClassSnapPanel
- Inherits Panel
-
- Private _ShowGrid As Boolean = True
- Private _GridSize As Integer = 16
-
- Public Property GridSize As Integer
- Get
- Return _GridSize
- End Get
- Set(value As Integer)
- _GridSize = value
- Refresh()
- End Set
- End Property
-
- Public Property ShowGrid As Boolean
- Get
- Return _ShowGrid
- End Get
- Set(value As Boolean)
- _ShowGrid = value
- Refresh()
- End Set
- End Property
-
- Protected Overrides Sub OnControlAdded(e As ControlEventArgs)
- AddHandler e.Control.LocationChanged, AddressOf AlignToGrid
- AddHandler e.Control.DragDrop, AddressOf AlignToGrid
- MyBase.OnControlAdded(e)
- End Sub
-
- Protected Overrides Sub OnControlRemoved(e As ControlEventArgs)
- RemoveHandler e.Control.LocationChanged, AddressOf AlignToGrid
- RemoveHandler e.Control.DragDrop, AddressOf AlignToGrid
- MyBase.OnControlRemoved(e)
- End Sub
-
- Protected Overrides Sub OnPaint(e As System.Windows.Forms.PaintEventArgs)
- If _ShowGrid Then
- ControlPaint.DrawGrid(e.Graphics, ClientRectangle, New Size(_GridSize, _GridSize), BackColor)
- End If
- MyBase.OnPaint(e)
- End Sub
-
- Private Sub AlignToGrid(sender As Object, e As EventArgs)
- If _ShowGrid Then
- Dim item As Control = CType(sender, Control)
- Dim x As Integer = Math.Round(item.Left / _GridSize) * _GridSize
- Dim y As Integer = Math.Round(item.Top / _GridSize) * _GridSize
- item.Location = New Point(x, y)
- End If
- End Sub
-End Class
diff --git a/Controls.SnapPanel/SnapPanel.vbproj b/Controls.SnapPanel/SnapPanel.vbproj
deleted file mode 100644
index a2fbec42..00000000
--- a/Controls.SnapPanel/SnapPanel.vbproj
+++ /dev/null
@@ -1,110 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {3E19C413-3197-4635-944E-558FC04C3475}
- Library
- DigitalData.Controls.SnapPanel
- DigitalData.Controls.SnapPanel
- 512
- Windows
- v4.6.1
- true
-
-
-
- true
- full
- true
- true
- bin\Debug\
- DigitalData.Controls.SnapPanel.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.Controls.SnapPanel.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- True
- Application.myapp
- True
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
- Component
-
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
\ No newline at end of file
diff --git a/DBCleaner/App.config b/DBCleaner/App.config
deleted file mode 100644
index 9d17aab0..00000000
--- a/DBCleaner/App.config
+++ /dev/null
@@ -1,30 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
- Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;User ID=sa;Password=dd
-
-
- 172.24.12.41:E:\DB\Firebird\Databases\EDMI_TEMPLATE\EDMI_MASTER.FDB
-
-
- 172.24.12.41
-
-
- sysdba
-
-
- dd
-
-
-
-
\ No newline at end of file
diff --git a/DBCleaner/DBCleaner.vbproj b/DBCleaner/DBCleaner.vbproj
deleted file mode 100644
index f91e84cb..00000000
--- a/DBCleaner/DBCleaner.vbproj
+++ /dev/null
@@ -1,144 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {5A7913CE-7D3D-4E84-B23D-4747C178CD71}
- WinExe
- DBCleaner.My.MyApplication
- DBCleaner
- DBCleaner
- 512
- WindowsForms
- v4.6.1
- true
- true
-
-
- AnyCPU
- true
- full
- true
- true
- bin\Debug\
- DBCleaner.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- AnyCPU
- pdbonly
- false
- true
- true
- bin\Release\
- DBCleaner.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
- ..\Modules.Database\bin\Debug\DigitalData.Modules.Database.dll
-
-
- ..\Modules.Logging\bin\Release\DigitalData.Modules.Logging.dll
-
-
-
- ..\packages\NLog.4.7.10\lib\net45\NLog.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- Form
-
-
- Form1.vb
- Form
-
-
-
- True
- Application.myapp
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- Form1.vb
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
-
- PreserveNewest
-
-
-
-
\ No newline at end of file
diff --git a/DBCleaner/Form1.Designer.vb b/DBCleaner/Form1.Designer.vb
deleted file mode 100644
index 697def4b..00000000
--- a/DBCleaner/Form1.Designer.vb
+++ /dev/null
@@ -1,83 +0,0 @@
- _
-Partial Class Form1
- Inherits System.Windows.Forms.Form
-
- 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
- _
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- Try
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- Finally
- MyBase.Dispose(disposing)
- End Try
- End Sub
-
- 'Wird vom Windows Form-Designer benötigt.
- Private components As System.ComponentModel.IContainer
-
- 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
- 'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
- 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
- _
- Private Sub InitializeComponent()
- Me.ListBox1 = New System.Windows.Forms.ListBox()
- Me.MenuStrip1 = New System.Windows.Forms.MenuStrip()
- Me.BringTheActionToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
- Me.ToolStripComboBox1 = New System.Windows.Forms.ToolStripComboBox()
- Me.MenuStrip1.SuspendLayout()
- Me.SuspendLayout()
- '
- 'ListBox1
- '
- Me.ListBox1.Dock = System.Windows.Forms.DockStyle.Fill
- Me.ListBox1.FormattingEnabled = True
- Me.ListBox1.Location = New System.Drawing.Point(0, 27)
- Me.ListBox1.Name = "ListBox1"
- Me.ListBox1.Size = New System.Drawing.Size(679, 511)
- Me.ListBox1.TabIndex = 0
- '
- 'MenuStrip1
- '
- Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BringTheActionToolStripMenuItem, Me.ToolStripComboBox1})
- Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
- Me.MenuStrip1.Name = "MenuStrip1"
- Me.MenuStrip1.Size = New System.Drawing.Size(679, 27)
- Me.MenuStrip1.TabIndex = 1
- Me.MenuStrip1.Text = "MenuStrip1"
- '
- 'BringTheActionToolStripMenuItem
- '
- Me.BringTheActionToolStripMenuItem.Name = "BringTheActionToolStripMenuItem"
- Me.BringTheActionToolStripMenuItem.Size = New System.Drawing.Size(108, 20)
- Me.BringTheActionToolStripMenuItem.Text = "Bring the Action!"
- '
- 'ToolStripComboBox1
- '
- Me.ToolStripComboBox1.Items.AddRange(New Object() {"SIMULATE", "DELETE"})
- Me.ToolStripComboBox1.Name = "ToolStripComboBox1"
- Me.ToolStripComboBox1.Size = New System.Drawing.Size(121, 23)
- '
- 'Form1
- '
- Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.ClientSize = New System.Drawing.Size(679, 538)
- Me.Controls.Add(Me.ListBox1)
- Me.Controls.Add(Me.MenuStrip1)
- Me.MainMenuStrip = Me.MenuStrip1
- Me.Name = "Form1"
- Me.Text = "Form1"
- Me.MenuStrip1.ResumeLayout(False)
- Me.MenuStrip1.PerformLayout()
- Me.ResumeLayout(False)
- Me.PerformLayout()
-
- End Sub
-
- Friend WithEvents ListBox1 As ListBox
- Friend WithEvents MenuStrip1 As MenuStrip
- Friend WithEvents BringTheActionToolStripMenuItem As ToolStripMenuItem
- Friend WithEvents ToolStripComboBox1 As ToolStripComboBox
-End Class
diff --git a/DBCleaner/Form1.resx b/DBCleaner/Form1.resx
deleted file mode 100644
index bb703611..00000000
--- a/DBCleaner/Form1.resx
+++ /dev/null
@@ -1,123 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- 17, 17
-
-
\ No newline at end of file
diff --git a/DBCleaner/Form1.vb b/DBCleaner/Form1.vb
deleted file mode 100644
index f04bf2ba..00000000
--- a/DBCleaner/Form1.vb
+++ /dev/null
@@ -1,109 +0,0 @@
-Imports System.IO
-Imports DigitalData.Modules.Database
-Imports DigitalData.Modules.Logging
-
-Public Class Form1
- Private MsgIds As New List(Of String)
- Public oMSSQL As MSSQLServer
- Public oFirebird As Firebird
- Public oLogConfig As LogConfig
- Public oLogger As Logger
-
- Public ExistingIds As Integer
- Public MissingIds As Integer
- Public FailedIds As Integer
-
- Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- oLogConfig = New LogConfig(LogConfig.PathType.CustomPath, Application.StartupPath)
- oLogger = oLogConfig.GetLogger
-
- ToolStripComboBox1.SelectedIndex = 0
-
- Try
- oMSSQL = New MSSQLServer(oLogConfig, My.Settings.MSSQL_CONNECTION_STRING)
- oFirebird = New Firebird(oLogConfig, My.Settings.FB_DATASOURCE, My.Settings.FB_DATABASE, My.Settings.FB_USERNAME, My.Settings.FB_PASSWORD)
-
- Dim oFilename As String = "zugferdhistory.txt"
- Dim oPath As String = Path.Combine(Application.StartupPath, oFilename)
-
- If File.Exists(oPath) = False Then
- Throw New Exception($"{oFilename} does not exist!!")
- End If
-
- MsgIds = File.ReadAllLines(oFilename).ToList
-
- AddLog($"{MsgIds.Count} MessageIDs added!")
-
- Catch ex As Exception
- oLogger.Error(ex)
- MsgBox("Error: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, Text)
- End Try
- End Sub
-
- Private Sub AddLog(Message As String)
- oLogger.Info(Message)
- ListBox1.Items.Add(Message)
- ListBox1.SelectedIndex = ListBox1.Items.Count - 1
-
- End Sub
-
- Private Sub BringTheActionToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles BringTheActionToolStripMenuItem.Click
- If ToolStripComboBox1.Text = "DELETE" Then
- Dim oResult = MsgBox("Action is set to DELETE! Do you want to continue?", MsgBoxStyle.YesNo, "Attention")
-
- If oResult = MsgBoxResult.Yes Then
- DoIt()
- Else
- MsgBox("Coward!")
- End If
-
- Else
- DoIt()
- End If
- End Sub
-
- Private Sub DoIt()
- For Each oMessageId As String In MsgIds
- Try
- Dim oSQL As String = $"SELECT msgid FROM VWCUST_BELEGE_TODAY WHERE msgid = '{oMessageId}'"
- Dim oResult As DataTable = oMSSQL.GetDatatable(oSQL)
-
- If oResult Is Nothing Then
- Throw New Exception($"Nothing found in VWCUST_BELEGE_TODAY for message id [{oMessageId}]")
- End If
-
- AddLog($"rows for messageid [{oMessageId}]: [{oResult.Rows.Count}]")
-
- If oResult.Rows.Count = 0 Then
- AddLog("No rows found, deleting from FB history.")
- ' Delete from fb history
-
- oSQL = $"DELETE FROM TBEDM_ZUGFERD_HISTORY_IN WHERE MESSAGE_ID = '{oMessageId}'"
- If ToolStripComboBox1.Text = "DELETE" Then
-
- If oFirebird.ExecuteNonQuery(oSQL) = True Then
- AddLog("Delete successful!")
-
- End If
- Else
- AddLog("Simulating Delete !")
- AddLog(oSQL)
- End If
-
- MissingIds += 1
- Else
- AddLog("Rows found, all good!")
- ExistingIds += 1
- End If
- Catch ex As Exception
- oLogger.Warn("Error while checking existence of MessageId [{0}]: {1}", oMessageId, ex.Message)
- oLogger.Error(ex)
- FailedIds += 1
- End Try
- Next
-
- AddLog("MissingIds: " & MissingIds)
- AddLog("ExistingIds: " & ExistingIds)
- AddLog("FailedIds: " & FailedIds)
- End Sub
-End Class
diff --git a/DBCleaner/My Project/Application.Designer.vb b/DBCleaner/My Project/Application.Designer.vb
deleted file mode 100644
index dd3f3e21..00000000
--- a/DBCleaner/My Project/Application.Designer.vb
+++ /dev/null
@@ -1,38 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' This code was generated by a tool.
-' Runtime Version:4.0.30319.42000
-'
-' Changes to this file may cause incorrect behavior and will be lost if
-' the code is regenerated.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- 'NOTE: This file is auto-generated; do not modify it directly. To make changes,
- ' or if you encounter build errors in this file, go to the Project Designer
- ' (go to Project Properties or double-click the My Project node in
- ' Solution Explorer), and make changes on the Application tab.
- '
- Partial Friend Class MyApplication
-
- _
- Public Sub New()
- MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
- Me.IsSingleInstance = false
- Me.EnableVisualStyles = true
- Me.SaveMySettingsOnExit = true
- Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
- End Sub
-
- _
- Protected Overrides Sub OnCreateMainForm()
- Me.MainForm = Global.DBCleaner.Form1
- End Sub
- End Class
-End Namespace
diff --git a/DBCleaner/My Project/Application.myapp b/DBCleaner/My Project/Application.myapp
deleted file mode 100644
index 1243847f..00000000
--- a/DBCleaner/My Project/Application.myapp
+++ /dev/null
@@ -1,11 +0,0 @@
-
-
- true
- Form1
- false
- 0
- true
- 0
- 0
- true
-
diff --git a/DBCleaner/My Project/AssemblyInfo.vb b/DBCleaner/My Project/AssemblyInfo.vb
deleted file mode 100644
index a296f58e..00000000
--- a/DBCleaner/My Project/AssemblyInfo.vb
+++ /dev/null
@@ -1,35 +0,0 @@
-Imports System
-Imports System.Reflection
-Imports System.Runtime.InteropServices
-
-' Allgemeine Informationen über eine Assembly werden über die folgenden
-' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
-' die einer Assembly zugeordnet sind.
-
-' Werte der Assemblyattribute überprüfen
-
-
-
-
-
-
-
-
-
-
-'Die folgende GUID wird für die typelib-ID verwendet, wenn dieses Projekt für COM verfügbar gemacht wird.
-
-
-' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
-'
-' Hauptversion
-' Nebenversion
-' Buildnummer
-' Revision
-'
-' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
-' indem Sie "*" wie unten gezeigt eingeben:
-'
-
-
-
diff --git a/DBCleaner/My Project/Resources.Designer.vb b/DBCleaner/My Project/Resources.Designer.vb
deleted file mode 100644
index 3e3c7ce6..00000000
--- a/DBCleaner/My Project/Resources.Designer.vb
+++ /dev/null
@@ -1,62 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' This code was generated by a tool.
-' Runtime Version:4.0.30319.42000
-'
-' Changes to this file may cause incorrect behavior and will be lost if
-' the code is regenerated.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My.Resources
-
- 'This class was auto-generated by the StronglyTypedResourceBuilder
- 'class via a tool like ResGen or Visual Studio.
- 'To add or remove a member, edit your .ResX file then rerun ResGen
- 'with the /str option, or rebuild your VS project.
- '''
- ''' A strongly-typed resource class, for looking up localized strings, etc.
- '''
- _
- Friend Module Resources
-
- Private resourceMan As Global.System.Resources.ResourceManager
-
- Private resourceCulture As Global.System.Globalization.CultureInfo
-
- '''
- ''' Returns the cached ResourceManager instance used by this class.
- '''
- _
- Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
- Get
- If Object.ReferenceEquals(resourceMan, Nothing) Then
- Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DBCleaner.Resources", GetType(Resources).Assembly)
- resourceMan = temp
- End If
- Return resourceMan
- End Get
- End Property
-
- '''
- ''' Overrides the current thread's CurrentUICulture property for all
- ''' resource lookups using this strongly typed resource class.
- '''
- _
- Friend Property Culture() As Global.System.Globalization.CultureInfo
- Get
- Return resourceCulture
- End Get
- Set(ByVal value As Global.System.Globalization.CultureInfo)
- resourceCulture = value
- End Set
- End Property
- End Module
-End Namespace
diff --git a/DBCleaner/My Project/Settings.Designer.vb b/DBCleaner/My Project/Settings.Designer.vb
deleted file mode 100644
index 52ea2d49..00000000
--- a/DBCleaner/My Project/Settings.Designer.vb
+++ /dev/null
@@ -1,134 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- _
- Partial Friend NotInheritable Class MySettings
- Inherits Global.System.Configuration.ApplicationSettingsBase
-
- Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
-
-#Region "Automatische My.Settings-Speicherfunktion"
-#If _MyType = "WindowsForms" Then
- Private Shared addedHandler As Boolean
-
- Private Shared addedHandlerLockObject As New Object
-
- _
- Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
- If My.Application.SaveMySettingsOnExit Then
- My.Settings.Save()
- End If
- End Sub
-#End If
-#End Region
-
- Public Shared ReadOnly Property [Default]() As MySettings
- Get
-
-#If _MyType = "WindowsForms" Then
- If Not addedHandler Then
- SyncLock addedHandlerLockObject
- If Not addedHandler Then
- AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
- addedHandler = True
- End If
- End SyncLock
- End If
-#End If
- Return defaultInstance
- End Get
- End Property
-
-