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

AutoCAD 2019 开发者帮助

BeginRightClick 事件（ActiveX）

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

在用户右键单击绘图窗口后触发。

支持的平台：仅限 Windows

签名

VBA：

object.BeginRightClick(PickPoint)

对象

类别： 文档

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

PickPoint

类型：变体（双打的三元素数组）;输入到处理程序

右键单击的 3D WCS 坐标。

言论

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

例子

VBA：

Private Sub AcadDocument_BeginRightClick(ByVal PickPoint As Variant)
    ' This example intercepts a drawing BeginRightClick event.
    '
    ' This event is triggered when a drawing receives
    ' a right mouse click in its working area.
    '
    ' To trigger this example event: Position the cursor over the working area of
    ' a drawing window and click the right mouse button.

    ' Use the "PickPoint" variable to determine where on the drawing the user clicked
    MsgBox "A drawing has just been right-clicked at:" & vbCrLf & _
            PickPoint(0) & vbCrLf & _
            PickPoint(1) & vbCrLf & _
            PickPoint(2)

End Sub

可视化 LISP：