关于stringgrid 的问题

Question

如何在stringgrid 中显示序号？？？也就是说用stringgrid 显示查询结果，在每条记录前显示序号？

Answer 1

你参考一下
procedure TForm1.BitBtn2Click(Sender: TObject);
var
  I, J, K : Integer;
begin
  K := 0;
  with StringGrid1 do
    for I := 0 to ColCount - 1 do
      for J:= 0 to RowCount - 1 do
        begin
          K := K + 1;
          Cells[I,J] := IntToStr(K);
        end;end;

Answer 2

你可以在显示数据的时候增加序列号，显示一条，ID加一，StringGrid加一列用来显示ID就可

Answer 3

我再dbgrid中试过，
增加一计算字段pp
在adoquery的oncalcfields中
if adoquery1.recno=-1 then
  adoquery1pp.value:=1
else
  adoquery1pp.value:=adoquerey1.recno;