SPREAD for ASP.NETデモアプリケーション

using System;
using System.Data;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.Configuration;

public partial class operationmode : System.Web.UI.Page
{
    protected void Page_Load(object sender, EventArgs e)
    {
        if (IsPostBack) return;
        
        // SPREAD初期化
        InitSpread(FpSpread1.Sheets[0]);
    }

    private void InitSpread(FarPoint.Web.Spread.SheetView sheet)
    {
        // データ連結
        DataSet ds = new DataSet();
        ds.ReadXml(MapPath("../App_Data/data.xml"));
        FpSpread1.DataSource = ds;

        // SPREAD設定
        FpSpread1.CommandBar.Visible = false;
        FpSpread1.CssClass = "spreadStyle";
        FpSpread1.ShowFocusRectangle = true;
        FpSpread1.UseClipboard = false;

        // フォントサイズの設定
        sheet.DefaultStyle.Font.Size = FontUnit.Parse("80%");
        sheet.ColumnHeader.DefaultStyle.Font.Size = FontUnit.Parse("80%");
        sheet.RowHeader.DefaultStyle.Font.Size = FontUnit.Parse("80%");
        sheet.SheetCorner.DefaultStyle.Font.Size = FontUnit.Parse("80%");

        // シート設定
        sheet.PageSize = sheet.RowCount;
        sheet.SelectionBackColor = System.Drawing.Color.Silver;

        // 列幅の設定
        sheet.Columns[0].Width = 36;
        sheet.Columns[1].Width = 88;
        sheet.Columns[2].Width = 91;
        sheet.Columns[3].Width = 80;
        sheet.Columns[4].Width = 36;
        sheet.Columns[5].Width = 46;
        sheet.Columns[6].Width = 49;
        sheet.Columns[7].Width = 80;
        sheet.Columns[8].Width = 181;

        // 縦方向の揃え位置を中央に設定
        sheet.DefaultStyle.VerticalAlign = VerticalAlign.Middle;
    }
        
    protected void DDLmode_SelectedIndexChanged(object sender, EventArgs e)
    {
        // クライアント側の変更を確定
        FpSpread1.SaveChanges();

        // 選択状態をクリア
        FpSpread1.ActiveSheetView.ActiveRow = -1;
        FpSpread1.ActiveSheetView.ActiveColumn = -1;
        FpSpread1.ActiveSheetView.SelectionModel.ClearSelection();

        string mode = Convert.ToString(DDLmode.SelectedValue);

        // オペレーションモードの値を変更
        switch (mode)
        {
            case "0":
                FpSpread1.ActiveSheetView.OperationMode = FarPoint.Web.Spread.OperationMode.Normal;
                break;
            case "1":
                FpSpread1.ActiveSheetView.OperationMode = FarPoint.Web.Spread.OperationMode.ReadOnly;
                break;
            case "2":
                FpSpread1.ActiveSheetView.OperationMode = FarPoint.Web.Spread.OperationMode.RowMode;
                break;
            case "3":
                FpSpread1.ActiveSheetView.OperationMode = FarPoint.Web.Spread.OperationMode.SingleSelect;
                break;
            case "4":
                FpSpread1.ActiveSheetView.OperationMode = FarPoint.Web.Spread.OperationMode.MultiSelect;
                break;
            case "5":
                FpSpread1.ActiveSheetView.OperationMode = FarPoint.Web.Spread.OperationMode.ExtendedSelect;
                break;
        }
    }
}

