Spread ASP.NET 15
FarPoint.Web.Spread Assembly / FarPoint.Web.Spread Namespace / ExcelSparklineSetting Class / Clone Method
Example


In This Topic
    Clone Method (ExcelSparklineSetting)
    In This Topic
    Creates a new object that is a copy of the current instance.
    Syntax
    'Declaration
     
    Public Function Clone() As Object
    'Usage
     
    Dim instance As ExcelSparklineSetting
    Dim value As Object
     
    value = instance.Clone()
    public object Clone()

    Return Value

    A new object that is a copy of this instance.
    Example
    This example creates sparklines.
    FarPoint.Web.Spread.ExcelSparklineSetting eSetting = new FarPoint.Web.Spread.ExcelSparklineSetting();
    eSetting.ShowMarkers = true;
    eSetting.AxisColor = Color.Cyan;
    eSetting.DisplayEmptyCellsAs = FarPoint.Web.Spread.Chart.EmptyValueStyle.Gaps;
    eSetting.DisplayHidden = true;
    eSetting.DisplayXAxis = true;
    eSetting.FirstMarkerColor = Color.AliceBlue;
    eSetting.Formula = "Sheet1!$A$4:$E$4";
    eSetting.HighMarkerColor = Color.Honeydew;
    eSetting.LastMarkerColor = Color.Lavender;
    eSetting.LineWeight = 2;
    eSetting.LowMarkerColor = Color.LawnGreen;
    eSetting.ManualMax = 3;
    eSetting.ManualMin = 1;
    eSetting.MarkersColor = Color.Magenta;
    eSetting.MaxAxisType = FarPoint.Web.Spread.SparklineAxisMinMax.Custom;
    eSetting.MinAxisType = FarPoint.Web.Spread.SparklineAxisMinMax.Individual;
    eSetting.NegativeColor = Color.NavajoWhite;
    eSetting.RightToLeft = true;
    eSetting.SeriesColor = Color.SeaGreen;
    eSetting.ShowFirst = true;
    eSetting.ShowHigh = true;
    eSetting.ShowLast = true;
    eSetting.ShowLow = true;
    eSetting.ShowNegative = true;
                
    FarPoint.Web.Spread.ExcelSparklineSetting ess = eSetting;
    FarPoint.Web.Spread.ExcelSparklineSetting ess1 = (FarPoint.Web.Spread.ExcelSparklineSetting)ess.Clone();
    Dim eSetting As New FarPoint.Web.Spread.ExcelSparklineSetting()
    eSetting.ShowMarkers = True
    eSetting.AxisColor = Color.Cyan
    eSetting.DisplayEmptyCellsAs = FarPoint.Web.Spread.Chart.EmptyValueStyle.Gaps
    eSetting.DisplayHidden = True
    eSetting.DisplayXAxis = True
    eSetting.FirstMarkerColor = Color.AliceBlue
    eSetting.Formula = "Sheet1!$A$4:$E$4"
    eSetting.HighMarkerColor = Color.Honeydew
    eSetting.LastMarkerColor = Color.Lavender
    eSetting.LineWeight = 2
    eSetting.LowMarkerColor = Color.LawnGreen
    eSetting.ManualMax = 3
    eSetting.ManualMin = 1
    eSetting.MarkersColor = Color.Magenta
    eSetting.MaxAxisType = FarPoint.Web.Spread.SparklineAxisMinMax.[Custom]
    eSetting.MinAxisType = FarPoint.Web.Spread.SparklineAxisMinMax.Individual
    eSetting.NegativeColor = Color.NavajoWhite
    eSetting.RightToLeft = True
    eSetting.SeriesColor = Color.SeaGreen
    eSetting.ShowFirst = True
    eSetting.ShowHigh = True
    eSetting.ShowLast = True
    eSetting.ShowLow = True
    eSetting.ShowNegative = True
    
    Dim ess As FarPoint.Web.Spread.ExcelSparklineSetting = eSetting
    Dim ess1 As FarPoint.Web.Spread.ExcelSparklineSetting = DirectCast(ess.Clone(), FarPoint.Web.Spread.ExcelSparklineSetting)
    See Also