TDbgrid

← →
peypivo © (2003-12-09 18:12) [0]

Подскажите какое свойство TDbgrid отключает её во время навигации по данным (если я косо выразился: перебираю
все записи в таблице, в это время в гриде скролер бежит
вниз, как этого избежать?)

← →
Silver Alex © (2003-12-09 18:17) [1]

with DataSet do
try
DisableControls;
....
finally
EnableControls;
end;

← →
Alone Corsar © (2003-12-09 18:17) [2]

А где Вы перебраете данные??

← →
peypivo © (2003-12-09 18:20) [3]

> Silver Alex ©
спасибо

>Alone Corsar ©

while not table.eof do
begin
.........
table.next;
end;

← →
Silver Alex © (2003-12-09 18:27) [4]

можно еще так, если надо на ту же запись вернуться

var
bm: TBookMark;
...
with DataSet do
try
bm:=GetBookmark;
DisableControls;
....
gotobookmark(bm)
finally
EnableControls;
FreeBookmark(bm);
end;

← →
Sandman25 © (2003-12-09 18:28) [5]

[4] Silver Alex © (09.12.03 18:27)

Там нужно 2 try finally.

> Silver Alex © (09.12.03 18:27) [4]

Все правильно, только при условии, что эта таблица не является Master и не имеет подчиненную себе таблицу (Detail). В противном случае, при использовании DisableControls, вы потеряете связь с подчиненной таблицей...

> Silver Alex © (09.12.03 18:27) [4]

Небольшое дополнение:
В D6 GetBookmark, GotoBookmark и FreeBookmark абсолютно излишни благодаря TDataSet.BookMark

Ну вы и набросились, господа програмеры

> Sandman25 © (09.12.03 18:28) [5]

можно, но здесь это не критично, так что не вижу смысла

> mike-d © (09.12.03 18:56) [6]

А по чем видно что таблица мастер? но если бы такая ситуация была, конечно я бы кое что дописал.В зависимости от ситуации.

> Zacho © (09.12.03 19:49) [7]

Конечно!

> Всем

Учел все замечания

TDbgrid Найти похожие ветки