MS Vorbereitungen WISAG wie PM

2020-12-17 10:03:54 +01:00
parent 96a9d17025
commit 2984d6503d
14 changed files with 203 additions and 105 deletions
--- a/app/DD_Clipboard_Searcher/frmStart.Designer.vb
+++ b/app/DD_Clipboard_Searcher/frmStart.Designer.vb
@@ -28,27 +28,28 @@ Partial Class frmStart
        Me.cmstrpNotifyIcon = New System.Windows.Forms.ContextMenuStrip(Me.components)
        Me.AblaufAnzeigenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.BisherigenAblaufAnzeigenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
-        Me.tsmiChangeState = New System.Windows.Forms.ToolStripMenuItem()
-        Me.ClientÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
-        Me.ClientBeendenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
-        Me.labelUser = New System.Windows.Forms.ToolStripStatusLabel()
        Me.labelVersion = New System.Windows.Forms.ToolStripStatusLabel()
        Me.lblrefresh = New System.Windows.Forms.ToolStripStatusLabel()
        Me.TimerClose = New System.Windows.Forms.Timer(Me.components)
        Me.ContextMenuStripForm = New System.Windows.Forms.ContextMenuStrip(Me.components)
-        Me.MinimierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.Label1 = New System.Windows.Forms.Label()
        Me.GroupBox1 = New System.Windows.Forms.GroupBox()
        Me.Label2 = New System.Windows.Forms.Label()
        Me.labelHotkey = New System.Windows.Forms.Label()
-        Me.btnUserConfig = New System.Windows.Forms.Button()
-        Me.btnAdminConfig = New System.Windows.Forms.Button()
        Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
        Me.TimerRefresh = New System.Windows.Forms.Timer(Me.components)
        Me.GroupBox2 = New System.Windows.Forms.GroupBox()
        Me.labelStatus = New System.Windows.Forms.Label()
        Me.labelRefresh = New System.Windows.Forms.Label()
+        Me.MinimierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.btnAdminConfig = New System.Windows.Forms.Button()
+        Me.btnUserConfig = New System.Windows.Forms.Button()
+        Me.labelUser = New System.Windows.Forms.ToolStripStatusLabel()
+        Me.tslblAppServer = New System.Windows.Forms.ToolStripStatusLabel()
+        Me.tsmiChangeState = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ClientÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ClientBeendenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.cmstrpNotifyIcon.SuspendLayout()
        Me.StatusStrip1.SuspendLayout()
        Me.ContextMenuStripForm.SuspendLayout()
@@ -70,7 +71,7 @@ Partial Class frmStart
        '
        Me.cmstrpNotifyIcon.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AblaufAnzeigenToolStripMenuItem, Me.tsmiChangeState, Me.ClientÖffnenToolStripMenuItem, Me.ClientBeendenToolStripMenuItem})
        Me.cmstrpNotifyIcon.Name = "cmstrpNotifyIcon"
-        Me.cmstrpNotifyIcon.Size = New System.Drawing.Size(220, 114)
+        Me.cmstrpNotifyIcon.Size = New System.Drawing.Size(220, 92)
        '
        'AblaufAnzeigenToolStripMenuItem
        '
@@ -85,31 +86,9 @@ Partial Class frmStart
        Me.BisherigenAblaufAnzeigenToolStripMenuItem.Size = New System.Drawing.Size(217, 22)
        Me.BisherigenAblaufAnzeigenToolStripMenuItem.Text = "Bisherigen Ablauf anzeigen"
        '
-        'tsmiChangeState
-        '
-        Me.tsmiChangeState.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.StatusAnnotations_Stop_16xLG
-        Me.tsmiChangeState.Name = "tsmiChangeState"
-        Me.tsmiChangeState.Size = New System.Drawing.Size(219, 22)
-        Me.tsmiChangeState.Tag = "stop"
-        Me.tsmiChangeState.Text = "Clipboard Watcher stoppen"
-        '
-        'ClientÖffnenToolStripMenuItem
-        '
-        Me.ClientÖffnenToolStripMenuItem.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.door_open
-        Me.ClientÖffnenToolStripMenuItem.Name = "ClientÖffnenToolStripMenuItem"
-        Me.ClientÖffnenToolStripMenuItem.Size = New System.Drawing.Size(219, 22)
-        Me.ClientÖffnenToolStripMenuItem.Text = "Client öffnen"
-        '
-        'ClientBeendenToolStripMenuItem
-        '
-        Me.ClientBeendenToolStripMenuItem.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.cancel
-        Me.ClientBeendenToolStripMenuItem.Name = "ClientBeendenToolStripMenuItem"
-        Me.ClientBeendenToolStripMenuItem.Size = New System.Drawing.Size(219, 22)
-        Me.ClientBeendenToolStripMenuItem.Text = "Client beenden"
-        '
        'StatusStrip1
        '
