Previous Document Next Document

Object Model Reference : Classes : R : Rectangle : Properties : Rectangle.MaxRadius


Rectangle.MaxRadius

Property MaxRadius As Double

Description

Member of Rectangle

The MaxRadius property returns the maximum radius value possible for a rectangle’s rounded corner. This value is half the size of the shortest side of a rectangle.

The MaxRadius property returns a read-only value.

VBA example

The following VBA example sets the maximum corner radius for all rectangles to 0.5".

Sub Test()
 Dim s As Shape
 Const r As Double = 0.5
 For Each s In ActivePage.FindShapes(Type:=cdrRectangleShape)
  If s.Rectangle.MaxRadius >= r Then
   s.Rectangle.SetRadius r
  End If
 Next s
End Sub

Previous Document Next Document Back to Top

Copyright 2013 Corel Corporation. All rights reserved.