Translating circle packing VB.NET gh component from R4 to R5

Replies to This Discussion

Permalink Reply by David Rutten on July 31, 2013 at 2:32am

bound.Contains(pt)

--

David Rutten

david@mcneel.com

Tirol, Austria

Permalink Reply by Oliver Hampel on March 24, 2015 at 6:04am

Hi Griffin,

I am trying the same thing and can not figure out how to reference RhinoPointInPlanarClosedCurve.

I don't seem to find this function anywhere in the SDK.

How did you update this block?

If (RhUtil.RhinoPointInPlanarClosedCurve(tPt, bound)) Then
Dim tCircle As New OnCircle(arrPoint(k), arrRadius(k))
arrCircle.Add(tCircle)
End If

Thank you,

Oliver

Permalink Reply by David Rutten on March 24, 2015 at 6:18am

Hi Oliver,

If (bound.Contains(tPt) Then

  arrCircle.Add(new ArcCurve(new Circle(arrPoint(k), arrRadius(k)))

End If

However if arrCircle only contains circles, I'd recommend against using ArcCurve at all. Just store the circles directly.

Permalink Reply by Oliver Hampel on March 24, 2015 at 7:25am

Thank you David