用ClientDataSet更新数据表，怎样自动生成行号？ [问题点数：40分]

ClientDataSet.First;
while not ClientDataSet.eof do
begin
  ClientDataSet.edit;
  ClientDataSet.FieldByName('行号字段').asInteger := ClientDataSet.RecNo;
  ClientDataSet.next;
end;