当它位于splittercontainer中时,找到相对于父窗体的控件位置

问题描述 投票:4回答:2

情景


我正在开发一个用于镜像目标窗口的用户控件,它在内部使用Win32 DWM API注册/取消注册缩略图,并在父窗体调整大小或移动时更新缩略图位置和位置。

这是我的应用程序的结构:

enter image description here

应用程序/我的用户控件在“正常”条件下(即在操作系统中使用默认Windows主题时)按预期工作,我录制了下一个演示用户控件用法和行为的视频,因此您可以获得更好地了解这一切,并看到控制按预期工作:

问题


问题开始于我设法为操作系统使用不同的主题,特别是在Windows 10中为Windows添加不可见边框的任何主题,这可以像例如使用WindowBlinds这样的第三方软件(主题名为“ Flat Dark“),也许在注册表中修改一些Windows指标值也可以重现Windows 10中可见边框的添加,但我不记得如何通过注册表做到这一点,抱歉。

好吧,主要的是在Windows 10下,当设法使用具有非隐形边框的窗口(通过提到的第三方软件或通过其他可能的方式),我在我的用户控件类中检索其算法父窗体的相对坐标,它会断开,然后我得到意外的坐标,因此DWM缩略图不会绘制在应该绘制它的正确位置。

我录制了下一个视频,您可以在其中看到差异并了解问题:

在视频中我首先显示程序在“正常”条件下运行,然后我关闭程序,我更改操作系统主题,我再次运行程序,从这一点你可以看到DWM缩略图没有在正确的情况下绘制坐标...

我的所有推测都告诉我,当表单/窗口应用了不可见的Windows 10边框时,我遇到的问题与表单的客户端/非客户端区域有关。

为什么我认为?,因为如果我将主题更改为具有可见边框的窗口,然后我删除我的窗体边框,如下所示:

this.FormBorderStyle = FormBorderStyle.None;

...然后我的应用程序工作正常,而我的形式无边框,所以它必须是在这些特定情况下与我的表单的客户端/非客户端区域相关的问题,我不知道我做错了什么当我在这些情况下计算我的控制的相对位置时,当表格有边框时。

源代码


最后,我在这里分享完整的解决方案,它包括我正在开发的用户控件以及演示应用程序(您可以在上面的视频中看到)。

请注意,源代码是用VB.NET编写的,但是这个事实与我在这个问题中标记的语言无关,因为我接受C#或VB.NET中的任何解决方案,所以请不要因为标记语言而重新认定问题是一回事,用一种特定语言写的共享解决方案是另一回事。

没有必要下载和检查源代码,所有源代码的唯一相关部分是relativePos的坐标分配,这里:

Public Class ElektroDwmThumbnail : Inherits UserControl

    Protected Function GetThumbnailRectangle() As Rectangle
        Dim relativePos As Point = Me.ParentForm.PointToClient(Me.PointToScreen(Point.Empty))
        ' ...
        Dim dstRectangle As New Rectangle(relativePos, thumbnailSize)
        Return dstRectangle
    End Function

End Class

在C#中将是:

public class ElektroDwmThumbnail: UserControl {

    protected Rectangle GetThumbnailRectangle() {
        Point relativePos = this.ParentForm.PointToClient(this.PointToScreen(Point.Empty));
        // ...
        Rectangle dstRectangle = new Rectangle(relativePos, thumbnailSize);
        return dstRectangle;
    }

}

...在我解释的情况下,它为relativePos分配了意想不到的坐标,这就是我需要解决的问题以及我要求的内容,我需要确定我的用户控件与父表单的真实相对坐标,有效(普遍地),无论父窗体窗口的边框大小如何......

c# vb.net winforms windows-10 rectangles
2个回答
3
投票

无论控件类型或控件的父控件或控件在控件树中的位置有多深,下面是一个扩展方法,可帮助您查找相对于主机窗体的控件边界:

using System;
using System.Drawing;
using System.Windows.Forms;

public static class ControlExtensions
{
    public static Rectangle GetBoundsRelativeToForm(this Control c)
    {
        if (c == null)
            throw new ArgumentNullException(nameof(c));

        var form = c.FindForm();
        if (form == null)
            throw new InvalidOperationException("The control is not located on a form.");

        var parent = c.Parent;
        if (parent == null)
            throw new InvalidOperationException("The control does not have a parent.");

        var p = form.PointToClient(parent.PointToScreen(c.Location));
        return new Rectangle(p, c.Size);
    }
}

例如:

var r = textBox1.GetBoundsRelativeToForm();

我重现了这个问题,我看到位置是正确计算的。但DwmRegisterThumbnail将整个窗口区域视为客户区域,而预计会使用客户区域。

我相信这是主题的问题,作为一个快速修复,我这样纠正了位置:

Dim p0 As Point = Me.ParentForm.PointToScreen(Point.Empty)
Dim p1 As Point = Me.ParentForm.DesktopLocation
Dim relativePos As Point = Me.ParentForm.PointToClient(Me.PointToScreen(Point.Empty)) 
relativePos.X += (p0.X - p1.X)
relativePos.Y += (p0.Y - p1.Y) 

事实上,使用此代码,我将边框宽度和标题栏高度添加到结果中。


1
投票

下面的示例代码将帮助您找到相对于表单的控件位置。表格可以是无边框或边框。

使用以下方法作为控件类型的扩展名。或者只是从参数中删除此关键字,使其成为常规方法

public static Point GetPositionInForm(this Control ctrl)
{
    Point p = ctrl.Location;
    Control parent = ctrl.Parent;
    Form frm = ctrl.FindForm();
    Rectangle screenRectangle = frm.RectangleToScreen(frm.ClientRectangle);
    int titleHeight = screenRectangle.Top - frm.Top;
    int leftMargin = screenRectangle.Left - frm.Left;
    p.Offset(leftMargin, titleHeight);

    while (!(parent is Form))
    {
        p.Offset(parent.Location.X, parent.Location.Y);
        parent = parent.Parent;
    }
    return p;
}
© www.soinside.com 2019 - 2024. All rights reserved.