CAD打开文件问题

fish27jo · 发表于 2009-6-15 19:39:00

看了论坛中的cad二次开发,受益匪浅,但是只能在dwg文件被打开后,手动执行C#程序获取被打开DWG文件的相关信息,
现在我想想在cad filedlg打开文件的时候就获取到文件的信息,请问如何获取,最好能做到实时,如打开多个文件,依次都能获取到信息,谢谢

雪山飞狐_lzh · 发表于 2009-6-15 19:46:00

看下这里11楼的代码
使用文档事件

fish27jo · 发表于 2009-6-15 19:57:00

你是指这个Application.DocumentManager.DocumentCreated += new DocumentCollectionEventHandler(documentCreated); 么
能做到同步等待么

fish27jo · 发表于 2009-6-15 22:06:00

你是指这个Application.DocumentManager.DocumentCreated += new DocumentCollectionEventHandler(documentCreated); 么
能做到同步等待么

雪山飞狐_lzh · 发表于 2009-6-15 22:25:00

不要重复发帖
DocumentCreated 顾名思义文档创建后

fish27jo · 发表于 2009-6-21 13:40:00

斑竹你好,我参考了你的代码,但是在实际应用当中还是有很多的疑问
比如.OpenFileDialog这个类,好像对原有的cad原有的filedlg没有什么影响
请再指教指教,怎么能做到捕获类似于c#中 OpenFileDialog.ShowDialog() == DialogResult.OK 这个消息,
方便的话请给点示例代码

雪山飞狐_lzh · 发表于 2009-6-21 14:56:00

你具体想实现什么功能？
详细说下吧

fish27jo · 发表于 2009-6-21 15:07:00

想在cad打开文件的时候获取到被打开文件的信息,
所以就想在fileopendlg.ShowDialog() == DialogResult.OK的时候获取到被打开dwg文件信息,可以做到么?

雪山飞狐_lzh · 发表于 2009-6-21 16:13:00

直接处理DocumentCreated 事件就好了

copy


    class TlsApplication : IExtensionApplication
    {
        void IExtensionApplication.Initialize()
        {
            TTest.Start();
        }
        void IExtensionApplication.Terminate()
        {
        }
    }
    class TTest
    {
        public static void Start()
        {
            Application.DocumentManager.DocumentCreated += new DocumentCollectionEventHandler(documentCreated);
        }
        static void documentCreated(object sender, DocumentCollectionEventArgs e)
        {
            Document doc = e.Document;
            Database db = doc.Database;
            string s = "";
            using (Transaction tr = db.TransactionManager.StartTransaction())
            {
                BlockTable bt = (BlockTable)tr.GetObject(db.BlockTableId, OpenMode.ForRead);
                BlockTableRecord btr = (BlockTableRecord)tr.GetObject(bt[BlockTableRecord.ModelSpace], OpenMode.ForRead);
                foreach (ObjectId id in btr)
                {
                    Entity ent = (Entity)tr.GetObject(id, OpenMode.ForRead);
                    s += "\n" + ent.GetType().Name;
                }
            }
            doc.Editor.WriteMessage(s);
        }
    }

复制代码

wz0406 · 发表于 2017-8-14 08:53:00

Imports Autodesk.AutoCAD.Runtime
Imports Autodesk.AutoCAD.ApplicationServices
Imports Autodesk.AutoCAD.EditorInput
Imports Autodesk.AutoCAD.Windows
Imports Autodesk.AutoCAD.DatabaseServices
Imports Autodesk.AutoCAD.Geometry
Namespace ManagedApplication
Class TlsApplication
      Implements IExtensionApplication
      Public Sub Initialize() Implements IExtensionApplication.Initialize
         TTest.Start()
      End Sub
      Public Sub Terminate() Implements IExtensionApplication.Terminate
      End Sub
End Class
Class TTest
      Public Shared Sub Start()
         AddHandler Application.DocumentManager.DocumentCreated, New DocumentCollectionEventHandler(AddressOf documentCreated)
      End Sub
      Shared Sub documentCreated(ByVal sender As Object, ByVal e As DocumentCollectionEventArgs)
         Dim doc As Document = e.Document
         Dim db As Database = doc.Database
         Dim s As String = ""
         Dim tr As Transaction = db.TransactionManager.StartTransaction()
         doc.Editor.WriteMessage("111")
         Using tr
            Dim bt As BlockTable = CType(tr.GetObject(db.BlockTableId, OpenMode.ForRead), BlockTable)
            Dim btr As BlockTableRecord = CType(tr.GetObject(bt(BlockTableRecord.ModelSpace), OpenMode.ForRead), BlockTableRecord)
            Dim id As ObjectId
            For Each id In btr
                  Dim ent As Entity = CType(tr.GetObject(id, OpenMode.ForRead), Entity)
                  s += "\n" + ent.GetType().Name
                  doc.Editor.WriteMessage(s)
            Next
         End Using
      End Sub
End Class
End Namespace

CAD打开文件问题

发表回复

精选推荐