AddCone Method

AddCylinder Method →

Collapse All Expand All

BaseRadius: A double-precision variable representing the radius of the cone at its base.

Description

Adds a Polygon Mesh cone given the center, base radius, and height.

Visual Basic
Public Function AddCone( _ ByVal Center As Point, _ ByVal BaseRadius As Double, _ ByVal Height As Double _ ) As Solid3D

Center: A Point object identifying the center of the cone.
BaseRadius: A double-precision variable representing the radius of the cone at its base.
Height: A double-precision variable representing the height of the cone.

Private Sub AddCone_Example()

' This example adds a cone to the drawing using the AddCone method.

Dim myDoc As IntelliCAD.Document

Dim coneObj As IntelliCAD.PolygonMesh

Dim pt As Point

Set myDoc = ActiveDocument

Set pt = Library.CreatePoint(2, 2, 0)

Set coneObj = ThisDocument.ModelSpace.AddCone(pt, 3, 4)

coneObj.Update

ThisDocument.Application.ZoomExtents

End Sub