CATIA VBA - 获取平面方程

CATIA VBA - Get Plane Equation

我正在编写 CATIA VBA 代码来操纵和交换装配体中的平面。我无法找到正确的 CATIA API 来读取特定平面的 Ax+By+Cz=D 方程。我知道 CATIA 的 HybridShapePlaneEquationHybridShapeAxistoAxis 对象,但是没有关于如何从 CATIA.ActiveDocument 对象派生对象的文档,我什至不确定这些是否正确 APIs 使用。

CATIA Screenshot

给定一个程序集,我如何允许用户:

  1. Select 通过在“几何集”或“外部参考”部分下单击一个平面
  2. MsgBox()
  3. 中显示平面方程

我必须在 gdir 的评论中补充一点,对于任何 HybridShapePlane* 对象,也存在获取两个方向向量和原点的方法。它们是 GetOriginGetFirstAxisGetSecondAxis。这两个轴将作为位于平面上的两个正交单位向量给出。请注意,提到的方法是 Subs(值在通过引用传递的值中返回)。 您可以使用基本矢量几何来获得平面的法线 [A,B,C],然后使用来自原点的信息计算 D。

不想窃取 gdir 的归属,但我不能 post 发表评论,我很困惑为什么答案已作为评论提供。