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