【结贴】如何取DataGrid 分组行号？**

kcyjy

如图因为导出excel表的时候行号不会导出我想加个字段跟图上行号一致。怎么做
1、在数据集上增加一个字段，例如在信息层数据集上创建一个计算字段，

2、在计算字段的OnCalcField事件为Value赋值代码如下：

Value := Field.DataSet.RecNo;
的方法会造成图上的结果不是我想要的我想要的是计算字段跟表上的行号一致，用来再导出文件的时候能输出出来

zfang

http://bbs.justep.com/forum.php?mod=viewthread&tid=22223

kcyjy

var
  i,j:integer;
  lStr:String;
begin
   DataSetBroker1.DataSet.First;
   j := 1;
   DataSetBroker1.DataSet.DisableControls;
   for i:=0 to DataSetBroker1.DataSet.RecordCount-1 do
   begin
     lStr := DataSetBroker1.DataSet.FieldbyName('ID').AsString;
     DataSetBroker1.DataSet.Edit;
     DataSetBroker1.DataSet.FieldbyName('LSZD').AsInteger := j;
     DataSetBroker1.DataSet.next;
     if lStr = DataSetBroker1.DataSet.FieldbyName('ID').AsString then
        j:=j+1
     else
        j:=1;
   end;
   DataSetBroker1.DataSet.EnableControls;
end;

这个方法我查到了，我想问能不能直接取到图上DataGrid显示出来的行号

kcyjy

算了结贴吧

zfang

刚才问了一下平台组，很难取，需要遍历datagrid的节点信息了。

zfang

哦，结了呀，谢谢反馈。