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

十万火急，高手赐教 如何 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 也是有问题啊 急 啊！！
有没有好的办法？？？

create table table1
( Name varchar(20),
sex varchar(4)
);

select 0 NO_ , Nmae, sex from table1

那个 No_ 数据库系统是自动定义为数值行的字段，你可以象正常字段一样操作了，
只是3层的时候你 要特殊处理以下。