Partial Public Class operationmode
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If IsPostBack Then
            Return
        End If

        ' SPREAD初期化
        InitSpread(FpSpread1.Sheets(0))
    End Sub

    Private Sub InitSpread(ByVal sheet As FarPoint.Web.Spread.SheetView)
        ' データ連結
        Dim ds As New System.Data.DataSet()
        ds.ReadXml(MapPath("../App_Data/data.xml"))
        FpSpread1.DataSource = ds

        ' SPREAD設定
        FpSpread1.CommandBar.Visible = False
        FpSpread1.CssClass = "spreadStyle"
        FpSpread1.ShowFocusRectangle = True
        FpSpread1.UseClipboard = False

        ' フォントサイズの設定
        sheet.DefaultStyle.Font.Size = FontUnit.Parse("80%")
        sheet.ColumnHeader.DefaultStyle.Font.Size = FontUnit.Parse("80%")
        sheet.RowHeader.DefaultStyle.Font.Size = FontUnit.Parse("80%")
        sheet.SheetCorner.DefaultStyle.Font.Size = FontUnit.Parse("80%")

        ' シート設定
        sheet.PageSize = sheet.RowCount
        sheet.SelectionBackColor = System.Drawing.Color.Silver

        ' 列幅の設定
        sheet.Columns(0).Width = 36
        sheet.Columns(1).Width = 88
        sheet.Columns(2).Width = 91
        sheet.Columns(3).Width = 80
        sheet.Columns(4).Width = 36
        sheet.Columns(5).Width = 46
        sheet.Columns(6).Width = 49
        sheet.Columns(7).Width = 80
        sheet.Columns(8).Width = 181

        ' 縦方向の揃え位置を中央に設定
        sheet.DefaultStyle.VerticalAlign = VerticalAlign.Middle
    End Sub

    Protected Sub DDLmode_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles DDLmode.SelectedIndexChanged
        ' クライアント側の変更を確定
        FpSpread1.SaveChanges()

        ' 選択状態をクリア
        FpSpread1.ActiveSheetView.ActiveRow = -1
        FpSpread1.ActiveSheetView.ActiveColumn = -1
        FpSpread1.ActiveSheetView.SelectionModel.ClearSelection()

        Dim mode As String = Convert.ToString(DDLmode.SelectedValue)

        ' オペレーションモードの値を変更
        Select Case mode
            Case "0"
                FpSpread1.ActiveSheetView.OperationMode = FarPoint.Web.Spread.OperationMode.Normal
                Exit Select
            Case "1"
                FpSpread1.ActiveSheetView.OperationMode = FarPoint.Web.Spread.OperationMode.ReadOnly
                Exit Select
            Case "2"
                FpSpread1.ActiveSheetView.OperationMode = FarPoint.Web.Spread.OperationMode.RowMode
                Exit Select
            Case "3"
                FpSpread1.ActiveSheetView.OperationMode = FarPoint.Web.Spread.OperationMode.SingleSelect
                Exit Select
            Case "4"
                FpSpread1.ActiveSheetView.OperationMode = FarPoint.Web.Spread.OperationMode.MultiSelect
                Exit Select
            Case "5"
                FpSpread1.ActiveSheetView.OperationMode = FarPoint.Web.Spread.OperationMode.ExtendedSelect
                Exit Select
        End Select
    End Sub
End Class

<%@ Page MasterPageFile="~/MasterPage.master" Language="c#" AutoEventWireup="true" 
         Inherits="operationmode" CodeFile="operationmode.aspx.cs" %>

<%@ Register Assembly="FarPoint.Web.SpreadJ" Namespace="FarPoint.Web.Spread" TagPrefix="FarPoint" %>

<asp:Content ID="Content1" ContentPlaceHolderID="HeaderPlaceHolder1" Runat="Server">
</asp:Content>

<asp:Content ID="Content2" ContentPlaceHolderID="ContentPlaceHolder1" runat="server">
    <asp:Label ID="Label1" runat="server" Text="オペレーションモードの選択"></asp:Label>
    <asp:DropDownList ID="DDLmode" runat="server" AutoPostBack="True" 
            onselectedindexchanged="DDLmode_SelectedIndexChanged">               
			<asp:ListItem value="0">標準モード</asp:ListItem>
			<asp:ListItem value="1">読み取り専用モード</asp:ListItem>
			<asp:ListItem value="2">行モード</asp:ListItem>
			<asp:ListItem value="3">単一選択モード</asp:ListItem>
			<asp:ListItem value="4">複数選択モード</asp:ListItem>
			<asp:ListItem value="5">拡張選択モード</asp:ListItem>
    </asp:DropDownList>
    <farpoint:FpSpread ID="FpSpread1" runat="server" BorderColor="#A0A0A0" BorderStyle="Solid"
        BorderWidth="1px">
        <CommandBar BackColor="#F6F6F6" ButtonFaceColor="Control" ButtonHighlightColor="ControlLightLight"
            ButtonShadowColor="ControlDark" />
        <Sheets>
            <farpoint:SheetView SheetName="Sheet1">
            </farpoint:SheetView>
        </Sheets>
    </farpoint:FpSpread>

</asp:Content>