多线段的Normal不是0,0,1如何改成0,0,1

离碎

多线段的Normal不是0,0,1如何改成0,0,1

离碎

Dim oldPoint As Point3d = Curve.Ecs.CoordinateSystem3d.Origin
Dim oldx As Vector3d = Curve.Ecs.CoordinateSystem3d.Xaxis
Dim oldy As Vector3d = Curve.Ecs.CoordinateSystem3d.Yaxis
Dim oldz As Vector3d = Curve.Ecs.CoordinateSystem3d.Zaxis
Dim mm As Matrix3d = Matrix3d.AlignCoordinateSystem(oldPoint, oldx, oldy, oldz, Point3d.Origin, Vector3d.XAxis, Vector3d.YAxis, Vector3d.ZAxis)
Curve.TransformBy(mm)
这样转换后ECS和Normal都正常了，但图形的位置变动了，不知道后面怎么转换

你有种再说一遍

法向量反转了,需要基变换