FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 > TableElementStyle クラス > TableElementStyle コンストラクタ : TableElementStyle コンストラクタ(TableBorder,Color,Color,RegularBoldItalicFontStyle) |
'Declaration Public Function New( _ ByVal border As TableBorder, _ ByVal backColor As Color, _ ByVal foreColor As Color, _ ByVal fontStyle As RegularBoldItalicFontStyle _ )
'使用法 Dim border As TableBorder Dim backColor As Color Dim foreColor As Color Dim fontStyle As RegularBoldItalicFontStyle Dim instance As New TableElementStyle(border, backColor, foreColor, fontStyle)
public TableElementStyle( TableBorder border, Color backColor, Color foreColor, RegularBoldItalicFontStyle fontStyle )
FarPoint.Win.ComplexBorderSide bside = new FarPoint.Win.ComplexBorderSide(Color.Yellow); FarPoint.Win.Spread.TableBorder tborder = new FarPoint.Win.Spread.TableBorder(bside); FarPoint.Win.Spread.TableElementStyle testyle = new FarPoint.Win.Spread.TableElementStyle(tborder, Color.Red, Color.Blue, FarPoint.Win.Spread.RegularBoldItalicFontStyle.Bold); FarPoint.Win.Spread.TableStyle tstyle = fpSpread1.CreateTableStyle("Style1", FarPoint.Win.Spread.TableStyle.TableStyleLight2); tstyle.FirstColumn = testyle; fpSpread1.Sheets[0].Cells[1, 1].Text = "Last Name"; fpSpread1.Sheets[0].Cells[1, 2].Text = "Value"; fpSpread1.Sheets[0].Cells[2, 1].Text = "Smith"; fpSpread1.Sheets[0].Cells[2, 2].Value = 50; fpSpread1.Sheets[0].Cells[3, 1].Text = "Vil"; fpSpread1.Sheets[0].Cells[3, 2].Value = 10; fpSpread1.Sheets[0].Cells[4, 1].Text = "Press"; fpSpread1.Sheets[0].Cells[4, 2].Value = 78; fpSpread1.TableStyleCollection.Add(tstyle); FarPoint.Win.Spread.TableView table = fpSpread1.Sheets[0].AddTable("table", 1, 1, 5, 2, "Style1"); table.FirstColumn = true; listBox1.Items.Add(testyle.Border); listBox1.Items.Add(testyle.FontStyle);
Dim bside As New FarPoint.Win.ComplexBorderSide(Color.Yellow) Dim tborder As New FarPoint.Win.Spread.TableBorder(bside) Dim testyle As New FarPoint.Win.Spread.TableElementStyle(tborder, Color.Red, Color.Blue, FarPoint.Win.Spread.RegularBoldItalicFontStyle.Bold) Dim tstyle As FarPoint.Win.Spread.TableStyle tstyle = FpSpread1.CreateTableStyle("Style1", FarPoint.Win.Spread.TableStyle.TableStyleLight2) tstyle.FirstColumn = testyle FpSpread1.Sheets(0).Cells(1, 1).Text = "Last Name" FpSpread1.Sheets(0).Cells(1, 2).Text = "Value" FpSpread1.Sheets(0).Cells(2, 1).Text = "Smith" FpSpread1.Sheets(0).Cells(2, 2).Value = 50 FpSpread1.Sheets(0).Cells(3, 1).Text = "Vil" FpSpread1.Sheets(0).Cells(3, 2).Value = 10 FpSpread1.Sheets(0).Cells(4, 1).Text = "Press" FpSpread1.Sheets(0).Cells(4, 2).Value = 78 FpSpread1.TableStyleCollection.Add(tstyle) Dim table As FarPoint.Win.Spread.TableView = FpSpread1.Sheets(0).AddTable("table", 1, 1, 5, 2, "Style1") table.FirstColumn = True ListBox1.Items.Add(testyle.Border) ListBox1.Items.Add(testyle.FontStyle)