vb.net - 如何使属性窗口中的自定义属性在通过代码更改时刷新？

Question

这是一些代码：

ReadOnly Property X() As Integer
    Get
        Return PointerX
    End Get
End Property

ReadOnly Property Y() As Integer
    Get
        Return PointerY
    End Get
End Property

Private Sub Proj_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove
    PointerX = e.X
    PointerY = e.Y
End Sub

我想让属性窗口在每次鼠标移动时更新 X 和 Y 的属性，以便用户立即看到它们。我知道这很愚蠢，但这是我的任务。

有人可以帮助我吗？

Answer 1

这不是一个 Windows 窗体项目。

您创建了一个包含默认 UserControl 的 Windows 控件库，当您“运行”时，您会看到您的 UserControl 被托管，这就是您看到 PropertyGrid 控件的原因。

您需要在解决方案中创建或添加一个新项目，即 Windows 窗体应用程序，并将其设置为“启动项目”（鼠标右键单击表单项目并选择“设置为启动项目”）。

重建解决方案后，您的 UserControl“Proj”将从工具箱中可用，您可以将其放置在表单上。

Answer 2

我强烈建议在 WPF 中使用 OnPropertyChanged 事件在属性更改时通知所有侦听器来执行此项目。然后，让 PropertyGrid 监听它所代表的对象上的所有此类事件，更新适当的属性。WPF 非常适合这些东西......