'Usage Dim skin As SheetSkin Dim value As Boolean value = DefaultSkins.Contains(skin)
Parameters
- skin
- SheetSkin object for which to check
Return Value
Boolean: true if the skin is found in the collection; false otherwise
'Usage Dim skin As SheetSkin Dim value As Boolean value = DefaultSkins.Contains(skin)
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