说明：由于以前发的一个贴子没有说明白，在此再开一贴再讨论   

（数据总行数是远大于dbgrid1一页数据行数才会出现这种情况)
///////////////////////////////////////////////////////////////////
问题描述：
(假如dbgrid1一页数据显示7行）

行号
... 0600 ... 1行
... 0700 ... 2行
... 0800 ... 3行
... 0830 ... 4行 //这是dbgrid1一页数据的中间位置
... 0900 ... 5行
... 1000 ... 6行
... 1100 ... 7行〈---//假如此时指针指向这一条数据，
//这时时钟定时响应，刷新数据，
//这时问题出现了：7行数据跳到第四行数据上去了
显示为如下：

... 0830 ... 1行
... 0900 ... 2行
... 1000 ... 3行
... 1100 ... 4行〈---//这是dbgrid1一页数据的中间位置
... 1120 ... 5行
... 1200 ... 6行
... 1230 ... 7行
///////////////////////////////////////////////////////////
我的目的：
... 0600 ... 1行
... 0700 ... 2行
... 0800 ... 3行
... 0830 ... 4行 //这是dbgrid1一页数据的中间位置
... 0900 ... 5行
... 1000 ... 6行
... 1100 ... 7行〈---//假如此时指针指向这一条数据，
//这时时钟定时响应，刷新数据，
//这时该行数据仍在原位置显示，不跳到4行显示

///////////////////////////////////////////////////////////////////////
其它说明：

1。我的刷新语句是：
timer定时触发：
===========================================================
gss:=dbgrid1.datasoure.dataset.fieldbyname('A1').asstring;
dbgrid1.datasoure.dataset.close;
dbgrid1.datasoure.dataset.open;
dbgrid1.datasoure.dataset.locate('A1',gss,[]);
============================================================
用bookmark效果与上面情况一样
aa:=dbgrid1.datasoure.dataset.getbookMark;
dbgrid1.datasoure.dataset.close;
dbgrid1.datasoure.dataset.open;
dbgrid1.datasoure.dataset.gotobookMark;
===========================================================
2。指定DBgrid1.datasource为Query1

小弟搜遍网路,却找不到解决的方法,向各位大侠求助,小弟不胜感激之至!

此题是否无解?
请各位大大帮忙,小弟感激不尽!

ps: delphi7 mssql2000

編輯記錄

就我看到的情形！

為何？前幾行的資料不見了？刷新後，前幾行不見了，

就你寫的，它還是在1100沒錯呀，只是問題是

前面幾行不見了？？？？？？？

------
資訊業是永遠不能停止學習的行業！
但是進步都只是一點點一點點！
==可以不用理我！因為我的程度只有2成，或許不到！！
==我只會拉拉元件，打打迴圈，打打條件判斷，連連資料庫，rs232送送訊號，印表機簡單列印。
只有寫寫小小的點餐軟體(為何想寫，因為叫人家改的小東西，都ooxx，是會付錢的又不是沒錢，但是理由還是一堆)