コントロールに接続しないで
内部だけでいままでDBを利用していたので知りませんでした
 最近コントロールに接続してつなぐといっしょにカーソル動いて
おそいなぁ って思っていましたが
昨日 気がつきました。
   劇的に速度が上昇しました♪

元の位置にカーソル戻そうかなぁと思って
TBookmarkの使い方のヘルプをみにいって知りました。

古いバージョン意外は
Bookmark プロパティがあるので
Withを使うときは、名前の衝突に要注意
(コンパイルエラーで教えてくれますが・・・)

var
  aBookmark: TBookmark;
begin
            { メモリを割り当て,値を代入する }
  aBookmark := Table1.GetBookmark;

with Table1 do
  begin
  { コンポーネントとの接続を一時的に解除します }
  DisableControls;
  try
    while Not(Eof) do begin
      // 処理
       Next;
    end;
  finally
{ カレントレコードのコントロールを更新します }
    GotoBookmark(aBookmark);
       { データコントロールのレコード表示をオンにする }
    EnableControls;
         {ブックマークのメモリ割り当てを解除する }
    FreeBookmark(aBookmark);
  end;   //  with Table1