Circles in Rhino are 3D entities, you cannot define them by only a center point and a radius. Circles need a plane and a radius. The reason your circle is invalid is because the plane has x, y and z vectors of zero length.
The following will work:
Dim cr As New circle(Plane.WorldXY, 1)
cr.center = New Point3d(1, 2, 3)
a = cr
you could also use one of the other constructor possibilities (overloads) to obtain a circle from a point. RhinoCommon will set the plane as parallel to the XY plane.
This is a shortcut, as RhinoCommon will do the work of creating the plane.
A = New Circle(New Point3d(1, 2, 3), 1)
Permalink Reply by RG on October 21, 2010 at 3:37am
thanks,
do you think is possible to put a specific color to a circle?