CAD开发者社区 › 首页 ›AutoCAD开发文档› AutoCAD 2023 开发者帮助 › 查看内容

AutoCAD 2023 开发者帮助

WindowMovedOrResized 事件（ActiveX）

2024-5-18 18:58| 发布者: admin| 查看: 355| 评论: 0|原作者: admin|来自: AutoCAD

在应用程序或绘图窗口移动或调整大小后立即触发。

支持的平台：仅限 Windows

签名

VBA：

object.WindowMovedOrResized(HWNDFrame, bMoved)

对象

类型：应用程序，文档

计算结果为有效容器对象的对象表达式。在这种情况下，唯一有效的容器是应用程序和文档。

HWND摇模

类型：Long_PTR;输入到处理程序

应用程序或文档窗口框架。

b已移动

类型：布尔;输入到处理程序

True：窗口已移动。
False：调整了窗口大小

言论

在实现与应用程序或文档窗口一起跟踪的工具栏或无模式对话框时，此事件非常有用。VB 或 ObjectARX 应用程序可以使用 HWNDFrame 参数获取窗口的坐标，将这些坐标转换为屏幕坐标或父坐标，并使用此信息定位其他窗口。

显示模式对话框时不会触发任何事件。

例子

VBA：

Private Sub AcadDocument_WindowMovedOrResized(ByVal HWNDFrame As LONG_PTR, ByVal bMoved As Boolean)
    ' This example intercepts a drawing WindowMovedOrResized event.
    '
    ' This event is triggered when the drawing window is moved or resized
    '
    ' To trigger this example event: Move or resize the drawing window

    Dim CurrentState As String

    ' Use the "bmoved" variable to determine if we moved or sized the drawing window
    CurrentState = IIf(bMoved, "Moving", "Sizing")

    MsgBox "The drawing window appearance was changed by: " & CurrentState
End Sub

可视化 LISP：