DInsight

Code: Select all

	public void TestCurveToTorusProjection3()
        {
            IStdShape_DG iStdShape = m_iGener.Create("StdShape_DG") as IStdShape_DG;
            double R = 10;
            double r = 3;
            IEntity_DG iEnt = iStdShape.Torus(R, r);
            m_iModel.AddEntity(iEnt);
            IBRepGeometry_DG iGeomBRep = iEnt as IBRepGeometry_DG;
            IBRepShape_DG iShape = iGeomBRep.GetShape();
            ShapeType_DG type = iShape.GetShapeType();
            Debug.Assert(type == ShapeType_DG.eShTypeSolidDG);
            IShapeArray_DG faces = iShape.GetSubShapes(ShapeType_DG.eShTypeFaceDG);
            IBRepFace_DG iFace = faces.GetAt(0) as IBRepFace_DG;
            IUVSurface_DG iSurface = iFace.GetSurface();
            ESurfaceType_DG typeSurf = iSurface.GetSurfaceType();
            Debug.Assert(typeSurf == ESurfaceType_DG.eSurfTypeTorus);

            // Circle at the origing with z axis as its axis
            IEntity_DG iEntCircle = iStdShape.Circle(r);
            IBRepGeometry_DG iGeomBRepCircle = iEntCircle as IBRepGeometry_DG;
            IBRepShape_DG iShapeCircle = iGeomBRepCircle.GetShape();
            ShapeType_DG type2 = iShapeCircle.GetShapeType();
            Debug.Assert(type2 == ShapeType_DG.eShTypeEdgeDG);
            IBRepEdge_DG edge = iShapeCircle as IBRepEdge_DG;
            ICurve_DG iCurve = edge.GetCurve();

            // Translate the circle forward by sphere radius and up (y) byt R+r
            // The circle is defined in the local frame of iEntCircle and does not have a frame by itself
            // So we have to change the geometry
            // The iEntCircle.GetLocation().Translate1(0, 0, R); above translated the entity, but not the curve 
            // inside WRT the local frame. iEntCircle was translated to show the location of the translated curve in 3D
            IGeometricObject_DG iCircleGeomObj = iCurve as IGeometricObject_DG;
            iCircleGeomObj.Translate1(0, R + r, R);

            ICurve_DG iCurveProjected = iSurface.GetCurveProjection(iCurve);

            IView iView = m_kernCAD.GetView();
            IScene_DG iScene = iView as IScene_DG;
            iScene.CreatePresentationEntity(iCurveProjected as IObject_DG, true, null);

            iView.Reset(true);      // Refit
        }