RFVertex.CalcPlane

Description

Calculates a plane defined by the vertex normal and its position.

Syntax

Function RFVertex.CalcPlane(pPlane As RFPlane) As RFErrorCode

The CalcPlane syntax has these parts:

Remarks

• The normal vector of the plane is the same as the vertex normal which can be obtained by RFVertex.CalcNormal method. A point to define the plane is also the vertex position which can be obtained by RFVertex.GetPoint method.
  

Sample

Dim rfErr As RapidForm.RFErrorCode
Dim vtObj As RapidForm.RFVertex

    ' Assign the RFVertex interface object.
    Set vtObj = RapidForm.Vertex
    
    ' Pick a vertex.
    Dim pickedID As RFEntityID
    rfErr = RapidForm.SelectTools.PickEntity(RF_PICK_VERTEX, 1, pickedID)
    
    ' If an error happens, exit the subroutine.
    If rfErr <> RF_SUCCESS Then
        MsgBox RapidForm.Application.GetErrorMessage(rfErr)
        Exit Sub
    End If
    
    rfErr = vtObj.SetID(pickedID)
        
    ' Calcuate the underlying plane of the vertex.
    Dim avgPl As RFPlane
    rfErrr = vtObj.CalcPlane(avgPl)