Spread Windows Forms 13.0 Product Documentation
FarPoint.Win.Spread Assembly / FarPoint.Win.Spread.DrawingSpace Namespace / PSObject Class / Shape Property
Example


In This Topic
    Shape Property (PSObject)
    In This Topic
    Gets or sets the shape for the object.
    Syntax
    'Declaration
     
    Public Overridable Property Shape As Object
    'Usage
     
    Dim instance As PSObject
    Dim value As Object
     
    instance.Shape = value
     
    value = instance.Shape
    public virtual object Shape {get; set;}

    Property Value

    Object containing the shape
    Exceptions
    ExceptionDescription
    Invalid object type specified; must be a valid type (GraphicsPath, Region, FarPoint.Win.Picture, or Bitmap)
    Remarks
    This property is available at run time only.
    Example
    This example shows the use of the property in customizing a shape to illustrate the use of the property for classes that inherit this property.
    System.Drawing.Point[] pts = {new System.Drawing.Point(25, 0), 
                                    new System.Drawing.Point(0, 50), 
                                    new System.Drawing.Point(20, 50), 
                                    new System.Drawing.Point((int)2.5, 100), 
                                    new System.Drawing.Point(40, 40), 
                                    new System.Drawing.Point(20, 40), 
                                    new System.Drawing.Point(40, 0), 
                                    new System.Drawing.Point(25, 0)};
    
    System.Drawing.Drawing2D.GraphicsPath gpath = new System.Drawing.Drawing2D.GraphicsPath();
    gpath.AddPolygon(pts);
    
    FarPoint.Win.Spread.DrawingSpace.PSObject pso = new FarPoint.Win.Spread.DrawingSpace.CustomShape();
    pso.BackColor = Color.Black;
    pso.AlphaBlendBackColor = 90;
    pso.Anchor = 20;
    pso.CanMove = FarPoint.Win.Spread.DrawingSpace.Moving.HorizontalAndVertical;
    pso.CanRotate = true;
    pso.CanSize = FarPoint.Win.Spread.DrawingSpace.Sizing.HeightAndWidth;
    pso.Shape = gpath;
    pso.SetBounds(50, 50, 120, 120);
    fpSpread1.ActiveSheet.AddShape((FarPoint.Win.Spread.DrawingSpace.PSShape)pso);
    Dim pts As System.Drawing.Point() = {New System.Drawing.Point(25, 0),  _
                                    New System.Drawing.Point(0, 50),  _
                                    New System.Drawing.Point(20, 50),  _
                                    New System.Drawing.Point(2.5, 100),  _
                                    New System.Drawing.Point(40, 40),  _
                                    New System.Drawing.Point(20, 40),  _
                                    New System.Drawing.Point(40, 0),  _
                                    New System.Drawing.Point(25, 0)}
    
    Dim gpath As System.Drawing.Drawing2D.GraphicsPath = New System.Drawing.Drawing2D.GraphicsPath
    gpath.AddPolygon(pts)
    
    Dim pso As New FarPoint.Win.Spread.DrawingSpace.CustomShape
    pso.BackColor = Color.Black
    pso.AlphaBlendBackColor = 90
    pso.Anchor = 20
    pso.CanMove = FarPoint.Win.Spread.DrawingSpace.Moving.HorizontalAndVertical
    pso.CanRotate = True
    pso.CanSize = FarPoint.Win.Spread.DrawingSpace.Sizing.HeightAndWidth
    pso.Shape = gpath
    pso.SetBounds(250, 250, 120, 120)
    FpSpread1.ActiveSheet.AddShape(pso)
    See Also