明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 827|回复: 3

[命令] 高手帮忙看看哪里出问题了?

[复制链接]
发表于 2017-10-20 08:07:42 | 显示全部楼层 |阅读模式
  1. using System;
  2. using System.Collections.Generic;
  3. using System.Linq;
  4. using System.Text;

  5. using System.IO;
  6. using Autodesk.AutoCAD.ApplicationServices;
  7. using Autodesk.AutoCAD.DatabaseServices;
  8. using Autodesk.AutoCAD.Runtime;
  9. using Autodesk.AutoCAD.Geometry;

  10. namespace _01
  11. {
  12.     public class Class1
  13.     {[CommandMethod("cd")]
  14.         public void closeAndSave()
  15.         {
  16.             Document doc;
  17.             Database db;
  18.             for (int i = 0; i <= 10; i++)
  19.             {
  20.                 doc = newdwg();
  21.                 using (DocumentLock docl = doc.LockDocument())
  22.                 {
  23.                     db = doc.Database;
  24.                     dwl(db);                    
  25.                 }
  26.                 sclose(doc, i);

  27.             }
  28.             
  29.         }

  30.         private void sclose(Document doc,int i)
  31.         {
  32.             doc.Database.SaveAs("d:\\00 dwg\\"+i+".DWG",DwgVersion.Current);
  33.             doc.CloseAndDiscard();
  34.         }

  35.         private void dwl(Database db)
  36.         {
  37.             Point3d p1 = Point3d.Origin;
  38.             double r = 100;
  39.             Circle c = new Circle();
  40.             c.Center = p1;
  41.             c.Radius = r;

  42.             using (Transaction tr = db.TransactionManager.StartTransaction())
  43.             {
  44.                 BlockTable bt = tr.GetObject(db.BlockTableId,OpenMode.ForRead) as BlockTable;
  45.                 BlockTableRecord btr=tr.GetObject(bt[BlockTableRecord.ModelSpace],OpenMode.ForWrite)as BlockTableRecord;
  46.                 btr.AppendEntity(c);
  47.                 tr.AddNewlyCreatedDBObject(c, true);
  48.                 tr.Commit();
  49.             }
  50.         }

  51.         private Document newdwg()
  52.         {   
  53.             string strTemplatePath = "acad.dwt";
  54.             DocumentCollection acDocMgr = Application.DocumentManager;
  55.             Document acDoc = acDocMgr.Add(strTemplatePath);
  56.             return acDocMgr.MdiActiveDocument = acDoc;
  57.         }

  58.     }
  59.     }
  60. ----------------------------
  61. vs2010+CAD2012,运行时,每次得打开默认的文件才能保存一个新生成的文件,不知道哪里有问题了,请高手帮忙把脉。非常感谢


 楼主| 发表于 2017-10-20 11:16:55 | 显示全部楼层
加载以后,每次得点击打开cad时默认的文件,程序才可以保存一个文件,不知道问题出在哪里,请各位大侠斧正,不胜感激。
发表于 2017-10-20 12:21:47 来自手机 | 显示全部楼层
commandflags.session
 楼主| 发表于 2017-10-20 14:23:26 | 显示全部楼层

太棒了,谢谢飞狐大神,我的工具收官。就这点老是出错,以前老分不清楚DocumentLock 的范围,总是提示NoDocument,现在应该是弄清楚了,谢谢
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-25 09:55 , Processed in 0.133482 second(s), 23 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表