一个简单tdbgrid问题.(100分)

如何在网格右列固定显示数字,当其他列改变时,该列不变.

什么意思??Fixedcols??
写Query的时候多select一列顺序号行不行??
不然就直接用StringGrid好了,那个好办多了.

to bubble:
就是stringgrid的fixedcols功能,但在d5中,下列代码工作不正常,不知为何?
TStringGrid(DbGrid1).FixedCols := 12; //12列是最右列

又及:select一列顺序号怎末写,给点代码好吗?

procedure TForm1.Button1Click(Sender: TObject);
var
i,j:integer;
begin
Query1.Open;
StringGrid1.RowCount:=Query1.RecordCount;
StringGrid1.ColCount:=Query1.FieldCount;
for i:=1 to StringGrid1.RowCount do
StringGrid1.Cells[0,i]:=IntToStr(i);
for i:=1 to StringGrid1.ColCount do
StringGrid1.Cells[i,0]:=Query1.Fields[i-1].FieldName;
for i:=1 to StringGrid1.RowCount do
begin
Query1.First;
while not Query1.Eof do
begin
for j:=1 to StringGrid1.RowCount do
begin
StringGrid1.Cells[j,i]:=Query1.Fields[j-1].AsString;
end;
Query1.Next;
end;
end;

end;

接受答案了.