-        Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.labelUser, Me.labelVersion, Me.lblrefresh})
+        Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.labelUser, Me.labelVersion, Me.lblrefresh, Me.tslblAppServer})
        Me.StatusStrip1.Location = New System.Drawing.Point(0, 232)
        Me.StatusStrip1.Name = "StatusStrip1"
        Me.StatusStrip1.Size = New System.Drawing.Size(345, 22)
@@ -117,13 +96,6 @@ Partial Class frmStart
        Me.StatusStrip1.TabIndex = 3
        Me.StatusStrip1.Text = "StatusStrip1"
        '
-        'labelUser
-        '
-        Me.labelUser.Image = CType(resources.GetObject("labelUser.Image"), System.Drawing.Image)
-        Me.labelUser.Name = "labelUser"
-        Me.labelUser.Size = New System.Drawing.Size(37, 17)
-        Me.labelUser.Text = "{0}"
-        '
        'labelVersion
        '
        Me.labelVersion.Name = "labelVersion"
@@ -146,13 +118,6 @@ Partial Class frmStart
        Me.ContextMenuStripForm.Name = "ContextMenuStripForm"
        Me.ContextMenuStripForm.Size = New System.Drawing.Size(136, 26)
        '
-        'MinimierenToolStripMenuItem
-        '
-        Me.MinimierenToolStripMenuItem.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.ReduceSize
-        Me.MinimierenToolStripMenuItem.Name = "MinimierenToolStripMenuItem"
-        Me.MinimierenToolStripMenuItem.Size = New System.Drawing.Size(135, 22)
-        Me.MinimierenToolStripMenuItem.Text = "Minimieren"
-        '
        'Label1
        '
        Me.Label1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
@@ -202,28 +167,6 @@ Partial Class frmStart
        Me.labelHotkey.Text = "{0}"
        Me.labelHotkey.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
        '
-        'btnUserConfig
-        '
-        Me.btnUserConfig.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.user_16xLG
-        Me.btnUserConfig.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.btnUserConfig.Location = New System.Drawing.Point(15, 12)
-        Me.btnUserConfig.Name = "btnUserConfig"
-        Me.btnUserConfig.Size = New System.Drawing.Size(151, 32)
-        Me.btnUserConfig.TabIndex = 13
-        Me.btnUserConfig.Text = "Grundeinstellungen"
-        Me.btnUserConfig.UseVisualStyleBackColor = True
-        '
-        'btnAdminConfig
-        '
-        Me.btnAdminConfig.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.Editdatasetwithdesigner_8449
-        Me.btnAdminConfig.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.btnAdminConfig.Location = New System.Drawing.Point(182, 12)
-        Me.btnAdminConfig.Name = "btnAdminConfig"
-        Me.btnAdminConfig.Size = New System.Drawing.Size(151, 32)
-        Me.btnAdminConfig.TabIndex = 13
-        Me.btnAdminConfig.Text = "Administration"
-        Me.btnAdminConfig.UseVisualStyleBackColor = True
-        '
        'ImageList1
        '
        Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
@@ -269,6 +212,71 @@ Partial Class frmStart
        Me.labelRefresh.TabIndex = 0
        Me.labelRefresh.Text = "Aktualisierung erfolgreich."
        '
