GroupDataModel Constructor()

Visual Basic
C#

'Declaration
 
Public Function New()

'Usage
 
Dim instance As New GroupDataModel()

public GroupDataModel()

C#

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);
      }
}

Visual Basic

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

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

Reference

GroupDataModel Class
GroupDataModel Members
Overload List