CAD获取一个图形上所有直线的交点.docx

CAD获取一个图形上所有直线的交点纯数学运算的方法做的 通过构建二元一次方程 然后 判断相交点是否在线上.代码完全可行哈using(vartr=doc.TransactionManager.StartTransaction()varlines=newList();foreach(ObjectIdidinres.Value.GetObjectIds()lines.Add(Line)tr.GetObject(id,OpenMode.ForRead);Listpts=newList();for(intm=0;mlines.Count;m+)LineSegment3dls1=newLineSegment3d(linesm.StartPoint,linesm.EndPoint);for(intn=m+1;nlines.Count;n+)LineSegment3dls2=newLineSegment3d(linesn.StartPoint,linesn.EndPoint);CurveCurveIntersector3dcc3d=newCurveCurveIntersector3d(ls1,ls2,Vector3d.ZAxis);if(cc3d.NumberOfIntersectionPoints=1)pts.Add(cc3d.GetIntersectionPoint(0);BlockTablebt=tr.GetObject(db.BlockTableId,OpenMode.ForRead)asBlockTable;BlockTableRecordbtr=tr.GetObject(db.CurrentSpaceId,OpenMode.ForWrite)asBlockTableRecord;foreach(varptinpts)Circlec=newCircle(pt,Vector3d.ZAxis,1);btr.AppendEntity(c);tr.AddNewlyCreatedDBObject(c,true);tr.Commit();另一个可行切简洁的代码CommandMethod(tx1)publicstaticvoidCrossCAD()vardoc=Application.DocumentManager.MdiActiveDocument;vardb=doc.Database; vared=doc.Editor;varsf=newSelectionFilter(newTypedValuenewTypedValue(0,line);varres=ed.SelectAll(sf);if(res.Status!=PromptStatus.OK)return;using(vartr=doc.TransactionManager.StartTransaction()varlines=newList();foreach(ObjectIdidinres.Value.GetObjectIds()lines.Add(Line)tr.GetObject(id,OpenMode.ForRead);Listpts=newList();for(intm=0;mlines.Count;m+)LineSegment3dls1=newLineSegment3d(linesm.StartPoint,linesm.EndPoint);for(intn=m+1;nlines.Count;n+)LineSegment3dls2=newLineSegment3d(linesn.StartPoint,linesn.EndPoint);CurveCurveIntersector3dcc3d=newCurveCurveIntersector3d(ls1,ls2,Vector3d.ZAxis);if(cc3d.NumberOfIntersectionPoints=1)pts.Add(cc3d.GetIntersectionPoint(0);BlockTablebt=tr.GetObject(db.BlockTableId,OpenMode.ForRead)asBlockTable;BlockTableRecordbtr=tr.GetObject(db.CurrentSpaceId,OpenMode.ForWrite)asBlockTableRecord;foreach(varptinpts)Circlec=n