如何固定dbGrid中的某几个列?

Question

有一个数据表,因表中字段较多,因此,想把其中的几个字段固定显示,要如何设置?分不够再加

Answer 1

if dgIndicator in Dbgrid.options then 
  TStringGrid(DBGrid1).Fixedcols:=n+1 
else 
  TStringGrid(DBGrid1).Fixedcols:=n;

Answer 2

在查询出数据后,接着设置表格各列的宽度:
    open;
    dbgrid.colums[0].width:=你要的宽度
    dbgrid.colums[1].width:=你要的宽度
    dbgrid.colums[2].width:=你要的宽度
......