CAD.Net 获取绘图区域范围[左下，右上]

fangmin723

1. [CommandMethod("ScreenExtents")]
   
2. public void ScreenExtents()
   
3. {
   
4.     Document doc = Acap.DocumentManager.MdiActiveDocument;
   
5.     Database db = doc.Database;
   
6.     var ext = Env.ScreenArea;
   
7. 
   
8.     var ext1 = Env.DrawingArea;
   
9.     using (Transaction Tx = db.TransactionManager.StartTransaction())
   
10.     {
    
11.         //Draws a line to visualize result...
    
12. 
    
13.         Line line = new Line(ext.MinPoint, ext.MaxPoint);
    
14.         Line line1 = new Line(ext1.MinPoint, ext1.MaxPoint);
    
15.         line1.ColorIndex = 1;
    
16.         BlockTableRecord btr = Tx.GetObject(db.CurrentSpaceId, OpenMode.ForWrite) as BlockTableRecord;
    
17.         btr.AppendEntity(line);
    
18.         btr.AppendEntity(line1);
    
19.         Tx.AddNewlyCreatedDBObject(line, true);
    
20.         Tx.AddNewlyCreatedDBObject(line1, true);
    
21.         Tx.Commit();
    
22.     }
    
23. }

[CommandMethod("ScreenExtents")]<br /> public void ScreenExtents()<br /> {<br />     Document doc = Acap.DocumentManager.MdiActiveDocument;<br />     Database db = doc.Database;<br />     var ext = Env.ScreenArea;<br /> <br />     var ext1 = Env.DrawingArea;<br />     using (Transaction Tx = db.TransactionManager.StartTransaction())<br />     {<br />         //Draws a line to visualize result...<br /> <br />         Line line = new Line(ext.MinPoint, ext.MaxPoint);<br />         Line line1 = new Line(ext1.MinPoint, ext1.MaxPoint);<br />         line1.ColorIndex = 1;<br />         BlockTableRecord btr = Tx.GetObject(db.CurrentSpaceId, OpenMode.ForWrite) as BlockTableRecord;<br />         btr.AppendEntity(line);<br />         btr.AppendEntity(line1);<br />         Tx.AddNewlyCreatedDBObject(line, true);<br />         Tx.AddNewlyCreatedDBObject(line1, true);<br />         Tx.Commit();<br />     }<br /> }

autocad.net（c#）获取autocad模型空间窗口大小_c#获取窗口大小-CSDN博客

1. /// <summary>
   
2. /// 获取绘图区域范围[左下，右上]
   
3. /// 参考：<see href="https://adndevblog.typepad.com/AutoCAD/2012/04/getting-the-extents-of-autocad-model-window.html"/>
   
4. /// </summary>
   
5. public static Extents3d ScreenArea
   
6. {
   
7.     get
   
8.     {
   
9.         var doc = Acap.DocumentManager.MdiActiveDocument;
   
10.         var ed = doc.Editor;
    
11.         var screenSize = (Point2d)Acap.GetSystemVariable("SCREENSIZE");
    
12.         var leftUpper = new System.Drawing.Point(0, 0);
    
13.         var rightLower = new System.Drawing.Point((int)screenSize.X, (int)screenSize.Y);
    
14.         var leftUpperPt = ed.PointToWorld(leftUpper, 0);
    
15.         var rightLowerPt = ed.PointToWorld(rightLower, 0);
    
16.         return new(leftUpperPt.GetMinPtTo(rightLowerPt), leftUpperPt.GetMaxPtTo(rightLowerPt));
    
17.     }
    
18. }
    
19. 
    
20. /// <summary>
    
21. /// 获取绘图区域范围[左下，右上]
    
22. /// 参考：<see href="http://bbs.mjtd.com/forum.php?mod=redirect&goto=findpost&ptid=171361&pid=763395&fromuid=7316343"/>
    
23. /// </summary>
    
24. public static Extents3d DrawingArea
    
25. {
    
26.     get
    
27.     {
    
28.         var areaCenter = "VIEWCTR".GetVar<Point3d>();
    
29.         var areaHeight = "VIEWSIZE".GetVar<double>() * 0.5;
    
30.         var areaSize = "SCREENSIZE".GetVar<Point2d>();
    
31.         var areaVect = new Vector3d(areaSize.X / areaSize.Y * areaHeight, areaHeight, 0);
    
32.         return new(areaCenter - areaVect, areaCenter + areaVect);
    
33.     }
    
34. }

/// <summary><br /> /// 获取绘图区域范围[左下，右上]<br /> /// 参考：<see href="https://adndevblog.typepad.com/<a href="http://bbs.mjtd.com/forum-41-1.html" target="_blank" class="relatedlink">AutoCAD</a>/2012/04/getting-the-extents-of-autocad-model-window.html"/><br /> /// </summary><br /> public static Extents3d ScreenArea<br /> {<br />     get<br />     {<br />         var doc = Acap.DocumentManager.MdiActiveDocument;<br />         var ed = doc.Editor;<br />         var screenSize = (Point2d)Acap.GetSystemVariable("SCREENSIZE");<br />         var leftUpper = new System.Drawing.Point(0, 0);<br />         var rightLower = new System.Drawing.Point((int)screenSize.X, (int)screenSize.Y);<br />         var leftUpperPt = ed.PointToWorld(leftUpper, 0);<br />         var rightLowerPt = ed.PointToWorld(rightLower, 0);<br />         return new(leftUpperPt.GetMinPtTo(rightLowerPt), leftUpperPt.GetMaxPtTo(rightLowerPt));<br />     }<br /> }<br /> <br /> /// <summary><br /> /// 获取绘图区域范围[左下，右上]<br /> /// 参考：<see href="http://bbs.mjtd.com/forum.php?mod=redirect&goto=findpost&ptid=171361&pid=763395&fromuid=7316343"/><br /> /// </summary><br /> public static Extents3d DrawingArea<br /> {<br />     get<br />     {<br />         var areaCenter = "VIEWCTR".GetVar<Point3d>();<br />         var areaHeight = "VIEWSIZE".GetVar<double>() * 0.5;<br />         var areaSize = "SCREENSIZE".GetVar<Point2d>();<br />         var areaVect = new Vector3d(areaSize.X / areaSize.Y * areaHeight, areaHeight, 0);<br />         return new(areaCenter - areaVect, areaCenter + areaVect);<br />     }<br /> }

出自：IFoxCad

1. /// <summary>
   
2. /// 获取CAD的系统变量
   
3. /// </summary>
   
4. /// <typeparam name="T">值的类型</typeparam>
   
5. /// <param name="name">要获取的系统变量名称</param>
   
6. /// <returns>返回系统变量</returns>
   
7. public static T GetVar<T>(this string name)
   
8. {
   
9.     if (string.IsNullOrEmpty(name)) return default;
   
10.     try { return (T)Acap.GetSystemVariable(name); }
    
11.     catch (Exception) { throw; }
    
12.     //return Acaop.GetSystemVariable(name);
    
13. }
    
14. 
    
15. /// <summary>
    
16. /// 设置CAD的系统变量
    
17. /// 0x01 建议先获取现有变量值和设置的是否相同,否则直接设置会发生异常<br/>
    
18. /// 0x02 建议锁文档,否则 Psltscale 设置发生异常<br/>
    
19. /// 发生异常的时候vs输出窗口会打印一下,但是如果不介意也没啥问题
    
20. /// </summary>
    
21. /// <param name="name">要设置的系统变量名称</param>
    
22. /// <param name="value">要设置的系统变量值</param>
    
23. /// <param name="echo">输出异常,默认true;此设置仅为打印到命令栏,无法控制vs输出</param>
    
24. public static void SetVar(this string name, object value, bool echo = true)
    
25. {
    
26.     if (string.IsNullOrEmpty(name)) return;
    
27.     if (value is null) return;
    
28.     try { Acap.SetSystemVariable(name, value); }
    
29.     catch (Exception) { if (echo) $"{value} 是不存在的变量！".PrintLine(); }
    
30. }

/// <summary><br /> /// 获取CAD的系统变量<br /> /// </summary><br /> /// <typeparam name="T">值的类型</typeparam><br /> /// <param name="name">要获取的系统变量名称</param><br /> /// <returns>返回系统变量</returns><br /> public static T GetVar<T>(this string name)<br /> {<br />     if (string.IsNullOrEmpty(name)) return default;<br />     try { return (T)Acap.GetSystemVariable(name); }<br />     catch (Exception) { throw; }<br />     //return Acaop.GetSystemVariable(name);<br /> }<br /> <br /> /// <summary><br /> /// 设置CAD的系统变量<br /> /// 0x01 建议先获取现有变量值和设置的是否相同,否则直接设置会发生异常<br/><br /> /// 0x02 建议锁文档,否则 Psltscale 设置发生异常<br/><br /> /// 发生异常的时候vs输出窗口会打印一下,但是如果不介意也没啥问题<br /> /// </summary><br /> /// <param name="name">要设置的系统变量名称</param><br /> /// <param name="value">要设置的系统变量值</param><br /> /// <param name="echo">输出异常,默认true;此设置仅为打印到命令栏,无法控制vs输出</param><br /> public static void SetVar(this string name, object value, bool echo = true)<br /> {<br />     if (string.IsNullOrEmpty(name)) return;<br />     if (value is null) return;<br />     try { Acap.SetSystemVariable(name, value); }<br />     catch (Exception) { if (echo) $"{value} 是不存在的变量！".PrintLine(); }<br /> }

szhorse

楼主这是要写批打插件了吗

fangmin723

szhorse 发表于 2024-6-11 14:27
楼主这是要写批打插件了吗

不是，批量打印我用lisp写了个，.NET版，暂时没有想法

szhorse

fangmin723 发表于 2024-6-11 15:46
不是，批量打印我用lisp写了个，.NET版，暂时没有想法

厉害了，自给自足

你有种再说一遍

芜湖,居然看到了更新了getvar,但是这个事务怎么没有using(xx);短写

fangmin723

你有种再说一遍 发表于 2024-6-11 18:21
芜湖,居然看到了更新了getvar,但是这个事务怎么没有using(xx);短写

从网站上看抄来的，为了新手的可读性，我就没改动他了

yerenyi