From Xojo Documentation

Property (As Integer )
aOvalShape.Segments = newIntegerValue
IntegerValue = aOvalShape.Segments

Supported for all project types and targets.

The number of polygon sides to use when approximation is needed. Zero means it’s up to the renderer.


This example specifies the number of segments to use.

Dim o As New OvalShape
o.Width = 60
o.Height = 120
o.Segments = 5
o.FillColor = RGB(127, 127, 255)
g.DrawObject(o, o.Width, o.Height)