CATIA VBA-获取平面方程

Question

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

CATIA Screenshot

给出一个程序集，我如何允许用户：

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

Answer 1

我必须在gdir的注释中添加一点，即对于任何HybridShapePlane*对象，都存在获取两个方向向量和原点的方法。它们是GetOrigin，GetFirstAxis和GetSecondAxis。两个轴将作为位于平面上的两个正交单位向量给出。请注意，提到的方法是Subs（通过引用传递的值中返回值）。 您可以使用基本矢量几何来获取平面的法线[A，B，C]，然后使用原点的信息来计算D。

不想窃取gdir的署名，但我无法发表评论，并且我对为什么以评论的形式提供答案感到困惑。