Gets or sets the focus rectangle drawing style in the element.
Syntax
| Visual Basic (Declaration) | |
|---|
Public Overrides Property DrawFocusRectangle As DrawFocusRectangle |
| Visual Basic (Usage) |  Copy Code |
|---|
Dim instance As PSObject
Dim value As DrawFocusRectangle
instance.DrawFocusRectangle = value
value = instance.DrawFocusRectangle |
Property Value
DrawFocusRectangle setting that determines the display and location of the focus rectangle
Remarks
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.
| C# | Copy Code |
|---|
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.PSObject 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 = 2;5
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);
|
| Visual Basic | Copy Code |
|---|
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.PSObject
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) |
Requirements
Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2
See Also
