dbgrid的问题！

Question

可不可以隐藏某一列，比如，有没有什么函数可以判断dbgrid的那一列没有值就把它隐藏起来！然后点击一个button，把隐藏列全部显示出来！
谢谢各位高手帮忙！在线等！

Answer 1

可以,但要控制的是table/query：table1.fields[0].visible:=false;

Answer 2

procedure TForm1.BitBtn1Click(Sender: TObject);
var
  nCol:Integer;
begin
  AdoQuery1.First;
  for nCol:=0 to Adoquery1.FieldCount -1 do
    if Adoquery1.Fields[nCol].IsNull then
        Dbgrid1.Columns[nCol].Visible:=false;
end;procedure TForm1.BitBtn2Click(Sender: TObject);
var
  nCol:Integer;
begin
  for nCol:=0 to dbGrid1.Columns.Count -1 do
     if DbGrid1.Columns[nCol].Visible =false then
         DbGrid1.Columns[nCol].Visible:=true;
end;

Answer 3

可关闭form后，在打开form，dbgrid的数据还在不会消失，所以怎么把在缓存里的数据清空呀？谢谢各位帮忙！

Answer 4

在窗体的onclose或者onshow事件中，把邦定的table或query，close一下