PowerTools SPREAD for ASP.NET 8.0J
Copy メソッド (Appearance)

コピーするAppearanceオブジェクト
指定したAppearanceオブジェクトのプロパティを現在のオブジェクトにコピーします。
構文
'Declaration
 
Public Overridable Sub Copy( _
   ByVal obj As Object _
) 
public virtual void Copy( 
   object obj
)

パラメータ

obj
コピーするAppearanceオブジェクト
この例では、2つのAppearanceオブジェクトと1つのCellオブジェクトを作成します。1番目のAppearanceオブジェクトにいくつかのプロパティを設定し、それらを2番目のインスタンスにコピーします。次に、2番目のAppearanceオブジェクトのプロパティをCellオブジェクトの対応するプロパティに適用します。その後、AppearanceオブジェクトのBackColorプロパティが定義されているかどうかを問い合わせ、結果をテキストボックスに返します。
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.Copy(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.SetCellValue(0, 0, "AppearanceTest");
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()
appr.BackColor = Color.Red
appr.ForeColor = Color.White
appr.Font.Bold = True
appr.HorizontalAlign = HorizontalAlign.Right
appr.VerticalAlign = VerticalAlign.Top
appr1.Copy(appr)
Dim acell As FarPoint.Web.Spread.Cell
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.SetCellValue(0, 0, "AppearanceTest")
FpSpread1.Columns(0).Width = 150
FpSpread1.Rows(0).Height = 60
Dim prop As FarPoint.Web.Spread.AppearanceProperty
Dim bl As Boolean
bl = appr.IsDefined(prop.BackColor)
TextBox1.Text = bl
参照

Appearance クラス
Appearance メンバ

 

 


© 2003-2015, GrapeCity inc. All rights reserved.