MESCIUS SPREAD for Windows Forms 15.0J
CopyTo メソッド (DefaultSkins)
使用例 

ICollectionから要素をコピーする1次元配列。
配列には0から始まるインデックスが必要です。
0から始まる、配列内のスキンを貼り付ける位置のインデックス
スキンを指定した配列の指定したインデックスにコピーします。
構文
'宣言
 
Public Shared Sub CopyTo( _
   ByVal array As Array, _
   ByVal index As Integer _
) 
public static void CopyTo( 
   Array array,
   int index
)

パラメータ

array
ICollectionから要素をコピーする1次元配列。
配列には0から始まるインデックスが必要です。
index
0から始まる、配列内のスキンを貼り付ける位置のインデックス
例外
例外解説
System.ArgumentNullException配 列が指定されていないか、指定された配列がNullです(Nothing)。
System.ArgumentException指定された配列が無効です。少なくとも1次元が必要です。
System.ArgumentException指定された配列が無効です。長さが足りません。
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 メンバ

 

 


© MESCIUS inc. All rights reserved.