GetAt メソッド (DefaultSkins)

Visual Basic
C#

'Declaration
 
Public Shared Function GetAt( _
   ByVal index As Integer _
) As SheetSkin

'使用法
 
Dim index As Integer
Dim value As SheetSkin
 
value = DefaultSkins.GetAt(index)

public static SheetSkin GetAt( 
   int index
)

パラメータ

index: 組み込み（デフォルト）スキンの位置を指定する、配列内の０から始まるインデックス

戻り値の型

スキンを含むSheetSkin

例外	説明
System.IndexOutOfRangeException	指定されたインデックスが範囲外です。０から組み込み（デフォルト）スキンの総数までの数を指定する必要があります。

次のサンプルコードは、DefaultSkins オブジェクトを作成し、使用可能なすべてのスキンをリストコントロールに読み込みます。ユーザーがリストからスキンを選択すると、そのスキンが SPREADのシートに適用されます。

C#

FarPoint.Win.Spread.DefaultSkins skin = new FarPoint.Win.Spread.DefaultSkins();
Object[] myarray = new Object[FarPoint.Win.Spread.DefaultSkins.Count];
foreach(FarPoint.Win.Spread.SheetSkin sk in FarPoint.Win.Spread.DefaultSkins.Skins)
{
listBox1.Items.Add(sk.Name);
}
FarPoint.Win.Spread.DefaultSkins.CopyTo(myarray,0);
listBox2.Items.Add(Convert.ToString(myarray.GetValue(4)));

private void listBox1_SelectedIndexChanged(object sender, System.EventArgs e)
{
FarPoint.Win.Spread.DefaultSkins skin = new FarPoint.Win.Spread.DefaultSkins();
FarPoint.Win.Spread.DefaultSkins.GetAt(listBox1.SelectedIndex).Apply(fpSpread1);
bool b;
int i;
foreach (FarPoint.Win.Spread.SheetSkin sk in FarPoint.Win.Spread.DefaultSkins.Skins)
{
b = FarPoint.Win.Spread.DefaultSkins.Contains(FarPoint.Win.Spread.DefaultSkins.Find(listBox1.SelectedItem.ToString()));
i = FarPoint.Win.Spread.DefaultSkins.IndexOf(FarPoint.Win.Spread.DefaultSkins.GetAt(listBox1.SelectedIndex));
textBox1.Text = b.ToString();
textBox2.Text = i.ToString();
}

Visual Basic

Dim skin As New FarPoint.Win.Spread.DefaultSkins()
Dim sk As FarPoint.Win.Spread.SheetSkin
Dim myarray(skin.Count())
For Each sk In skin.Skins
ListBox1.Items.Add(sk.Name)
Next
skin.CopyTo(myarray, 0)
ListBox2.Items.Add(Convert.ToString(myarray.GetValue(4)))

Private Sub ListBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
Dim skin As New FarPoint.Win.Spread.DefaultSkins()
Dim sk As FarPoint.Win.Spread.SheetSkin
skin.GetAt(ListBox1.SelectedIndex).Apply(FpSpread1)
Dim b As Boolean
Dim i As Integer
For Each sk In skin.Skins
b = skin.Contains(skin.Find(ListBox1.SelectedItem))
i = skin.IndexOf(skin.GetAt(ListBox1.SelectedIndex))
TextBox1.Text = b.ToString()
TextBox2.Text = i.ToString()
Next
End Sub

DefaultSkins クラス
 DefaultSkins メンバ