Spread ASP.NET 16
FarPoint.Web.Spread Assembly / FarPoint.Web.Spread Namespace / AppearanceProperty Class / ForeColor Field
Example


In This Topic
    ForeColor Field (AppearanceProperty)
    In This Topic
    Represents the ForeColor property (index is 2), which specifies the text color of the object.
    Syntax
    'Declaration
     
    Public Shared ReadOnly ForeColor As AppearanceProperty
    'Usage
     
    Dim value As AppearanceProperty
     
    value = AppearanceProperty.ForeColor
    public static readonly AppearanceProperty ForeColor
    Example
    This example creates a new Appearance object, sets the BackColor property for the object and applies it to an instance of a Cell object. Then the BackColor property is checked to determine if it has been defined, and the result is returned to a text box.
    FarPoint.Web.Spread.Appearance appr = new FarPoint.Web.Spread.Appearance();
    FarPoint.Web.Spread.Cell acell;
    bool bl;
    appr.BackColor = Color.Red;
    appr.ForeColor = Color.White;
    appr.Font.Bold = true;
    appr.HorizontalAlign = HorizontalAlign.Right;
    appr.VerticalAlign = VerticalAlign.Top;
    acell = FpSpread1.Cells[0,0];
    acell.BackColor = appr.BackColor;
    acell.ForeColor = appr.ForeColor;
    acell.Font.Bold=appr.Font.Bold;
    acell.HorizontalAlign=appr.HorizontalAlign;
    acell.VerticalAlign=appr.VerticalAlign;
    FpSpread1.ActiveSheetView.SetValue(0,0,"AppearanceTest");
    FpSpread1.Columns[0].Width=150;
    FpSpread1.Rows[0].Height=60;
    bl=appr.IsDefined(FarPoint.Web.Spread.AppearanceProperty.BackColor);
    TextBox1.Text=Convert.ToString(bl);
    Dim appr As New FarPoint.Web.Spread.Appearance()
    Dim acell As FarPoint.Web.Spread.Cell
    Dim bl As Boolean
    appr.BackColor=Color.Red
    appr.ForeColor=Color.White
    appr.Font.Bold=True
    appr.HorizontalAlign=HorizontalAlign.Right
    appr.VerticalAlign=VerticalAlign.Top
    acell=FpSpread1.Cells(0,0)
    acell.BackColor=appr1.BackColor
    acell.ForeColor=appr1.ForeColor
    acell.Font.Bold=appr1.Font.Bold
    acell.HorizontalAlign=appr1.HorizontalAlign
    acell.VerticalAlign=appr1.VerticalAlign
    FpSpread1.ActiveSheetView.SetValue(0,0,"AppearancePropertyTest")
    FpSpread1.Columns(0).Width=150
    FpSpread1.Rows(0).Height=60
    bl=appr.IsDefined(FarPoint.Web.Spread.AppearanceProperty.BackColor)
    TextBox1.Text=bl
    See Also