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


In This Topic
    AlignText Property (PSObject)
    In This Topic
    Gets or sets the text alignment for the element.
    Syntax
    'Declaration
     
    Public Overrides Property AlignText As TextAlign
    'Usage
     
    Dim instance As PSObject
    Dim value As TextAlign
     
    instance.AlignText = value
     
    value = instance.AlignText
    public override TextAlign AlignText {get; set;}

    Property Value

    TextAlign setting that determines the alignment of text
    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.PSGradient psg = new FarPoint.Win.Spread.DrawingSpace.PSGradient(); 
    psg.Style = FarPoint.Win.Spread.DrawingSpace.GradientStyle.RadialIntoCenter; 
    psg.Sections[0].Color = Color.Navy; 
    psg.Sections[0].AlphaBlend = 128; 
    psg.Sections[1].Color = Color.Magenta; 
    psg.Sections[1].AlphaBlend = 255;
    
    Point pt = new Point(150, 60); 
    
    FarPoint.Win.Spread.DrawingSpace.PSShape pso = new FarPoint.Win.Spread.DrawingSpace.CustomShape(); 
    pso.AlignHorz = FarPoint.Win.HorizontalAlignment.Center;
    pso.AlignText = FarPoint.Win.TextAlign.TextBottomPictTop;
    pso.AlignVert = FarPoint.Win.VerticalAlignment.Center;
    pso.AllowBackgroundImageRotation = true;
    pso.AlphaBlendBackColor = 75;
    pso.Anchor = 10;
    pso.BackColor = Color.Black;
    pso.BackgroundImage = new FarPoint.Win.Picture(Image.FromFile("c:\\earth.ico"));
    pso.BackgroundImageRotationAngle = 25;
    pso.CanFocus = true;
    pso.CanMove = FarPoint.Win.Spread.DrawingSpace.Moving.HorizontalAndVertical;
    pso.CanPrint = true;
    pso.CanRotate = true;
    pso.CanSize = FarPoint.Win.Spread.DrawingSpace.Sizing.HeightAndWidth;
    pso.DrawFocusRectangle = FarPoint.Win.DrawFocusRectangle.Default;
    pso.Enabled = true;
    pso.Gradient = psg;
    pso.Height = 50;
    pso.Left = pt.X;
    pso.Location = pt;
    pso.Locked = false;
    pso.MarginBottom = 10;
    pso.MarginLeft = 10;
    pso.MarginRight = 10;
    pso.MarginTop = 10;
    pso.PictureMargin = 10;
    pso.PictureOrientation = FarPoint.Win.PictureOrientation.PictureRotateNone;
    pso.PictureRotationAngle = 25;
    pso.PictureTransparencyColor = Color.Blue;
    pso.RotationAngle = 25;
    pso.Shape = gpath;
    pso.ShapeOutlineColor = Color.Crimson;
    pso.ShapeOutlineStyle = System.Drawing.Drawing2D.DashStyle.Solid;
    pso.ShapeOutlineThickness = 3;
    pso.Size = new Size(30, 30);
    pso.SizeProportional = true;
    pso.Tag = "MyShape";
    pso.Text = "FarPoint";
    pso.TextOrientation = FarPoint.Win.TextOrientation.TextHorizontal;
    pso.TextRotationAngle = 25;
    pso.TextWrap = false;
    pso.Top = pt.X;
    pso.Visible = true;
    pso.Width = 50;
    pso.SetBounds(25, 25, 120, 120);
    fpSpread1.ActiveSheet.AddShape(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 psg As New FarPoint.Win.Spread.DrawingSpace.PSGradient
    psg.Style = FarPoint.Win.Spread.DrawingSpace.GradientStyle.RadialIntoCenter
    psg.Sections(0).Color = Color.Navy
    psg.Sections(0).AlphaBlend = 128
    psg.Sections(1).Color = Color.Magenta
    psg.Sections(1).AlphaBlend = 255
    
    Dim pt As New Point(150, 60)
    
    Dim pso As FarPoint.Win.Spread.DrawingSpace.PSShape
    pso = New FarPoint.Win.Spread.DrawingSpace.CustomShape
    pso.AlignHorz = Win.HorizontalAlignment.Center
    pso.AlignText = Win.TextAlign.TextBottomPictTop
    pso.AlignVert = Win.VerticalAlignment.Center
    pso.AllowBackgroundImageRotation = True
    pso.AlphaBlendBackColor = 75
    pso.Anchor = 10
    pso.BackColor = Color.Black
    pso.BackgroundImage = New FarPoint.Win.Picture(Image.FromFile("c:\earth.ico"))
    pso.BackgroundImageRotationAngle = 25
    pso.CanFocus = True
    pso.CanMove = DrawingSpace.Moving.HorizontalAndVertical
    pso.CanPrint = True
    pso.CanRotate = True
    pso.CanSize = DrawingSpace.Sizing.HeightAndWidth
    pso.DrawFocusRectangle = Win.DrawFocusRectangle.Default
    pso.Enabled = True
    pso.Gradient = psg
    pso.Height = 50
    pso.Left = pt.X
    pso.Location = pt
    pso.Locked = False
    pso.MarginBottom = 10
    pso.MarginLeft = 10
    pso.MarginRight = 10
    pso.MarginTop = 10
    pso.PictureMargin = 10
    pso.PictureOrientation = Win.PictureOrientation.PictureRotateNone
    pso.PictureRotationAngle = 25
    pso.PictureTransparencyColor = Color.Blue
    pso.RotationAngle = 25
    pso.Shape = gpath
    pso.ShapeOutlineColor = Color.Crimson
    pso.ShapeOutlineStyle = Drawing2D.DashStyle.Solid
    pso.ShapeOutlineThickness = 3
    pso.Size = New Size(30, 30)
    pso.SizeProportional = True
    pso.Tag = "MyShape"
    pso.Text = "FarPoint"
    pso.TextOrientation = Win.TextOrientation.TextHorizontal
    pso.TextRotationAngle = 25
    pso.TextWrap = False
    pso.Top = pt.X
    pso.Visible = True
    pso.Width = 50
    pso.SetBounds(25, 25, 120, 120)
    FpSpread1.ActiveSheet.AddShape(pso)
    See Also