编辑ZWCAD实体--镜像对象

最新推荐文章于 2019-01-23 14:12:30 发布

静喧

最新推荐文章于 2019-01-23 14:12:30 发布

阅读量636

点赞数

分类专栏： ZWCAD .NET API开发文章标签：镜像 zwcad .net api mirror

本文链接：https://blog.csdn.net/jingxuan84/article/details/9404709

版权

本文档展示了如何通过ZWCAD的.NET API实现编辑操作，具体为镜像对象。首先获取活动文档和数据库，然后从编辑器获取选择的对象及镜像的两个点，基于这两点创建镜像线并构建镜像矩阵。最后，在事务管理器中对选定对象应用镜像矩阵完成操作。

摘要由CSDN通过智能技术生成

Imports ZwSoft.ZwCAD.Runtime
Imports ZwSoft.ZwCAD.ApplicationServices
Imports ZwSoft.ZwCAD.DatabaseServices
Imports ZwSoft.ZwCAD.EditorInput
Imports ZwSoft.ZwCAD.Geometry

Public Class ZwcadApps

<CommandMethod("MirrorObject")> _
Public Sub MirrorObject()
Dim ZcDoc As Document = Application.DocumentManager.MdiActiveDocument
Dim ZcDB As Database = ZcDoc.Database
Dim ZcEd As Editor = ZcDoc.Editor

Dim peo As New PromptEntityOptions(vbLf & "Select object:")
Dim per As PromptEntityResult = ZcEd.GetEntity(peo)
If per.Status <> PromptStatus.OK Then
Return
End If

Dim pro1 As New PromptPointOptions(vbLf & "Input first point:")
Dim proR