Public Function GetItem( _
   ByVal row As Integer _
) As IEditableObject

Dim instance As GroupDataModel
Dim row As Integer
Dim value As IEditableObject
 
value = instance.GetItem(row)

public IEditableObject GetItem( 
   int row
)

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;

            System.ComponentModel.IEditableObject o;
            o = gm.GetItem(1);
            if (o is System.Data.DataRowView)
            {
                  System.Data.DataRowView dr;
                  dr = (System.Data.DataRowView)o;
                  dr.Delete();
            }
      }
}

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
            Dim o As System.ComponentModel.IEditableObject
            o = gm.GetItem(1)
            If TypeOf o Is System.Data.DataRowView Then
                  Dim dr As System.Data.DataRowView
                  dr = o
                  dr.Delete()
            End If
      End If

End Sub