Revit API画垂直于风管的风管

最新推荐文章于 2021-09-06 10:43:57 发布

weixin_33701617

最新推荐文章于 2021-09-06 10:43:57 发布

阅读量305

点赞数

本文介绍了一种在Revit软件中通过选择风管与风管外一点，绘制垂直于该风管的新风管的方法，包括获取风管类型、选择风管与点、计算投影点并创建新风管的全过程。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

start

/// <summary>
/// 选择风管与风管外一点，画与风管垂直的风管。
/// </summary>
[Transaction(TransactionMode.Manual)]
[Regeneration(RegenerationOption.Manual)]
public class cmd : IExternalCommand
{
     public Result Execute(ExternalCommandData cmdData, ref string msg, ElementSet elements)
    {
        UIDocument uiDoc = cmdData.Application.ActiveUIDocument;
        UIApplication uiApp = cmdData.Application;
        Document doc = uiDoc.Document;
        Selection selection = uiDoc.Selection;

        Transaction ts = new Transaction(doc, " http://revit.5d6d.com ");
        ts.Start();
         // 得到一种风管类型
        DuctType ductType = null;
        FilteredElementCollector collector = new FilteredElementCollector(doc);
        collector.OfClass( typeof(DuctType));
         foreach (Element el in collector.ToElements())
        {
            ductType = el as DuctType;
             break;
        }
         //
        Reference refDuct = selection.PickObject(ObjectType.Element, " 选择一根风管： ");
        Duct duct = doc.GetElement(refDuct) as Duct;
        XYZ xyz = selection.PickPoint(); // 选择一点
        LocationCurve lCurve = duct.Location as LocationCurve;
        IntersectionResult interResult = lCurve.Curve.Project(xyz); // 点在直线上的投影
         if (interResult != null)
        {
            doc.Create.NewDuct(xyz, interResult.XYZPoint, ductType);
        }
        ts.Commit();
         return Result.Succeeded;
    }
}

url: http://greatverve.cnblogs.com/p/Curve-Project.html