如何完全最小化无边框表单?
How Can I Minimize A Borderless Form Completely?
在我的应用程序中,我有主窗体和位于顶部的其他无边框窗体。当我最小化主窗体时,我想最小化所有窗体,但只在任务栏中显示主窗体。目前发生的情况是主窗体进入任务栏,但所有其他打开的窗体在任务栏正上方的左下角创建迷你矩形。
有什么方法可以隐藏这些丑陋的矩形吗?单击每个矩形将显示特定的 window(我希望避免出现这种情况)。我只想让用户可以选择点击任务栏中的主窗体自动调出所有windows。
谢谢
编辑
为了隐藏所有表单,我在主表单的 Resize
事件中添加了以下代码:
Private Sub frmDashBoard_Resize(sender As Object, e As EventArgs) Handles Me.Resize
If Me.WindowState = FormWindowState.Minimized Then
If focusedForm IsNot Nothing Then
If focusedForm.Tag Is "StorePage" Then
focusedForm.WindowState = FormWindowState.Minimized
End If
End If
End If
If Me.WindowState = FormWindowState.Maximized Then
If focusedForm IsNot Nothing Then
If focusedForm.Tag Is "StorePage" Then
focusedForm.WindowState = FormWindowState.Maximized
End If
End If
End If
End Sub
基本上,我将 StorePage 打开时设置为 focusedForm
。所以 focusedForm
将引用我的应用程序中最顶层的表单。
不要最小化您的表单,而是让它们不可见,如果您不想看到它们,也不想让它们显示在任务栏中,这正是您想要的:
If focusedForm.Tag Is "StorePage" Then
focusedForm.Visible = (Me.WindowState <> FormWindowState.Minimized)
End If
等等
在我的应用程序中,我有主窗体和位于顶部的其他无边框窗体。当我最小化主窗体时,我想最小化所有窗体,但只在任务栏中显示主窗体。目前发生的情况是主窗体进入任务栏,但所有其他打开的窗体在任务栏正上方的左下角创建迷你矩形。
有什么方法可以隐藏这些丑陋的矩形吗?单击每个矩形将显示特定的 window(我希望避免出现这种情况)。我只想让用户可以选择点击任务栏中的主窗体自动调出所有windows。
谢谢
编辑
为了隐藏所有表单,我在主表单的 Resize
事件中添加了以下代码:
Private Sub frmDashBoard_Resize(sender As Object, e As EventArgs) Handles Me.Resize
If Me.WindowState = FormWindowState.Minimized Then
If focusedForm IsNot Nothing Then
If focusedForm.Tag Is "StorePage" Then
focusedForm.WindowState = FormWindowState.Minimized
End If
End If
End If
If Me.WindowState = FormWindowState.Maximized Then
If focusedForm IsNot Nothing Then
If focusedForm.Tag Is "StorePage" Then
focusedForm.WindowState = FormWindowState.Maximized
End If
End If
End If
End Sub
基本上,我将 StorePage 打开时设置为 focusedForm
。所以 focusedForm
将引用我的应用程序中最顶层的表单。
不要最小化您的表单,而是让它们不可见,如果您不想看到它们,也不想让它们显示在任务栏中,这正是您想要的:
If focusedForm.Tag Is "StorePage" Then
focusedForm.Visible = (Me.WindowState <> FormWindowState.Minimized)
End If
等等