Spread Windows Forms 9.0 Product Documentation
GroupDataModel Constructor()
Example 


Creates a new group data model.
Syntax
'Declaration
 
Public Function New()
'Usage
 
Dim instance As New GroupDataModel()
public GroupDataModel()
Example
fpSpread1.AllowColumnMove = true;
fpSpread1.ActiveSheet.GroupBarInfo.Visible = true;
fpSpread1.ActiveSheet.AllowGroup = true;

FarPoint.Win.Spread.GroupInfo gi = new FarPoint.Win.Spread.GroupInfo();
gi.BackColor = Color.Yellow;

FarPoint.Win.Spread.GroupInfo gi2 = new FarPoint.Win.Spread.GroupInfo();
gi2.BackColor = Color.Green;

FarPoint.Win.Spread.GroupInfoCollection gic = new FarPoint.Win.Spread.GroupInfoCollection();
gic.AddRange(new FarPoint.Win.Spread.GroupInfo[] { gi, gi2 });

fpSpread1.ActiveSheet.GroupInfos.Add(gic[0]);

private void button1Click(object sender, EventArgs e)
{
FarPoint.Win.Spread.Model.GroupDataModel gm;
if ((fpSpread1.ActiveSheet.Models.Data) is FarPoint.Win.Spread.Model.GroupDataModel)
{
      gm = (FarPoint.Win.Spread.Model.GroupDataModel)fpSpread1.ActiveSheet.Models.Data;
      if ((gm.TargetModel) is FarPoint.Win.Spread.Model.IRangeSupport)
      {
            FarPoint.Win.Spread.Model.IRangeSupport im = (FarPoint.Win.Spread.Model.IRangeSupport)gm.TargetModel;
            bool b;
            b = gm.IsGroup(0);
            string s = gm.GetColumnName(2);
            MessageBox.Show(s);
      }
}
FpSpread1.AllowColumnMove = True
FpSpread1.ActiveSheet.GroupBarInfo.Visible = True
FpSpread1.ActiveSheet.AllowGroup = True

Dim gi As New FarPoint.Win.Spread.GroupInfo
gi.BackColor = Color.Yellow

Dim gi2 As New FarPoint.Win.Spread.GroupInfo
gi2.BackColor = Color.Green

Dim gic As New FarPoint.Win.Spread.GroupInfoCollection()
gic.AddRange(New FarPoint.Win.Spread.GroupInfo() {gi, gi2})

FpSpread1.ActiveSheet.GroupInfos.Add(gic(0))

Private Sub Button1Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim gm As FarPoint.Win.Spread.Model.GroupDataModel
If TypeOf (FpSpread1.ActiveSheet.Models.Data) Is FarPoint.Win.Spread.Model.GroupDataModel Then
      gm = FpSpread1.ActiveSheet.Models.Data
      If TypeOf (gm.TargetModel) Is FarPoint.Win.Spread.Model.IRangeSupport Then
            Dim im As FarPoint.Win.Spread.Model.IRangeSupport = gm.TargetModel
            Dim b As Boolean
            b = gm.IsGroup(0)
            Dim s As String = gm.GetColumnName(2)
            MsgBox(s)
      End If
End If

End Sub
Requirements

Target Platforms: Windows 2000 Professional (SP4), Windows 2000 Server, Windows 2003 Server (SP1), Windows Server 2012 R2, Windows 2008, Windows XP (SP2), Windows Vista, Windows 7, Windows 8, Windows 8.1, Windows 10

See Also

Reference

GroupDataModel Class
GroupDataModel Members
Overload List

 

 


Copyright © GrapeCity, inc. All rights reserved.