Clone Method (PSGradient)

Visual Basic
C#

'Declaration
 
Public Overridable Function Clone() As Object

'Usage
 
Dim instance As PSGradient
Dim value As Object
 
value = instance.Clone()

public virtual object Clone()

Return Value

Object containing the copied object

C#

FarPoint.Win.Spread.DrawingSpace.PSGradient g = new FarPoint.Win.Spread.DrawingSpace.PSGradient();
g.Name = "custom";
g.Style = FarPoint.Win.Spread.DrawingSpace.GradientStyle.RadialIntoCenter;
g.Sections[0].Color = Color.Navy;
g.Sections[0].AlphaBlend = 128;
g.Sections[1].Color = Color.Magenta;
g.Sections[1].AlphaBlend = 255;
FarPoint.Win.Spread.DrawingSpace.PSGradient g1 = new FarPoint.Win.Spread.DrawingSpace.PSGradient();
g1 = g.Clone();

FarPoint.Win.Spread.DrawingSpace.ArrowShape arrow = new FarPoint.Win.Spread.DrawingSpace.ArrowShape(fpSpread1);
arrow.CanSize = FarPoint.Win.Spread.DrawingSpace.Sizing.HeightAndWidth;
arrow.CanMove = FarPoint.Win.Spread.DrawingSpace.Moving.HorizontalAndVertical;
arrow.Anchor = 20;
arrow.SetBounds(15, 15, 50, 50);
arrow.Gradient = g1;
fpSpread1.ActiveSheet.AddShape(arrow);

Visual Basic

Dim g As New FarPoint.Win.Spread.DrawingSpace.PSGradient
g.Name = "custom"
g.Style = FarPoint.Win.Spread.DrawingSpace.GradientStyle.RadialIntoCenter
g.Sections(0).Color = Color.Navy
g.Sections(0).AlphaBlend = 128
g.Sections(1).Color = Color.Magenta
g.Sections(1).AlphaBlend = 255
Dim g1 As New FarPoint.Win.Spread.DrawingSpace.PSGradient
g1 = g.Clone

Dim arrow As New FarPoint.Win.Spread.DrawingSpace.ArrowShape(FpSpread1)
arrow.CanSize = FarPoint.Win.Spread.DrawingSpace.Sizing.HeightAndWidth
arrow.CanMove = FarPoint.Win.Spread.DrawingSpace.Moving.HorizontalAndVertical
arrow.Anchor = 20
arrow.SetBounds(15, 15, 50, 50)
arrow.Gradient = g1
FpSpread1.ActiveSheet.AddShape(arrow)

Reference

PSGradient Class
PSGradient Members