十万火急，高手赐教 如何 DBGridEh 显示数据加 序号 列 （始终是1,2,3....）??

Question

十万火急，高手赐教 如何 DBGridEh 显示数据加 序号 列 （始终是1,2,3....）??dataset . 计算字段 处理 （需要增加，删除，修改） 
1。摄制 公用变量 ODFRecordNum,    
procedure TfrmFiber.QryODFInstCalcFields(DataSet: TDataSet);
begin
  QryODFInst.fieldbyname('RecordNum').AsInteger:= ODFRecordNum+ 1;
  inc(ODFRecordNum);
end;
 QryODFInst.open 时候 该ODFRecordNum：= 0 
增加 删除 可以  修改的时候 不行
2. oracle 数据库 recno 不行procedure TfrmDDF2DDM.DBGEhDDFDrawColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumnEh;
  State: TGridDrawState);
begin
  if column.FieldName='RecordNum' then
  begin
    DBGEhDDF.Canvas.Pen.Color:=clblack;
    DBGEhDDF.Canvas.TextOut(rect.left,rect.top,inttostr(DDFRecordNum));
    DDFRecordNum:=DDFRecordNum+1;
  end;
end;dbgrid 的DrawColumnCell 也是有问题啊  急 啊！！
有没有好的办法？？？ 

Answer 1

是不是可以考虑一下,在表中增加一个字段,或者把查出来的数据集放到一个临时表中去然后再在那个表里面加上一个字段,

Answer 2

同意楼上的说法,我在实际工作中就这么做的.