怎样在dbgrid最左边加一列，显示序号！

Question

如标题！序号就是1，2，3，4根据记录数自动加1。

Answer 1

你就在数据表内加上一 个+Autoicerement类型的字段，他会在记录增加后自动加1，然后在DBGrid里显示其在最左面就行了。

Answer 2

新增一个caculated字段id,integer;
在oncaculate事件中
with query1 do
filedbyname('id').asinteger:=recno
然后将id显示在grid最左边

Answer 3

No.1:
添加一个计算字段id然后再table的onCalcFields事件里加
table.fieldbyname('id').asinteger:=table1.recno+1
就可以了No.2:
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
  if Column.Index = 5 then
  with DBGrid1.Canvas do begin
    FillRect(Rect);
    TextOut(Rect.Left+2, Rect.Top+2, IntToStr(DBGrid1.DataSource.DataSet.RecNo));
  end;
end;

Answer 4

最好是用
 yesxwl() 的方法