Anydesk weiter integriert; Rechtsklick-Menü in Hauptansicht ausgebaut

This commit is contained in:
ms
2024-11-04 12:22:28 +01:00
parent 48bf324eff
commit b625d17481
5 changed files with 188 additions and 32 deletions

View File

@@ -92,6 +92,12 @@ Partial Class frmHostBearbeiten
Me.PanFirewall = New System.Windows.Forms.Panel()
Me.PanSlaves = New System.Windows.Forms.Panel()
Me.PanNavTop = New System.Windows.Forms.Panel()
Me.Button3 = New System.Windows.Forms.Button()
Me.txtAnydesk = New System.Windows.Forms.TextBox()
Me.Label15 = New System.Windows.Forms.Label()
Me.txtAnydeskPass = New System.Windows.Forms.TextBox()
Me.Label16 = New System.Windows.Forms.Label()
Me.CheckBox1 = New System.Windows.Forms.CheckBox()
Me.ContextMenuStrip2.SuspendLayout()
Me.ContextMenuStrip1.SuspendLayout()
Me.Panel1.SuspendLayout()
@@ -539,6 +545,12 @@ Partial Class frmHostBearbeiten
'
'Panel1
'
Me.Panel1.Controls.Add(Me.Button3)
Me.Panel1.Controls.Add(Me.txtAnydesk)
Me.Panel1.Controls.Add(Me.Label15)
Me.Panel1.Controls.Add(Me.txtAnydeskPass)
Me.Panel1.Controls.Add(Me.Label16)
Me.Panel1.Controls.Add(Me.CheckBox1)
Me.Panel1.Controls.Add(Me.Button2)
Me.Panel1.Controls.Add(Me.Button1)
Me.Panel1.Controls.Add(Me.txtSSHPort)
@@ -594,7 +606,7 @@ Partial Class frmHostBearbeiten
Me.Panel1.Controls.Add(Me.Label4)
Me.Panel1.Location = New System.Drawing.Point(12, 62)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(643, 460)
Me.Panel1.Size = New System.Drawing.Size(643, 588)
Me.Panel1.TabIndex = 137
'
'Button2
@@ -670,7 +682,7 @@ Partial Class frmHostBearbeiten
Me.cmdTVConnect.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.cmdTVConnect.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.cmdTVConnect.Font = New System.Drawing.Font("Microsoft Sans Serif", 6.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cmdTVConnect.Location = New System.Drawing.Point(231, 378)
Me.cmdTVConnect.Location = New System.Drawing.Point(234, 462)
Me.cmdTVConnect.Name = "cmdTVConnect"
Me.cmdTVConnect.Size = New System.Drawing.Size(75, 20)
Me.cmdTVConnect.TabIndex = 145
@@ -681,7 +693,7 @@ Partial Class frmHostBearbeiten
'
Me.txtTeamviewer.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.Suggest
Me.txtTeamviewer.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.CustomSource
Me.txtTeamviewer.Location = New System.Drawing.Point(6, 378)
Me.txtTeamviewer.Location = New System.Drawing.Point(332, 525)
Me.txtTeamviewer.Name = "txtTeamviewer"
Me.txtTeamviewer.Size = New System.Drawing.Size(219, 20)
Me.txtTeamviewer.TabIndex = 140
@@ -689,7 +701,7 @@ Partial Class frmHostBearbeiten
'Label12
'
Me.Label12.AutoSize = True
Me.Label12.Location = New System.Drawing.Point(3, 362)
Me.Label12.Location = New System.Drawing.Point(329, 509)
Me.Label12.Name = "Label12"
Me.Label12.Size = New System.Drawing.Size(76, 13)
Me.Label12.TabIndex = 143
@@ -697,7 +709,7 @@ Partial Class frmHostBearbeiten
'
'txtTVKennwort
'
Me.txtTVKennwort.Location = New System.Drawing.Point(6, 417)
Me.txtTVKennwort.Location = New System.Drawing.Point(332, 565)
Me.txtTVKennwort.Name = "txtTVKennwort"
Me.txtTVKennwort.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42)
Me.txtTVKennwort.Size = New System.Drawing.Size(300, 20)
@@ -706,7 +718,7 @@ Partial Class frmHostBearbeiten
'Label13
'
Me.Label13.AutoSize = True
Me.Label13.Location = New System.Drawing.Point(3, 401)
Me.Label13.Location = New System.Drawing.Point(329, 548)
Me.Label13.Name = "Label13"
Me.Label13.Size = New System.Drawing.Size(66, 13)
Me.Label13.TabIndex = 144
@@ -715,7 +727,7 @@ Partial Class frmHostBearbeiten
'chkTeamViewerKennwortAnzeigen
'
Me.chkTeamViewerKennwortAnzeigen.AutoSize = True
Me.chkTeamViewerKennwortAnzeigen.Location = New System.Drawing.Point(75, 400)
Me.chkTeamViewerKennwortAnzeigen.Location = New System.Drawing.Point(401, 548)
Me.chkTeamViewerKennwortAnzeigen.Name = "chkTeamViewerKennwortAnzeigen"
Me.chkTeamViewerKennwortAnzeigen.Size = New System.Drawing.Size(70, 17)
Me.chkTeamViewerKennwortAnzeigen.TabIndex = 141
@@ -798,6 +810,64 @@ Partial Class frmHostBearbeiten
Me.PanNavTop.Size = New System.Drawing.Size(309, 32)
Me.PanNavTop.TabIndex = 141
'
'Button3
'
Me.Button3.BackColor = System.Drawing.Color.SkyBlue
Me.Button3.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button3.Font = New System.Drawing.Font("Microsoft Sans Serif", 6.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Button3.Location = New System.Drawing.Point(234, 377)
Me.Button3.Name = "Button3"
Me.Button3.Size = New System.Drawing.Size(75, 20)
Me.Button3.TabIndex = 157
Me.Button3.Text = "Verb."
Me.Button3.UseVisualStyleBackColor = False
'
'txtAnydesk
'
Me.txtAnydesk.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.Suggest
Me.txtAnydesk.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.CustomSource
Me.txtAnydesk.Location = New System.Drawing.Point(6, 377)
Me.txtAnydesk.Name = "txtAnydesk"
Me.txtAnydesk.Size = New System.Drawing.Size(219, 20)
Me.txtAnydesk.TabIndex = 152
'
'Label15
'
Me.Label15.AutoSize = True
Me.Label15.Location = New System.Drawing.Point(3, 359)
Me.Label15.Name = "Label15"
Me.Label15.Size = New System.Drawing.Size(50, 13)
Me.Label15.TabIndex = 155
Me.Label15.Text = "AnyDesk"
'
'txtAnydeskPass
'
Me.txtAnydeskPass.Location = New System.Drawing.Point(6, 420)
Me.txtAnydeskPass.Name = "txtAnydeskPass"
Me.txtAnydeskPass.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42)
Me.txtAnydeskPass.Size = New System.Drawing.Size(300, 20)
Me.txtAnydeskPass.TabIndex = 154
'
'Label16
'
Me.Label16.AutoSize = True
Me.Label16.Location = New System.Drawing.Point(3, 404)
Me.Label16.Name = "Label16"
Me.Label16.Size = New System.Drawing.Size(77, 13)
Me.Label16.TabIndex = 156
Me.Label16.Text = "Anydesk Pass."
'
'CheckBox1
'
Me.CheckBox1.AutoSize = True
Me.CheckBox1.Location = New System.Drawing.Point(86, 403)
Me.CheckBox1.Name = "CheckBox1"
Me.CheckBox1.Size = New System.Drawing.Size(70, 17)
Me.CheckBox1.TabIndex = 153
Me.CheckBox1.Text = "Anzeigen"
Me.CheckBox1.UseVisualStyleBackColor = True
'
'frmHostBearbeiten
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -805,7 +875,7 @@ Partial Class frmHostBearbeiten
Me.AutoSize = True
Me.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
Me.BackColor = System.Drawing.SystemColors.GradientInactiveCaption
Me.ClientSize = New System.Drawing.Size(1608, 534)
Me.ClientSize = New System.Drawing.Size(1608, 662)
Me.Controls.Add(Me.chkFirewall)
Me.Controls.Add(Me.PanNavTop)
Me.Controls.Add(Me.PanSlaves)
@@ -895,4 +965,10 @@ Partial Class frmHostBearbeiten
Friend WithEvents Button1 As Button
Friend WithEvents Button2 As Button
Friend WithEvents MitHTTPSFuellen As ToolStripMenuItem
Friend WithEvents Button3 As Button
Friend WithEvents txtAnydesk As TextBox
Friend WithEvents Label15 As Label
Friend WithEvents txtAnydeskPass As TextBox
Friend WithEvents Label16 As Label
Friend WithEvents CheckBox1 As CheckBox
End Class