delphi dbgrid 每次刷新都会闪一下，我一个界面同时10个dbgrid闪的更明显，求指教

Question

同上，效果很差，我也试过
try
    jkcpcs.ADOQuery6.DisableControls;
.....//重画dbgrid代码
    finally
    jkcpcs.ADOQuery6.EnableControls
    end;
依然没有改变，请高手点拨

Answer 1

你的刷新操作，对记录集做了什么操作，重新查询还是对记录做了什么操作？这段代码可以贴出来看下？
或许跟游标有关系。比如：
bookMark: TBookMark;try
  bookMark := DataSet.GetBookMark;
  DataSet.DisableControls;
  ...比如记录集移动遍历等操作
finally
  DataSet.GotoBookMark(bookMark);
  DataSet.FreeBookMark(bookMark);
  DataSet.EnableControls;
end;

Answer 2

刷新前先把DBGRID的DATASOURCE去掉,刷新完了再写回去.

Answer 3

dataset.DisableControls应该能改善很多
暂时去掉dataset的datasource，也不错，只是内容会消失一下