| 
       | 
        
       | Object Model Reference : Classes : S : Shape : Properties : Shape.Polygon  | 
      
Property Polygon As Polygon
Member of Shape
The Polygon property returns a Polygon object that represents the settings for a symmetrical polygon shape.
The Polygon property returns a read-only value.
The following VBA example converts all symmetrical polygon shapes on the active page to five-point star polygons.
Sub Test()  | 
 Dim s As Shape  | 
 For Each s In ActivePage.Shapes  | 
  If s.Type = cdrPolygonShape Then  | 
   s.Polygon.Sides = 5  | 
   s.Polygon.Type = cdrStar  | 
  End If  | 
 Next s  | 
End Sub  | 
| 
       | 
        
       | 
		      
		          
		             | 
      
Copyright 2013 Corel Corporation. All rights reserved.