CAD打开文件问题

fish27jo

看了论坛中的cad二次开发,受益匪浅,但是只能在dwg文件被打开后,手动执行C#程序获取被打开DWG文件的相关信息,

现在我想想在cad  filedlg打开文件的时候就获取到文件的信息,请问如何获取,最好能做到实时,如打开多个文件,依次都能获取到信息,谢谢

雪山飞狐_lzh

看下这里11楼的代码

使用文档事件

http://www.mjtd.com/bbs/dispbbs.asp?boardid=33&replyid=10314&id=75996&page=2&skin=0&landlord=0&Star=2

fish27jo

你是指这个Application.DocumentManager.DocumentCreated += new DocumentCollectionEventHandler(documentCreated); 么

能做到同步等待么

fish27jo

你是指这个Application.DocumentManager.DocumentCreated += new DocumentCollectionEventHandler(documentCreated); 么

能做到同步等待么

雪山飞狐_lzh

不要重复发帖

DocumentCreated 顾名思义 文档创建后

fish27jo

斑竹你好,我参考了你的代码,但是在实际应用当中还是有很多的疑问

比如MSITStore:C:\Documents%20and%20Settings\Administrator\桌面\arxref(.net).chm::/1/Autodesk.AutoCAD.Windows.html">Autodesk.AutoCAD.Windows.OpenFileDialog这个类,好像对原有的cad原有的filedlg没有什么影响

请再指教指教,怎么能做到捕获类似于c#中 OpenFileDialog.ShowDialog() == DialogResult.OK 这个消息,

方便的话请给点示例代码

雪山飞狐_lzh

你具体想实现什么功能？

详细说下吧

fish27jo

想在cad打开文件的时候获取到被打开文件的信息,

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

雪山飞狐_lzh

直接处理DocumentCreated 事件就好了

2.     class TlsApplication : IExtensionApplication
3.     {
4.         void IExtensionApplication.Initialize()
5.         {
6.             TTest.Start();
7.         }
8.         void IExtensionApplication.Terminate()
9.         {
10.         }
11.     }
12.     class TTest
13.     {
14.         public static void Start()
15.         {
16.             Application.DocumentManager.DocumentCreated += new DocumentCollectionEventHandler(documentCreated);
17.         }
18.         static void documentCreated(object sender, DocumentCollectionEventArgs e)
19.         {
20.             Document doc = e.Document;
21.             Database db = doc.Database;
22.             string s = "";
23.             using (Transaction tr = db.TransactionManager.StartTransaction())
24.             {
25.                 BlockTable bt = (BlockTable)tr.GetObject(db.BlockTableId, OpenMode.ForRead);
26.                 BlockTableRecord btr = (BlockTableRecord)tr.GetObject(bt[BlockTableRecord.ModelSpace], OpenMode.ForRead);
27.                 foreach (ObjectId id in btr)
28.                 {
29.                     Entity ent = (Entity)tr.GetObject(id, OpenMode.ForRead);
30.                     s += "\n" + ent.GetType().Name;
31.                 }
32.             }
33.             doc.Editor.WriteMessage(s);
34.         }
35.     }

    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);         }     }

1. Polyline
2. Polyline
3. Polyline
4. Polyline
5. Line
6. Line
7. Line
8. Line
9. Line
10. Line
11. Line
12. Spline
13. Arc
14. Arc
15. Circle
16. Circle
17. Circle
18. Arc
19. Polyline3d
20. Polyline3d
21. Ellipse
22. Ellipse
23. Arc
24. Circle
25. Ellipse
26. Ellipse
27. Line

复制代码

wz0406

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