+        'MinimierenToolStripMenuItem
+        '
+        Me.MinimierenToolStripMenuItem.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.ReduceSize
+        Me.MinimierenToolStripMenuItem.Name = "MinimierenToolStripMenuItem"
+        Me.MinimierenToolStripMenuItem.Size = New System.Drawing.Size(135, 22)
+        Me.MinimierenToolStripMenuItem.Text = "Minimieren"
+        '
+        'btnAdminConfig
+        '
+        Me.btnAdminConfig.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.Editdatasetwithdesigner_8449
+        Me.btnAdminConfig.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnAdminConfig.Location = New System.Drawing.Point(182, 12)
+        Me.btnAdminConfig.Name = "btnAdminConfig"
+        Me.btnAdminConfig.Size = New System.Drawing.Size(151, 32)
+        Me.btnAdminConfig.TabIndex = 13
+        Me.btnAdminConfig.Text = "Administration"
+        Me.btnAdminConfig.UseVisualStyleBackColor = True
+        '
+        'btnUserConfig
+        '
+        Me.btnUserConfig.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.user_16xLG
+        Me.btnUserConfig.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnUserConfig.Location = New System.Drawing.Point(15, 12)
+        Me.btnUserConfig.Name = "btnUserConfig"
+        Me.btnUserConfig.Size = New System.Drawing.Size(151, 32)
+        Me.btnUserConfig.TabIndex = 13
+        Me.btnUserConfig.Text = "Grundeinstellungen"
+        Me.btnUserConfig.UseVisualStyleBackColor = True
+        '
+        'labelUser
+        '
+        Me.labelUser.Image = CType(resources.GetObject("labelUser.Image"), System.Drawing.Image)
+        Me.labelUser.Name = "labelUser"
+        Me.labelUser.Size = New System.Drawing.Size(37, 17)
+        Me.labelUser.Text = "{0}"
+        '
+        'tslblAppServer
+        '
+        Me.tslblAppServer.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.server_Local_16xLG
+        Me.tslblAppServer.Name = "tslblAppServer"
+        Me.tslblAppServer.Size = New System.Drawing.Size(111, 17)
+        Me.tslblAppServer.Text = "AppServer active"
+        '
+        'tsmiChangeState
+        '
+        Me.tsmiChangeState.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.StatusAnnotations_Stop_16xLG
+        Me.tsmiChangeState.Name = "tsmiChangeState"
+        Me.tsmiChangeState.Size = New System.Drawing.Size(219, 22)
+        Me.tsmiChangeState.Tag = "stop"
+        Me.tsmiChangeState.Text = "Clipboard Watcher stoppen"
+        '
+        'ClientÖffnenToolStripMenuItem
+        '
+        Me.ClientÖffnenToolStripMenuItem.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.door_open
+        Me.ClientÖffnenToolStripMenuItem.Name = "ClientÖffnenToolStripMenuItem"
+        Me.ClientÖffnenToolStripMenuItem.Size = New System.Drawing.Size(219, 22)
+        Me.ClientÖffnenToolStripMenuItem.Text = "Client öffnen"
+        '
+        'ClientBeendenToolStripMenuItem
+        '
+        Me.ClientBeendenToolStripMenuItem.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.cancel
+        Me.ClientBeendenToolStripMenuItem.Name = "ClientBeendenToolStripMenuItem"
+        Me.ClientBeendenToolStripMenuItem.Size = New System.Drawing.Size(219, 22)
+        Me.ClientBeendenToolStripMenuItem.Text = "Client beenden"
+        '
        'frmStart
        '
        Me.Appearance.Options.UseFont = True
@@ -283,11 +291,11 @@ Partial Class frmStart
        Me.Controls.Add(Me.Label1)
        Me.Controls.Add(Me.StatusStrip1)
        Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.IconOptions.Icon = CType(resources.GetObject("frmStart.IconOptions.Icon"), System.Drawing.Icon)
        Me.KeyPreview = True
        Me.MaximizeBox = False
        Me.MaximumSize = New System.Drawing.Size(361, 293)
-        Me.MinimumSize = New System.Drawing.Size(361, 293)
+        Me.MinimumSize = New System.Drawing.Size(347, 286)
        Me.Name = "frmStart"
        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
        Me.Text = "Clipboard Watcher"
@@ -327,4 +335,5 @@ Partial Class frmStart
    Friend WithEvents GroupBox2 As GroupBox
    Friend WithEvents labelRefresh As Label
    Friend WithEvents labelStatus As Label
+    Friend WithEvents tslblAppServer As ToolStripStatusLabel
 End Class