vb.net - 根据子表单大小调整 MDI 父工作区的大小

Question

我正在尝试使我的父表单 MDI 工作区从子表单大小进行调整..

我有这个代码

Child.MdiParent = Me
Child.Show()
Me.Size = New Size(Child.Width, Child.Height)

但它会调整整个父表单的大小。在 MDI 工作区中显示一些滚动条。

Parent size: H:400,W: 800

父级 mdisize。H:350, W:800.. theres 50 因为我有自定义标题栏。停靠在顶部。

Child size: H:200,W: 400

现在我想要parent size，H:250...W:400但它显示滚动条意味着它不完全适合。需要帮助的家伙...

Answer 1

其他人可能有更好的建议，但我一直这样做的方法是计算父表单的客户端大小与其实际大小之间的差异：

Dim nonClientWidth As Integer = Me.Size.Width - Me.ClientSize.Width
Dim nonClientHeight As Integer = Me.Size.Height - Me.ClientSize.Height
Me.Size = New Size(Child.Width + nonClientWidth, Child.Height + nonClientHeight)