Gradient Property (PSObject)

Visual Basic
C#

'Declaration
 
Public Overridable Property Gradient As PSGradient

'Usage
 
Dim instance As PSObject
Dim value As PSGradient
 
instance.Gradient = value
 
value = instance.Gradient

public virtual PSGradient Gradient {get; set;}

Property Value

PSGradient object containing the gradient for the object

This property is available at run time only.

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#

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.Name = "custom";
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;

FarPoint.Win.Spread.DrawingSpace.PSObject pso = new FarPoint.Win.Spread.DrawingSpace.CustomShape();
pso.CanMove = FarPoint.Win.Spread.DrawingSpace.Moving.HorizontalAndVertical;
pso.Shape = gpath;
pso.SetBounds(250, 250, 120, 120);
pso.Gradient = psg;
fpSpread1.ActiveSheet.AddShape((FarPoint.Win.Spread.DrawingSpace.PSShape)pso);

Visual Basic

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 pso As New FarPoint.Win.Spread.DrawingSpace.CustomShape

pso.CanMove = FarPoint.Win.Spread.DrawingSpace.Moving.HorizontalAndVertical
pso.Shape = gpath
pso.SetBounds(250, 250, 120, 120)
pso.Gradient = psg
FpSpread1.ActiveSheet.AddShape(pso)

Reference

PSObject Class
PSObject Members