Description This function adds a new Beveled Wedge type Element Primitive node and returns the node number of the added object.
Syntax epNode = ElemAddBeveledWedge( tEnt )
Parameters epNode (Long) Node number of the element primitive that was added.
tEnt As T_ENTITY Data structure containing the generic entity information (name, parent, description, etc.) required to add a node to the object tree.
Example The example below shows how to initialize a T_ENTITY structure, add a Beveled Wedge type element primitive and then modify the element primitive parameters. Sub Main
'Initialize the generic element data Dim tEnt As T_ENTITY InitEntity( tEnt ) tEnt.name = "EP Beveled Wedge" tEnt.parent = 2 'Geometry folder
'Create the element primitive node Dim epNode As Long epNode = ElemAddBeveledWedge( tEnt )
'Modify the element primitive parameters ElemSetParmValue( epNode, 0, 4 ) 'X semi-aperture (semi-width) ElemSetParmValue( epNode, 1, 4 ) 'Y semi-aperture (semi-height) ElemSetParmValue( epNode, 2, 1 ) 'Bevel thickness ElemSetParmValue( epNode, 3, 20 ) 'Wedge angle (degrees)
'Update the model Update
End Sub
See Also
Element Primitive Script Commands Element Composite (boolean) Script Commands
|