Revit二次开发——自动标注轴网

引言：在自动标注大主题下，自动标注轴网；利弊等望读者自行改进（仅限平面视图）

开始：

using Autodesk.Revit.Attributes;
using Autodesk.Revit.DB;
using Autodesk.Revit.DB.Architecture;
using Autodesk.Revit.UI;
using Autodesk.Revit.UI.Selection;
using System;
using System.Collections;
using System.Collections.Generic;
using System.Linq;namespace AutoDimention
{[TransactionAttribute(TransactionMode.Manual)]public class AutoDimentionGrid_Cmd : IExternalCommand{public Result Execute(ExternalCommandData commandData, ref string message, ElementSet elements){UIDocument uidoc = commandData.Application.ActiveUIDocument;Document doc = uidoc.Document;FilteredElementCollector collectorGrid = new FilteredElementCollector(doc);collectorGrid.OfClass(typeof(Grid)).OfCategory(BuiltInCategory.OST_Grids);IList<Element> listGrids = collectorGrid.ToElements().ToList();List<Line> ListGridY = new List<Line>();List<Line> ListGridX = new List<Line>();Line lineGridX = null;Line lineGridY = null;XYZ Xvec = new XYZ(-1, 0, 0);//*-X单位向量XYZ Xvec2 = new XYZ(1, 0, 0);//*X单位向量XYZ Yvec = new XYZ(0, -1, 0);//*-Y单位向量XYZ Yvec2 = new XYZ(0, 1, 0);//*Y单位向量ReferenceArray refArryGridY = new ReferenceArray();ReferenceArray refArryGridX = new ReferenceArray();foreach (Element TemElement in listGrids){Grid grid = TemElement as Grid;Line line = grid.Curve as Line;if (line.Direction.IsAlmostEqualTo(Yvec) || line.Direction.IsAlmostEqualTo(Yvec2)){ListGridY.Add(line);refArryGridY.Append(new Reference(grid));}if (line.Direction.IsAlmostEqualTo(Xvec) || line.Direction.IsAlmostEqualTo(Xvec2)){ListGridX.Add(line);refArryGridX.Append(new Reference(grid));}}if (ListGridX.Count >= 2){lineGridX = Line.CreateBound(ListGridX[0].Origin, ListGridX[1].Origin);}if (ListGridY.Count >= 2){lineGridY = Line.CreateBound(ListGridY[0].Origin, ListGridY[1].Origin);}using (Transaction transaction = new Transaction(doc, "AutoDimenionGrid")){try{transaction.Start();doc.Create.NewDimension(doc.ActiveView, lineGridY, refArryGridY);doc.Create.NewDimension(doc.ActiveView, lineGridX, refArryGridX);transaction.Commit();}catch (Exception){transaction.Commit();}}return Result.Succeeded;}}
}

技术群：1090519856

Revit二次开发——自动标注轴网相关推荐

Revit二次开发——自动标注钢筋思路（3）
仍然是接上一篇本篇分析标注钢筋的思路 (另:构件图思路分享系列的阅读顺序是2-3-1) 测试环境visual studio2017 + revit2016 demo: 实现思路: 测试时,首先想到的 ...
Revit二次开发——自动生成构件图（总结）
之前测试导出构件图的功能实现,拆分了各模块分布进行测试: Revit二次开发--一键导出构件图(1) Revit二次开发--叠合板自动配筋(2) Revit二次开发--自动标注钢筋思路(3) 本篇为这 ...
Revit二次开发自动生成剖面楼梯标注
引用 revit坐标与屏幕坐标的转换前置关于Revit中楼梯竖向标注的问题记录及生成方式的解决方案样式内容上面链接文件中提供了一种屏幕坐标转换为项目坐标的办法,原理时通过屏幕中的点与边界的比 ...
【Revit二次开发】在轴网相交处创建柱子
写在前面,要做到如图的样子.因为对Revit软件的使用根本不熟,所以遇到了很多问题,在这里先罗列一下,万一有跟我相同疑问的同学也可以互相交流一下. 首先目的是在轴线的交点处创建柱子第一步:在Revi ...
Revit二次开发-自动线性尺寸标注
在这里就不多说什么,直接上主要代码,分享给大家,希望对各位有帮助,有更好的意见的也欢迎大家留言. /// <summary>/// 自动创建所选中的一组图元的线性距离尺寸/// </ ...
Revit二次开发-修改标注线尺寸界线的方向
有时候,我们想标注一个尺寸,正常情况下尺寸界线最好是贴着要标注的物体. 尺寸界线贴着物体在Revit中,用以下代码生成标注 Line lineVertical = Line.CreateBound( ...
Creo 二次开发-自动标注球标
基本思路检索所有模型尺寸按照位置对尺寸进行排序检索球标模型遍历尺寸,根据尺寸类型和占位宽度计算球标和尺寸的相对位置创建顺序球标程序实现检索尺寸前先判断当前环境是否为绘图环境,如果不是则直 ...
cad通过钢筋大样生成钢筋明细表插件_Revit二次开发——自动生成构件图（总结）...
之前测试导出构件图的功能实现,拆分了各模块分布进行测试:Revit二次开发--一键导出构件图(1) Revit二次开发--叠合板自动配筋(2) Revit二次开发--自动标注钢筋思路(3) 本篇为这个 ...
Revit二次开发案例一（第1讲）
这期起,将为大家带来二次开发的小案例讲解,通过借助Revit建模与二次开发,帮助大家快速提高开发水平,快快参加吧!!! 族实例是通过族类型创建的,而创建族实例是Revit二次开发尤其重要的,因此小伙伴 ...

Revit二次开发——自动标注轴网

Revit二次开发——自动标注轴网相关推荐

最新文章

热门文章