请教如何设置一个DBGRID的每一栏的宽度？

Question

请教如何设置一个DBGRID的每一栏的宽度？这个DBGRID的内容是用ADOQUERY控件SELECT出来的。我不想让每栏的宽度和表中字段设计时的宽度一样，而是自己单独设定。另外在这种情况下，如何设置表头的字体及颜色？ 谢谢了！

Answer 1

SpKcSql.Sql.Clear ;
  SpKcSql.SQL.Add(SqlSTr);
  SpKcSql.Close;
  SpKcSql.Open ;
  Ds.DataSet := SpKcSql;
  Dg_SpKc.DataSource := Ds;
  Dg_SpKc.Columns[0].Width := 0;
  Dg_SpKc.Columns[1].Width := 80;
  Dg_SpKc.Columns[2].Width := 100;
  Dg_SpKc.Columns[3].Width := 80;
  Dg_SpKc.Columns[4].Width := 100;
  Dg_SpKc.Columns[5].Width := 80;
  Dg_SpKc.Columns[7].Width := 60; //定价
  Dg_SpKc.Columns[8].Width := 70;
  Dg_SpKc.Columns[9].Width := 70; //类别
  Dg_SpKc.Columns[6].Width := 80;//库存数量
  TNumericField(SpKcSql.Fields[7]).DisplayFormat:='#0.00';  将某列数据格式化