_rocky 发表于 2016-1-9 11:00:25

DWGdirect ActiveX 3.3.0

本帖最后由 _rocky 于 2016-1-11 11:51 编辑

DWGdirect ActiveX 3.3.0 下载地址见附件
1. DWGdirect ActiveX 3.3.0 是什么？
DWGdirect ActiveX 3.3.0 是COM/OLE组件，通过该组件能对dwg文件进行一系列操作，类似于Autocd.Application和ObjectDBXcom组件，但功能要更强大
2. DWGdirect ActiveX 3.3.0 如何创建像：

(setq OdaApp (Vlax-Get-Or-Create-Object "TeighaX.OdaHostApp" ))
#<VLA-OBJECT IOdaHostApp3 079be374>

(Vlax-dump-object OdaApp T)
; IOdaHostApp3: IOdaHostApp3 interface
;特性值:
;   Application (RO) = #<VLA-OBJECT IAcadApplication 079be394>
;   AuditInfo (RO) = 发生意外。
;   Console = nil
;   OpenDbPartially = 0
;   PagingController = nil
;支持的方法:
;   AuditDatabase (2)
;   BrowseForOpenFileName (4)
;   OriginalFileType (2)
;   PageObjects (1)
;   Recover (2)
T

(setq OdaX (Vlax-Get-Or-Create-Object "OdaX.OdaOle" ))
#<VLA-OBJECT IOdaOle 079d6ba0>


(Vlax-dump-object OdaX T)
; IOdaOle: TeighaX Interface for an additional Ole functionality
;特性值:
;   Application (RO) = 发生意外。
;   Document (RO) = nil
;   Handle (RO) = "0"
;   HasExtensionDictionary (RO) = TeighaX: Null object Id
;   Height = TeighaX: Null object Id
;   Hyperlinks (RO) = 发生意外。
;   InsertionPoint = TeighaX: Null object Id
;   Layer = TeighaX: Null object Id
;   Linetype = TeighaX: Null object Id
;   LinetypeScale = TeighaX: Null object Id
;   Lineweight = TeighaX: Null object Id
;   LinkName (RO) = TeighaX: Null object Id
;   LinkPath (RO) = TeighaX: Null object Id
;   LockAspectRatio = TeighaX: Null object Id
;   Material = TeighaX: Null object Id
;   ObjectID (RO) = 0
;   ObjectName (RO) = TeighaX: Null object Id
;   OleItemType = TeighaX: Null object Id
;   OlePlotQuality = TeighaX: Null object Id
;   OleSourceApp = TeighaX: Null object Id
;   OwnerID (RO) = TeighaX: Null object Id
;   PlotStyleName = TeighaX: Null object Id
;   Rotation = TeighaX: Null object Id
;   ScaleHeight = TeighaX: Null object Id
;   ScaleWidth = TeighaX: Null object Id
;   TrueColor = TeighaX: Null object Id
;   Visible = TeighaX: Null object Id
;   Width = TeighaX: Null object Id
;支持的方法:
;   ArrayPolar (3)
;   ArrayRectangular (6)
;   Copy ()
;   Delete ()
;   GetBoundingBox (2)
;   GetExtensionDictionary ()
;   GetXData (3)
;   Highlight (1)
;   IntersectWith (2)
;   Mirror (2)
;   Mirror3D (3)
;   Move (2)
;   Rotate (2)
;   Rotate3D (3)
;   ScaleEntity (2)
;   SetXData (2)
;   TransformBy (1)
;   Update ()
T
3. 源代码(setq OdaHostApp (Vlax-Get-Or-Create-Object "TeighaX.OdaHostApp" ))
(setq AcadApp (vla-get-Application OdaHostApp ))；获取Application对象
(setq Documents (vla-get-Documents AcadApp))；获取Documents对象
(setq Document (vla-Open Documents "*.DWG" ))；获取Document对象
(setq Database (vla-get-Database Document ))；获取Database对象
(setq Blocks (vla-get-Blocks Database ))；获取BlockTable对象
(setq *ModleSpace* (vla-get-ModelSpace Document))；获取ModleSpace对象
(setq *PaperSpace* (vla-get-PaperSpace Document))；获取PaperSpace对象
(setq Layout (vla-get-Layouts Document))；获取Layout对象(vlax-for Block Blocks
；遍历BlockTable
）等等，还有更多功能等待大家研究















zzyong00 发表于 2016-1-9 18:56:43

https://www.baidu.com/s?word=DWGdirect+ActiveX+3.3.0+%E4%B8%8B%E8%BD%BD%E5%9C%B0%E5%9D%80&ie=utf-8&tn=98012088_2_dg&ch=3

_rocky 发表于 2016-1-9 19:13:25

zzyong00 发表于 2016-1-9 18:56 static/image/common/back.gif
https://www.baidu.com/s?word=DWGdirect+ActiveX+3.3.0+%E4%B8%8B%E8%BD%BD%E5%9C%B0%E5%9D%80&ie=utf-8&t ...

建议你去百度上下载，如果找不到了，可以考虑在我这里下载
页: [1]
查看完整版本: DWGdirect ActiveX 3.3.0