Object2D.Scale

From Xojo Documentation

Property (As Double )
aObject2D.Scale = newDoubleValue
or
DoubleValue = aObject2D.Scale

Supported for all project types and targets.

The scaling factor relative to the object’s original size.

Example

The following code rescales the arc by a factor of 1.5.

Dim a As New ArcShape
a.Scale = 1.5
a.Rotation = .90
a.ArcAngle = 1.57
a.StartAngle = -1.57
a.Border = 100
a.BorderColor = &c0000ff
a.BorderWidth = 2.75
a.Fill = 50
a.FillColor = RGB(255, 0, 127)
g.DrawObject(a, 100, 100)