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


In This Topic
    Anchor Property
    In This Topic
    Gets or sets whether the object is anchored.
    Syntax
    'Declaration
     
    Public Overridable Property Anchor As Integer
    'Usage
     
    Dim instance As PSObject
    Dim value As Integer
     
    instance.Anchor = value
     
    value = instance.Anchor
    public virtual int Anchor {get; set;}

    Property Value

    Integer column index
    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