.NET 4升级至4.8后ShowDialog弹窗默认显示在主显示器问题求助

问题根源 #

从.NET 4升级到.NET 4.8后，无参数调用ShowDialog()的默认行为发生了变化：.NET 4中会自动将当前激活的窗体作为弹窗的逻辑父级，确保弹窗显示在父窗体上方；而.NET 4.8中无参数调用时，弹窗的Owner会被设为null，导致系统默认将弹窗显示在主显示器上。

解决方案 #

方案1：显式指定Owner并手动计算中心位置

虽然ShowDialog(this)设置的是Owner而非Parent，但我们可以通过Owner的位置手动计算弹窗的中心位置，替代缺失的CenterToOwner方法：

1. 修改弹窗的Load事件处理逻辑：

Private Sub dlgCheckUser_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    If Me.Owner IsNot Nothing Then
        ' 计算弹窗相对于Owner的中心坐标
        Dim targetX = Me.Owner.Location.X + (Me.Owner.Width - Me.Width) \ 2
        Dim targetY = Me.Owner.Location.Y + (Me.Owner.Height - Me.Height) \ 2
        Me.Location = New Point(targetX, targetY)
    End If
End Sub

2. 修改调用代码，传递当前窗体作为Owner：

Dim dlg As dlgCheckUser = New dlgCheckUser(seckey)
' 显式传递当前窗体作为Owner
Dim dr As DialogResult = dlg.ShowDialog(Me)
If dr = DialogResult.No Then
  MessageForm.ShowMessageByKey("msg_passcodeFail_OK")
End If
dlg.Dispose()

方案2：利用StartPosition属性

通过设置弹窗的StartPosition为CenterParent，结合显式指定Owner，可以自动实现居中效果：

1. 在弹窗的构造函数中设置StartPosition：

Public Sub New(seckey As String)
    InitializeComponent()
    ' 设置弹窗启动位置为父窗体中心
    Me.StartPosition = FormStartPosition.CenterParent
End Sub

2. 调用时同样传递当前窗体作为Owner：

Dim dlg As dlgCheckUser = New dlgCheckUser(seckey)
Dim dr As DialogResult = dlg.ShowDialog(Me)
If dr = DialogResult.No Then
  MessageForm.ShowMessageByKey("msg_passcodeFail_OK")
End If
dlg.Dispose()

补充说明 #

• FormStartPosition.CenterParent仅在通过ShowDialog(owner)指定了有效Owner时才会生效，无参数调用时仍会显示在主显示器。
• 降级回.NET 4能恢复原有行为，是因为旧版本框架保留了自动关联当前激活窗体作为Owner的逻辑。

内容的提问来源于stack exchange，提问作者Migals