Spread Windows Forms 13.0 Product Documentation
GrapeCity.Win.PluginInputMan Assembly / GrapeCity.Win.Spread.InputMan.CellType.Fields Namespace / DateYearFieldInfo Class / DateYearFieldInfo Constructor / DateYearFieldInfo Constructor()
Example


In This Topic
    DateYearFieldInfo Constructor()
    In This Topic
    Initializes a new instance of the DateYearFieldInfo class.
    Syntax
    'Declaration
     
    Public Function New()
    'Usage
     
    Dim instance As New DateYearFieldInfo()
    public DateYearFieldInfo()
    Example
    This example creates a custom format for the GcDateTime cell.
    GrapeCity.Win.Spread.InputMan.CellType.Fields.DateDayFieldInfo fvalue = new GrapeCity.Win.Spread.InputMan.CellType.Fields.DateDayFieldInfo();
    fvalue.BackColor = Color.Lavender;
    GrapeCity.Win.Spread.InputMan.CellType.Fields.DateMonthFieldInfo mvalue = new GrapeCity.Win.Spread.InputMan.CellType.Fields.DateMonthFieldInfo();
    mvalue.BackColor = Color.Azure;
    GrapeCity.Win.Spread.InputMan.CellType.Fields.DateYearFieldInfo yvalue = new GrapeCity.Win.Spread.InputMan.CellType.Fields.DateYearFieldInfo();
    yvalue.BackColor = Color.Crimson;
    GrapeCity.Win.Spread.InputMan.CellType.Fields.DateLiteralFieldInfo eday = new GrapeCity.Win.Spread.InputMan.CellType.Fields.DateLiteralFieldInfo();
    eday.Text = "/";           
    
    GrapeCity.Win.Spread.InputMan.CellType.GcDateTimeCellType inputcell = new GrapeCity.Win.Spread.InputMan.CellType.GcDateTimeCellType();
    GrapeCity.Win.Spread.InputMan.CellType.Fields.DateDayDisplayFieldInfo day = new GrapeCity.Win.Spread.InputMan.CellType.Fields.DateDayDisplayFieldInfo();
    day.ShowLeadingZero = true;
    GrapeCity.Win.Spread.InputMan.CellType.Fields.DateMonthDisplayFieldInfo month = new GrapeCity.Win.Spread.InputMan.CellType.Fields.DateMonthDisplayFieldInfo();
    month.ShowLeadingZero = true;
    GrapeCity.Win.Spread.InputMan.CellType.Fields.DateYearDisplayFieldInfo year = new GrapeCity.Win.Spread.InputMan.CellType.Fields.DateYearDisplayFieldInfo();
    year.ShowLeadingZero = true;
    GrapeCity.Win.Spread.InputMan.CellType.Fields.DateLiteralDisplayFieldInfo lday = new GrapeCity.Win.Spread.InputMan.CellType.Fields.DateLiteralDisplayFieldInfo();
    lday.Text = "/";
    inputcell.DisplayFields.Add(month);
    inputcell.DisplayFields.Add(lday);
    inputcell.DisplayFields.Add(day);
    inputcell.DisplayFields.Add(lday);
    inputcell.DisplayFields.Add(year);
    
    inputcell.Fields.Clear();
    inputcell.Fields.Add(mvalue);
    inputcell.Fields.Add(eday);
    inputcell.Fields.Add(fvalue);
    inputcell.Fields.Add(eday);
    inputcell.Fields.Add(yvalue);
    fpSpread1.Sheets[0].Cells[1, 1].CellType = inputcell;
    Dim fvalue As New GrapeCity.Win.Spread.InputMan.CellType.Fields.DateDayFieldInfo()
    fvalue.BackColor = Color.Lavender
    Dim mvalue As New GrapeCity.Win.Spread.InputMan.CellType.Fields.DateMonthFieldInfo()
    mvalue.BackColor = Color.Azure
    Dim yvalue As New GrapeCity.Win.Spread.InputMan.CellType.Fields.DateYearFieldInfo()
    yvalue.BackColor = Color.Crimson
    Dim eday As New GrapeCity.Win.Spread.InputMan.CellType.Fields.DateLiteralFieldInfo()
    eday.Text = "/"
    
    Dim inputcell As New GrapeCity.Win.Spread.InputMan.CellType.GcDateTimeCellType()
    Dim day As New GrapeCity.Win.Spread.InputMan.CellType.Fields.DateDayDisplayFieldInfo()
    day.ShowLeadingZero = True
    Dim month As New GrapeCity.Win.Spread.InputMan.CellType.Fields.DateMonthDisplayFieldInfo()
    month.ShowLeadingZero = True
    Dim year As New GrapeCity.Win.Spread.InputMan.CellType.Fields.DateYearDisplayFieldInfo()
    year.ShowLeadingZero = True
    Dim lday As New GrapeCity.Win.Spread.InputMan.CellType.Fields.DateLiteralDisplayFieldInfo()
    lday.Text = "/"
    inputcell.DisplayFields.Add(month)
    inputcell.DisplayFields.Add(lday)
    inputcell.DisplayFields.Add(day)
    inputcell.DisplayFields.Add(lday)
    inputcell.DisplayFields.Add(year)
    
    inputcell.Fields.Clear()
    inputcell.Fields.Add(mvalue)
    inputcell.Fields.Add(eday)
    inputcell.Fields.Add(fvalue)
    inputcell.Fields.Add(eday)
    inputcell.Fields.Add(yvalue)
    fpSpread1.Sheets(0).Cells(1, 1).CellType = inputcell
    See Also