我有这个表单,里面有一个选项卡控件和一个列表框:
当我调整窗口的高度时,我得到如下信息:
但是,我实际上希望选项卡控件和列表框一起调整大小,结果如下:
我相信我可以通过响应表单中的某种onResize()
方法来实现这种效果,并自己计算以手动更新选项卡控件和列表框的大小。
但是,我已经看到许多应用程序实现了这种效果,所以我怀疑实际上有更好的方法来做到这一点——也许是内置功能。
您知道实现此效果的更好方法吗?
我有这个表单,里面有一个选项卡控件和一个列表框:
当我调整窗口的高度时,我得到如下信息:
但是,我实际上希望选项卡控件和列表框一起调整大小,结果如下:
我相信我可以通过响应表单中的某种onResize()
方法来实现这种效果,并自己计算以手动更新选项卡控件和列表框的大小。
但是,我已经看到许多应用程序实现了这种效果,所以我怀疑实际上有更好的方法来做到这一点——也许是内置功能。
您知道实现此效果的更好方法吗?
这是一个很好的教程,它解释了如何在使用停靠和锚属性调整容器表单控件的大小时调整 winform 控件的大小:
设置锚属性的四个值(上、右、下、左),您可以使控件的边缘相对于 Form 控件保持静止,即使在调整大小时也是如此。
您可以使用选项卡控件的锚属性——只需锚定所有四个边。
这可能会有所帮助:
Private Sub frmMain_SizeChanged(sender As Object, e As EventArgs) Handles MyBase.SizeChanged 'tab container sizechanged event
tabMain.Dock = DockStyle.None 'set dock to none to allow resize
tabMain.Size = New Size(New Point(3, 3)) ' set size anything you want
tabMain.Dock = DockStyle.Fill 'set dock to fill to fit to container
End Sub
您可以使用选项卡和列表框的 Dock 属性来填充
要获得所需的结果,请将控件放置在您希望的标准尺寸形式中。然后使用 Anchor 属性为 Top、Bottom、Left、Right。这允许您指定您始终希望控件在基于最小尺寸的表单中相对定位。
IE:将锚属性设置为 Top、Bottom、Left、Right 这将确保控件的 Top、Bottom、Left、Right 边缘与每个边缘的距离始终相同,无论父项大小如何。
如果您希望控件与控制表面的每个边缘保持特定距离,请使用 Anchor Top、Bottom、Left、Right
如果您希望控件顶部和左侧边缘锁定距离父级顶部和左侧边缘 8 个像素,请将 Anchor 属性设置为 Top,Left 控件将永远不会调整大小,它将始终保持相对定位在 8,8。
您使用Dock
和Anchor
属性来控制组件控件在调整其父/容器大小时如何调整其大小。
要使控件填充其容器,只需
theControl.Dock = System.Windows.Forms.DockStyle.Fill
要保留一些边距,请设置Anchor
属性
theControl.Anchor = CType((System.Windows.Forms.AnchorStyles.Top _
Or System.Windows.Forms.AnchorStyles.Bottom _
Or System.Windows.Forms.AnchorStyles.Left _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
您还可以在“属性”工具窗口中设置这些属性。
在查找属性的一侧单击tab 1
或然后。然后选择中间的那个或输入full。tab 2
Property Tab
Dock
或者
您可以查找Anchor
并选择bottom tab
、top tag
、right tag
和left tag
。
希望这有帮助!
您可以在表单加载事件中使用以下代码...
TabControl1.Dock = DockStyle.Fill
ListBox1.Dock = DockStyle.Fill
当窗体也调整大小时,这将调整控件的大小。
您还可以使用控件的 tableLayout Panel 或锚属性来获得相同的结果。
希望这可以帮助!
我在使用锚点和停靠点时遇到了很多困难,因为我有很多来自其他库的控件,其中一些没有锚点和停靠点属性,但是这种技术帮助了我。它通过使用该窗体的 Resize 事件使用 WinForm的width和Height属性引用它来动态设置 WinForm 中所有控件的大小。在下面的代码示例中,表单名称是 Main。
Dim CuRWidth As Integer = Me.Width
Dim CuRHeight As Integer = Me.Height
Private Sub Main_Resize(sender As Object, e As EventArgs) Handles MyBase.Resize
Dim RatioHeight As Double = (Me.Height - CuRHeight) / CuRHeight
Dim RatioWidth As Double = (Me.Width - CuRWidth) / CuRWidth
For Each ctrl As Control In Controls
ctrl.Width += ctrl.Width * RatioWidth
ctrl.Left += ctrl.Left * RatioWidth
ctrl.Top += ctrl.Top * RatioHeight
ctrl.Height += ctrl.Height * RatioHeight
Next
CuRHeight = Me.Height
CuRWidth = Me.Width
End Sub