SegmentedControlItem

From Xojo Documentation

Class (inherits from RectControl)


New in 2010r4

A segment of a SegmentedControl.

Properties
Enabled Icon Title
HelpTag Selected Width

Notes

You access the segments of a SegmentedControl from the control’s Items() property. It requires a parameter that specifies the segment that you want to address. For example, the following code selects all the segments in a loop. For each segment, it uses the Selected property to determine whether the segment is selected.

// count down to avoid re-evaluating the Ubound all the time
For i As Integer = SegmentedControl1.Items.Ubound DownTo 0

// get the reference to the segment
Dim s As SegmentedControlItem = SegmentedControl1.Items(i)

// see if the segment was selected
If s.Selected Then
// it is selected so increase this segment in size
s.Width = s.Width + 2
End If
Next

// make sure the segmented control knows to resizes its drawing boundaries or you can get weird effects
SegmentedControl1.SizeToFit

See Also

SegmentedControl control.