edv/AVISO
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fenstergröße

Browse Source
This commit is contained in:
Andreas Luxbauer
2023-10-17 10:31:59 +02:00
parent 48fd2ab5c6
commit ac51434fa1
3 changed files with 22 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Aviso/My Project/AssemblyInfo.vb
View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("3.9.3.0")> <Assembly: AssemblyVersion("3.9.3.1")>
<Assembly: AssemblyFileVersion("3.9.3.0")> <Assembly: AssemblyFileVersion("3.9.3.1")>

10
Aviso/frmHauptfenster.Designer.vb generated
View File

@@ -381,6 +381,7 @@ Partial Class frmHauptfenster
Me.UsrCntlTestsystem1 = New VERAG_PROG_ALLGEMEIN.usrCntlTestsystem() Me.UsrCntlTestsystem1 = New VERAG_PROG_ALLGEMEIN.usrCntlTestsystem()
Me.Panel3 = New System.Windows.Forms.Panel() Me.Panel3 = New System.Windows.Forms.Panel()
Me.Panel4 = New System.Windows.Forms.Panel() Me.Panel4 = New System.Windows.Forms.Panel()
Me.FenstergrößeVariabelToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.conMenuAviso.SuspendLayout() Me.conMenuAviso.SuspendLayout()
Me.MenuStrip1.SuspendLayout() Me.MenuStrip1.SuspendLayout()
Me.pnlDetailsRechts.SuspendLayout() Me.pnlDetailsRechts.SuspendLayout()
@@ -547,7 +548,7 @@ Partial Class frmHauptfenster
' '
'OptionenToolStripMenuItem 'OptionenToolStripMenuItem
' '
Me.OptionenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ZeilenInFarbeEinausToolStripMenuItem, Me.BerechtigungenNeuLadenToolStripMenuItem}) Me.OptionenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ZeilenInFarbeEinausToolStripMenuItem, Me.BerechtigungenNeuLadenToolStripMenuItem, Me.FenstergrößeVariabelToolStripMenuItem})
Me.OptionenToolStripMenuItem.Name = "OptionenToolStripMenuItem" Me.OptionenToolStripMenuItem.Name = "OptionenToolStripMenuItem"
Me.OptionenToolStripMenuItem.Size = New System.Drawing.Size(213, 22) Me.OptionenToolStripMenuItem.Size = New System.Drawing.Size(213, 22)
Me.OptionenToolStripMenuItem.Text = "Optionen" Me.OptionenToolStripMenuItem.Text = "Optionen"
@@ -3648,6 +3649,12 @@ Partial Class frmHauptfenster
Me.Panel4.Size = New System.Drawing.Size(170, 25) Me.Panel4.Size = New System.Drawing.Size(170, 25)
Me.Panel4.TabIndex = 4 Me.Panel4.TabIndex = 4
' '
'FenstergrößeVariabelToolStripMenuItem
'
Me.FenstergrößeVariabelToolStripMenuItem.Name = "FenstergrößeVariabelToolStripMenuItem"
Me.FenstergrößeVariabelToolStripMenuItem.Size = New System.Drawing.Size(213, 22)
Me.FenstergrößeVariabelToolStripMenuItem.Text = "Fenstergröße variabel"
'
'frmHauptfenster 'frmHauptfenster
' '
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -4068,4 +4075,5 @@ Partial Class frmHauptfenster
Friend WithEvents APIToolStripMenuItem As ToolStripMenuItem Friend WithEvents APIToolStripMenuItem As ToolStripMenuItem
Friend WithEvents lblAbsender As Label Friend WithEvents lblAbsender As Label
Friend WithEvents txtAbsender As TextBox Friend WithEvents txtAbsender As TextBox
Friend WithEvents FenstergrößeVariabelToolStripMenuItem As ToolStripMenuItem
End Class End Class

11
Aviso/frmHauptfenster.vb
View File

@@ -4520,6 +4520,17 @@ Public Class frmHauptfenster
Dim f As New frmNorsware() Dim f As New frmNorsware()
f.ShowDialog(Me) f.ShowDialog(Me)
End Sub End Sub
Private Sub FenstergrößeVariabelToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles FenstergrößeVariabelToolStripMenuItem.Click
If Me.FormBorderStyle = FormBorderStyle.None Then
Me.FormBorderStyle = FormBorderStyle.Sizable
Panel4.Visible = False
Else
Me.FormBorderStyle = FormBorderStyle.None
Panel4.Visible = True
End If
End Sub
End Class End Class
Public Class AvisoStatusFunctions Public Class AvisoStatusFunctions