FarPoint.Win.Spread.DrawingSpace.RoundedRectangleShape rrs = new FarPoint.Win.Spread.DrawingSpace.RoundedRectangleShape();
rrs.CanSize = FarPoint.Win.Spread.DrawingSpace.Sizing.HeightAndWidth;
rrs.CanMove = FarPoint.Win.Spread.DrawingSpace.Moving.HorizontalAndVertical;
rrs.BackColor = Color.Yellow;
rrs.Anchor = 20;
rrs.SetBounds(20, 20, 60, 60);
fpSpread1.ActiveSheet.AddShape(rrs);
Dim rrs As New FarPoint.Win.Spread.DrawingSpace.RoundedRectangleShape()
rrs.CanSize = FarPoint.Win.Spread.DrawingSpace.Sizing.HeightAndWidth
rrs.CanMove = FarPoint.Win.Spread.DrawingSpace.Moving.HorizontalAndVertical
rrs.BackColor = Color.Yellow
rrs.Anchor = 20
rrs.Parent = FpSpread1
rrs.SetBounds(20, 20, 60, 60)
FpSpread1.ActiveSheet.AddShape(rrs)