Format メソッド (CheckBoxCellType)

この型に基づいてセル型を派生させるときに、このメソッドをオーバーライドすると、データモデルのオブジェクトからシートのセルに返され、文字列として書式設定される内容が変化します。

構文

Visual Basic
C#

'Declaration
 
Public Overrides Function Format( _
   ByVal o As Object _
) As String

public override string Format( 
   object o
)

パラメータ

o: データモデル内の、書式情報の取得元のオブジェクト

戻り値の型

シート上のセルに設定する書式付きString

例

以下の例では、CheckBoxCellTypeをサブクラス化し、スプレッドシートの先頭セル内にチェックボックス型セルを作成します。コンストラクタにON状態とOFF状態の画像を設定し、チェックボックスの状態に０または１の値を使用します。

C#
Visual Basic

using System;
using System.Collections.Generic;
using System.Linq;
using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls;
using FarPoint.Web.Spread;
using System.Drawing;
using FarPoint.Web.Spread;

public partial class Sample2 : System.Web.UI.Page
{
    
  private void Page_Load(object sender,System.EventArgs e)
  {
    var bcTypecell = new myCheck("img\\checked.gif", "img\\unchecked.gif");
    FpSpread1.ActiveSheetView.Cells[0,0].CellType=bcTypecell;
    FpSpread1.ActiveSheetView.Columns[0].Width=130;
    FpSpread1.ActiveSheetView.Rows[0].Height=40;
  }
}

[Serializable()]
class myCheck : FarPoint.Web.Spread.CheckBoxCellType
{
  public myCheck(string img1,string img2)
  {
    base.CheckedImageUrl=img1;
    base.UncheckedImageUrl=img2;
  }

  public override string Format(object o)
  {
    return base.Format(o);
  }

  public override Control GetEditorControl(string id,TableCell tc,FarPoint.Web.Spread.Appearance style,FarPoint.Web.Spread.Inset margin,object v,bool ul)
  {
    return base.GetEditorControl(id,tc,style,margin,v,ul);
  }

  public override object GetEditorValue(Control owner,string id)
  {
    return base.GetEditorValue(owner,id);
  }

  public override Control PaintCell(string id,TableCell tc,FarPoint.Web.Spread.Appearance style,FarPoint.Web.Spread.Inset margin,object v,bool ul)
  {
    return base.PaintCell(id,tc,style,margin,v,ul);
  }

  public override object Parse(string s)
  {
  return base.Parse(s);
  }

  public override string ValidateEditorValue(object val)
  {
    return base.ValidateEditorValue(val);
  }

}

Imports FarPoint.Web.Spread
Partial Class Sample2VB
  Inherits System.Web.UI.Page

  Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Dim ckbox As New myCheck("img\checked.gif", "img\unchecked.gif")
    FpSpread1.ActiveSheetView.Cells(0, 0).CellType = ckbox
    FpSpread1.ActiveSheetView.SetValue(0, 0, 1)
  End Sub

End Class

<Serializable()>
Public Class myCheck
  Inherits FarPoint.Web.Spread.CheckBoxCellType

  Sub New(ByVal img1 As String, ByVal img2 As String)
    MyBase.CheckedImageUrl = img1
    MyBase.UncheckedImageUrl = img2
  End Sub

  Public Overrides Function Format(ByVal o As Object) As String
    Return MyBase.Format(o)
  End Function

  Public Overrides Function GetEditorControl(ByVal id As String, ByVal tc As TableCell, ByVal style As FarPoint.Web.Spread.Appearance, ByVal margin As FarPoint.Web.Spread.Inset, ByVal v As Object, ByVal ul As Boolean) As System.Web.UI.Control
    Return MyBase.GetEditorControl(id, tc, style, margin, v, ul)
  End Function

  Public Overrides Function GetEditorValue(ByVal owner As Control, ByVal id As String) As Object
    Return MyBase.GetEditorValue(owner, id)
  End Function

  Public Overrides Function PaintCell(ByVal id As String, ByVal tc As TableCell, ByVal style As FarPoint.Web.Spread.Appearance, ByVal margin As FarPoint.Web.Spread.Inset, ByVal v As Object, ByVal ul As Boolean) As System.Web.UI.Control
    Return MyBase.PaintCell(id, tc, style, margin, v, ul)
  End Function

  Public Overrides Function Parse(ByVal s As String) As Object
    Return MyBase.Parse(s)
  End Function

  Public Overrides Function ValidateEditorValue(ByVal val As Object) As String
    Return MyBase.ValidateEditorValue(val)
  End Function
  

  Public Shadows Property CheckedImageUrl() As String
    Get
      Return MyBase.CheckedImageUrl
    End Get

    Set(ByVal Value As String)
      MyBase.CheckedImageUrl = Value
    End Set
  End Property

  Public Shadows Property UncheckedImageUrl() As String
    Get
      Return MyBase.UncheckedImageUrl
    End Get
    Set(ByVal Value As String)
      MyBase.UncheckedImageUrl = Value
    End Set
  End Property

End Class

参照

CheckBoxCellType クラス
 CheckBoxCellType メンバ