定义ThisDrawing属性

最新推荐文章于 2023-09-18 21:47:59 发布
最新推荐文章于 2023-09-18 21:47:59 发布
阅读量1.7k 收藏
点赞数
分类专栏： ZWCAD .NET API开发 文章标签： ThisDrawing
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/jingxuan84/article/details/9306893
版权
Public ReadOnly Property ThisDrawing() As ZcadDocument
        Get
            Return ZwSoft.ZwCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument.ZcadDocument()
        End Get

End Property




Public ReadOnly Property ThisDrawing() As AcadDocument
        Get
            Return DocumentExtension.GetAcadDocument(Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument)
        End Get
End Property

静喧
关注
专栏目录
CAD二次开发--手动逐点绘制多段线示例及代码
韦_恩的博客
03-01 1213
先来看想要实现的效果： 想实现这个效果，有两步是比较关键的，第一步就是允许PromptPointOptions使用基准点，第二部就是循环更新PromptPointOptions的基准点。这部分详细代码有三个方法，我分别展示在下面（直接复制粘贴就可以测试）： AddPoly方法： [CommandMethod("AddPoly")] public void AddPoly() { Document doc = Application.Doc
Autocad二次开发vba教程第八课
IDLlanguage的专栏
11-07 1371
 第八课:图层操作 先简单介绍两条命令：1、这条语句可以建立图层：ThisDrawing.Layers.Add("新建图层")在括号中填写图层的名称。2、设置为当前的图层ThisDrawing.ActiveLayer=图层对象注意，等号右边的变量不能用图层名称，必须使用一个有效的图层变量以下一些属性在图层比较常用：LayerOn 打开关闭Freeze 冻结Lock锁定Color
CAD二次开发主窗口聚焦Focus
ultramand的博客
04-13 513
举个例子来说，如果有一个CAD插件，它的功能是打开一个特定的窗口，并且想让该窗口在被打开后立即获得焦点，就可以在窗口打开的代码中调用上述的“这样就可以确保用户打开窗口后可以立即开始操作，而不需要手动单击该窗口才能获得焦点。”的属性，该属性可以获取文档对象所在的窗口对象。”方法可以将焦点设置到该窗口上，从而使得该窗口成为当前活动窗口。”指的是CAD的应用程序对象。”属性可以获取当前的文档管理器。”属性可以获取当前激活的文档对象。文档对象有一个名为“
vb 根据AutoCAD的版本判断使用的库类型
03-30
'根据AutoCAD的版本判断使用的库类型 If Left(ThisDrawing.Application.Version, 2) = "15" Then Set VL = ThisDrawing.Application.GetInterfaceObject("VL.Application.1")
CAD vba 二次开发 各类delete方法
weixin_43931979的博客
07-16 820
CAD vba 二次开发 各类delete方法
VBA 快属性
08-05
- **定义**：快属性是VBA中用于快速访问对象属性的一种机制。它允许开发者直接通过对象名来访问属性，而不需要显式地使用点符号。 - **优点**： - 提高代码的可读性和简洁性。 - 加快代码的执行速度，尤其是在处理...
递增的属性值让我自己选择属性块中的任一个属性
06-02
' 定义一个递增属性的子程序 Dim objSelSet As AcadSelectionSet ' 定义选择集对象 Dim objEntity As AcadEntity ' 定义实体对象 Dim objBlkRef As AcadBlockReference ' 定义块引用对象 Dim objAttRef ...
在 Auto CAD 中使用 VBA 编写可实现选择属性块后，自己选择要递增的属性的代码,注释要中文
06-02
' 获取属性引用对象对应的属性定义对象 If objAttDef.TagString = "INCREMENT" Then ' 判断属性定义对象的标签字符串是否为 "INCREMENT" dblValue = CDbl(objAttRef.TextString) ' 将属性值转换为浮点数 ...
AutoCAD对象模型笔记（一）（vba）
wuxingren888的博客
01-12 2660
autocad对象模型及属性方法 Application 应用程序 Preferences Documents 图形文档集合 Document 图形文档对象 Class Name ：AcadDocument 方法 Activate 活动 AuditInfo 检查图纸完整性 Close 关闭文档 CopyObjects 复制多个对象（深度克隆）。 EndUndoMark 标记操作块的结束 Export 导出 GetVariable 获取AutoCAD系统变量的当前设
CASS中为DWG块添加属性与修改块名教程
在这个子程序中，定义了块的插入位置（`dblOrigin`），块的路径（`strPath`），然后通过`ThisDrawing.ModelSpace.InsertBlock`方法将块从指定路径插入到当前模型空间中。块的位置可以通过`dblOrigin`数组的三个元素...
Autocad二次开发vba教程第十课
IDLlanguage的专栏
11-07 1678
 第十课:画多段线和样条线 画二维多段线语句这样写：set lobj= ThisDrawing.ModelSpace.AddLightweightPolyline(fitpoint)AddLightweightPolyline后面需一个参数，存放顶点坐标的数组画三维多段线语句这样写：Set lobj = ThisDrawing.ModelSpace.Add3DPoly(fitpoint
第一篇：AutoCAD实体类
心灵的一间小屋
07-29 3231
 《AutoCADVBA开发精彩实例教程》书中源码 Option Explicit '********************************************************************************* '创建点的基准函数 Public Function AddPoint(ByVal pt As Variant) As A
vba CAD提取图元属性
sinat_25006091的博客
05-26 1141
Sub cad属性提取() Dim objEntity As AcadEntity Dim ptPicked As Variant ThisDrawing.Utility.GetEntity objEntity, ptPicked Stop End Sub
cad vba控制图层
最新发布
sinat_25006091的博客
09-18 404
' 遍历集合msg = ""NextMsgBox msgEnd Sub。
cad二次开发——环境准备、命令行交互
niuge8905的博客
02-09 2220
1、cad二开的准备工作 cad二次开发的sdk（官方的sdk下载地址，其中包含样例）：AutoCAD ObjectARX SDK Platform Technologies | Autodesk Developer Networkhttps://www.autodesk.com/developer-network/platform-technologies/autocad/objectarx cad的lookup工具 安装在：C:\Program Files\Autodesk\Application
编辑ZWCAD实体--复制对象
jingxuan84的专栏
07-19 776
Imports ZwSoft.ZwCAD.Runtime Imports ZwSoft.ZwCAD.ApplicationServices Imports ZwSoft.ZwCAD.DatabaseServices Imports ZwSoft.ZwCAD.EditorInput Imports ZwSoft.ZwCAD.Geometry Public Class ZwcadAp
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值