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


In This Topic
    Location Property (PSObject)
    In This Topic
    Gets or sets the location of the object.
    Syntax
    'Declaration
     
    Public Overridable Property Location As Point
    'Usage
     
    Dim instance As PSObject
    Dim value As Point
     
    instance.Location = value
     
    value = instance.Location
    public virtual Point Location {get; set;}

    Property Value

    Point object containing the location of the object
    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);
    
    Point pt = new Point(150, 60);
    
    FarPoint.Win.Spread.DrawingSpace.PSObject pso = new FarPoint.Win.Spread.DrawingSpace.CustomShape();
    pso.BackColor = Color.Black;
    pso.AlphaBlendBackColor = 90;
    pso.Enabled = true;
    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);
    pso.Location = pt;
    pso.Height = 20;
    pso.Left = pt.X;
    pso.Top = pt.X;
    pso.Width = 40;
    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 pt As New Point(150, 60)
    
    Dim pso As New FarPoint.Win.Spread.DrawingSpace.CustomShape
    pso.BackColor = Color.Black
    pso.AlphaBlendBackColor = 90
    pso.Enabled = True
    pso.CanMove = FarPoint.Win.Spread.DrawingSpace.Moving.HorizontalAndVertical
    pso.CanRotate = True
    pso.CanSize = FarPoint.Win.Spread.DrawingSpace.Sizing.HeightAndWidth
    pso.Shape = gpath
    pso.SetBounds(40, 40, 60, 60)
    pso.Location = pt
    pso.Height = 20
    pso.Left = pt.X
    pso.Top = pt.X
    pso.Width = 40
    FpSpread1.ActiveSheet.AddShape(pso)
    See Also