PowerTools SPREAD for Windows Forms 8.0J
GetAt メソッド (DefaultSkins)


組み込み(デフォルト)スキンの位置を指定する、配列内の0から始まるインデックス
指定したインデックスにある組み込みスキンを取得します。
構文
'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
組み込み(デフォルト)スキンの位置を指定する、配列内の0から始まるインデックス

戻り値の型

スキンを含むSheetSkin
例外
例外説明
System.IndexOutOfRangeException指定されたインデックスが範囲外です。0から組み込み(デフォルト)スキンの総数までの数を指定する必要があります。
次のサンプル コードは、DefaultSkins オブジェクトを作成し、使用可能なすべてのスキンをリスト コントロールに読み込みます。ユーザーがリストからスキンを選択すると、そのスキンが SPREADのシートに適用されます。
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();
}    
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 メンバ

 

 


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