Merges appearance settings of the specified object with the current object with the option to force a merge if the settings are defined in the current object.
Syntax
| Visual Basic (Usage) |  Copy Code |
|---|
Dim instance As Appearance
Dim obj As Object
Dim force As Boolean
Dim value As Boolean
value = instance.Merge(obj, force) |
Parameters
- obj
- Object whose appearance settings will be merged with the current object
- force
- Whether appearance settings are overridden in the current object
Return Value
Boolean:
true if successful;
false otherwise
Remarks
Example
This example creates two Appearance objects and a Cell object. Several properties are set for the first Appearance object, and they are subsequently merged into the second instance. The properties are then applied from the second Appearance object to the Cell objects corresponding properties. The BackColor property of the Appearance object is then queried to see if it has been defined, and the result is returned to a text box.
| C# | Copy Code |
|---|
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, true);
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.Celss[0, 0].Text = "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);
|
| Visual Basic | Copy Code |
|---|
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, True)
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.Cells(0, 0).Text = "Appearance Test"
FpSpread1.Columns(0).Width = 150
FpSpread1.Rows(0).Height = 60
bl = appr.IsDefined(prop.BackColor)
TextBox1.Text = bl |
Requirements
Target Platforms: Windows 98, Windows NT 4.0, Windows Millennium Edition, Windows 2000, Windows XP Home Edition, Windows XP Professional, Windows Server 2003 family, Windows Vista, Windows Server 2008 family
See Also
