'Declaration Public ReadOnly Property HierBar As HierBarInfo
'Usage Dim instance As FpSpread Dim value As HierBarInfo value = instance.HierBar
public HierBarInfo HierBar {get;}
'Declaration Public ReadOnly Property HierBar As HierBarInfo
'Usage Dim instance As FpSpread Dim value As HierBarInfo value = instance.HierBar
public HierBarInfo HierBar {get;}
DataSet ds = new System.Data.DataSet(); private void Page_Load(object sender, System.EventArgs e) { if (this.IsPostBack) return; this.CreateDataSet(); FpSpread1.Sheets[0].DataSource = ds; FpSpread1.Sheets[0].DataMember = "names"; FpSpread1.Sheets[0].AllowSort = true; FpSpread1.Sheets[0].AlternatingRows[0].ForeColor = Color.Teal; FpSpread1.Sheets[0].SetColumnWidth(2, 150); FpSpread1.RowHeader.Width = 40; FpSpread1.HierBar.ShowParentRow = true; FpSpread1.HierBar.ShowWholePath = true; FpSpread1.HierarchicalView = false; } private void CreateDataSet() { DataTable names; DataTable cars; DataTable colors; names = ds.Tables.Add("names"); names.Columns.Add("first"); names.Columns.Add("last"); names.Columns.Add("index"); names.Rows.Add(new object[] {"bob", "morris", 0}); names.Rows.Add(new object[] {"sean", "morris", 1}); names.Rows.Add(new object[] {"chris", "morris", 2}); cars = ds.Tables.Add("cars"); cars.Columns.Add("make"); cars.Columns.Add("model"); cars.Columns.Add("owner"); cars.Rows.Add(new object[] {"ford", "F-150", 0}); cars.Rows.Add(new object[] {"ford", "Mustang", 1}); cars.Rows.Add(new object[] {"chevy", "Impala", 2}); colors = ds.Tables.Add("colors"); colors.Columns.Add("exterior"); colors.Columns.Add("interior"); colors.Columns.Add("owner"); colors.Rows.Add(new object[] {"black", "gray", 0}); colors.Rows.Add(new object[] {"red", "beige", 1}); colors.Rows.Add(new object[] {"black", "tan", 2}); ds.Relations.Add("cars", names.Columns["index"], cars.Columns["owner"]); ds.Relations.Add("colors", names.Columns["index"], colors.Columns["owner"]); }
Dim ds As New System.Data.DataSet() Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load If (Me.IsPostBack) Then Return CreateDataSet() FpSpread1.Sheets(0).DataSource = ds FpSpread1.Sheets(0).DataMember = "names" FpSpread1.Sheets(0).AllowSort = True FpSpread1.Sheets(0).AlternatingRows(0).ForeColor = Color.Teal FpSpread1.Sheets(0).SetColumnWidth(2, 150) FpSpread1.RowHeader.Width = 40 FpSpread1.HierBar.ShowParentRow = True FpSpread1.HierBar.ShowWholePath = True FpSpread1.HierarchicalView = False End Sub Private Sub CreateDataSet() Dim names As DataTable Dim cars As DataTable Dim colors As DataTable names = ds.Tables.Add("names") names.Columns.Add("first") names.Columns.Add("last") names.Columns.Add("index") names.Rows.Add(New Object() {"bob", "morris", 0}) names.Rows.Add(New Object() {"sean", "morris", 1}) names.Rows.Add(New Object() {"chris", "morris", 2}) cars = ds.Tables.Add("cars") cars.Columns.Add("make") cars.Columns.Add("model") cars.Columns.Add("owner") cars.Rows.Add(New Object() {"ford", "F-150", 0}) cars.Rows.Add(New Object() {"ford", "Mustang", 1}) cars.Rows.Add(New Object() {"chevy", "Impala", 2}) colors = ds.Tables.Add("colors") colors.Columns.Add("exterior") colors.Columns.Add("interior") colors.Columns.Add("owner") colors.Rows.Add(New Object() {"black", "gray", 0}) colors.Rows.Add(New Object() {"red", "beige", 1}) colors.Rows.Add(New Object() {"black", "tan", 2}) ds.Relations.Add("cars", names.Columns("index"), cars.Columns("owner")) ds.Relations.Add("colors", names.Columns("index"), colors.Columns("owner")) End Sub
FpSpread Class
FpSpread Members
HierBarInfo Class
Displaying Data as a Hierarchy
Customizing the Hierarchy Bar