【求助】关于catia中spline的问题。

  在UG中可以通过文本文档中的值直接生成曲线，我在CATIA中没有找到，
catia中有这项功能吗？还请赐教。

以前有伟仁兄发过一个excel文件的例子

谢谢，我正在找，唉，无法搜索，郁闷。

VB,macro的做法
  
比如3点-〉1spline
宏指令是
Language="VBSCRIPT"
  
Sub CATMain()
  
Set partDocument1 = CATIA.ActiveDocument
  
Set part1 = partDocument1.Part
  
Set hybridShapeFactory1 = part1.HybridShapeFactory
  
Set hybridShapeSpline1 = hybridShapeFactory1.AddNewSpline()
  
hybridShapeSpline1.SetSplineType 0
  
hybridShapeSpline1.SetClosing 0
  
Set hybridBodies1 = part1.HybridBodies
  
Set hybridBody1 = hybridBodies1.Item("Geometrical Set.1")
  
Set hybridShapes1 = hybridBody1.HybridShapes
  
Set hybridShapePointOnPlane1 = hybridShapes1.Item("oint.6")
  
Set reference1 = part1.CreateReferenceFromObject(hybridShapePointOnPlane1)
  
hybridShapeSpline1.AddPointWithConstraintExplicit reference1, Nothing, -1.000000, 1, Nothing, 0.000000
  
Set hybridShapePointOnPlane2 = hybridShapes1.Item("oint.5")
  
Set reference2 = part1.CreateReferenceFromObject(hybridShapePointOnPlane2)
  
hybridShapeSpline1.AddPointWithConstraintExplicit reference2, Nothing, -1.000000, 1, Nothing, 0.000000
  
Set hybridShapePointOnPlane3 = hybridShapes1.Item("oint.7")
  
Set reference3 = part1.CreateReferenceFromObject(hybridShapePointOnPlane3)
  
hybridShapeSpline1.AddPointWithConstraintExplicit reference3, Nothing, -1.000000, 1, Nothing, 0.000000
  
hybridBody1.AppendHybridShape hybridShapeSpline1
  
part1.InWorkObject = hybridShapeSpline1
  
part1.Update  
  
End Sub
  
把里头的点坐标用VB之类的写，从excel文件读将来就好

VC++的做法
  
使用以下的接口
  
CATTopSpine * CATCreateTopSpine( CATGeoFactory*  iGeoFactory,  
  CATTopData*  iTopData,  
  CATLISTP(CATGeometry)&  iProfiles)   
  
iProfiles是个点或其他同等元素的list
一般是CATPoint,  可以用直角坐标定义，坐标从文本文件读

高手，谢谢这位大哥。我回去试一试。谢谢。

在caxhome上也看到过

我在以前的帖子中找到的，不过DSE模块我没找到。https://www.icax.org/viewthread. ... %3D1&page=#pid=

原理是一样的

谢谢，受教了