1


大约一个半月以来，我一直在为 SolidWorks 应用程序编写一个脚本，我想改进它，因为它非常慢。

我的脚本做了什么：
1. 它告诉用户选择一些特定的组件（使用高级选择）。
2. 我从这些组件中收集。
3. 我从这些集合中创建一个集合，因为我需要根据它们的配置重新组合它们。
4. 每个组件中都有一个带有单个草图点的草图。我必须计算该点与 3D 草图中预​​定点的原点之间的距离。所以我把我的组件的sketchPoint附加到我的3Dsketch中，我计算，然后我删除它。
5. 我对每个组件都这样做（60++）

耗时的部分是我必须编辑我的 3DSketch，在其中添加一个点，关闭版本，计算距离，编辑，删除，再次关闭。

我目前正在做一个更面向对象的方法，所以不再收集集合，但我的问题仍然存在。我想知道 IMath 是否有用，因为我已经看到了：http
://help.solidworks.com/2014/english/api/sldworksapi/Transform_Sketch_to_Model_Example_VB.htm 但它似乎工作正常。

啊，我知道测量工具，但它不起作用，因为如果我的 sketchPoint 在我的原点“后面”，我需要负值。

谢谢 ：）

4

1 回答 1

1

好吧，我在 SolidWorks 论坛上问过同样的问题，有人给了我答案，这里是：

Dim myComp As Component2
Dim fSketch As Feature
Dim swSketch As Sketch
Dim vSketchPts As Variant
Dim swSketchPt As SketchPoint
Dim p(2) as Double
Dim mPt as MathPoint
Dim vPt as Variant
Dim myUtil as Mathutility

Set myUtil = swApp.GetMathUtility
Set fSketch = myComp.FeatureByName("mySketchName")
Set swSketch = fSketch.GetSpecificFeature2
vSketchPts = swSketch.GetSketchPoints2
Set swSketchPt = vSketchPts(0)

p(0)=swSketchPt.X
p(1)=swSketchPt.Y
p(2)=0.0
vPt = p
Set mPt = myUtil.CreatePoint(vPt)


Dim mthTrans As MathTransform

Set mthTrans = swSketch.ModelToSketchTransform
Set mPt= mPt.MultiplyTransform(mthTrans.Inverse)
Set mthTrans = swIRBoxComp.Transform2
Set mPt= mPt.MultiplyTransform(mthTrans)
vPt = mPt.ArrayData ' This will contain the XYZ coordinates of the point in the coordinate system of the 3D sketch

所有学分归西蒙·特纳https://forum.solidworks.com/people/1-KQHM1

于 2015-07-13T16:25:13.567 回答