'Usage Dim instance As Appearance Dim obj As Object Dim value As Boolean value = instance.Merge(obj)
Parameters
- obj
- Object whose appearance settings are merged with the current object
Return Value
Boolean: true if successful; false otherwise
'Usage Dim instance As Appearance Dim obj As Object Dim value As Boolean value = instance.Merge(obj)
Each appearance setting is copied from the specified object to the current object only if the setting is not defined in the current object.
If you want the option to force the settings to be merged, even if the setting is defined in the current object, use the Merge(Object,Boolean) method.
FarPoint.Web.Spread.Appearance appr = new FarPoint.Web.Spread.Appearance(); FarPoint.Web.Spread.Appearance appr1 = new FarPoint.Web.Spread.Appearance(); FarPoint.Web.Spread.Cell acell; appr.BackColor = Color.Red; appr.ForeColor = Color.White; appr.Font.Bold = true; appr.HorizontalAlign = HorizontalAlign.Right; appr.VerticalAlign = VerticalAlign.Top; appr1.Merge(appr); 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, "Appearance Test"); FpSpread1.Columns[0].Width = 150; FpSpread1.Rows[0].Height = 60; bool bl; bl = appr.IsDefined(FarPoint.Web.Spread.AppearanceProperty.BackColor); TextBox1.Text = Convert.ToString(bl);
Dim appr As New FarPoint.Web.Spread.Appearance() Dim appr1 As New FarPoint.Web.Spread.Appearance() Dim acell As FarPoint.Web.Spread.Cell Dim prop As FarPoint.Web.Spread.AppearanceProperty Dim bl As Boolean appr.BackColor = Color.Red appr.ForeColor = Color.White appr.Font.Bold = True appr.HorizontalAlign = HorizontalAlign.Right appr.VerticalAlign = VerticalAlign.Top appr1.Merge(appr) 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, "Appearance Test") FpSpread1.Columns(0).Width = 150 FpSpread1.Rows(0).Height = 60 bl = appr.IsDefined(prop.BackColor) TextBox1.Text = bl