Базы данных, работа с компонентами [D7, WinXP]
SunriseGirl © (2007-06-14 14:33:00)
У меня есть набор данных в ADODataSet. Он отображается в
DBGrid.
Когда я делаю навигацию по набору данных, я делаю это с
помощью
while (DBFDSet.Eof = False) do
......
DBFDSet.Next;
end;
и во время выполнения этих команд все компоненты формы
неактивны. А что если я хочу прервать цикл While либо сделать паузу
или хочу пока выполнить какие-либо другие действия. Как это
сделать?
Ega23 (2007-06-14 15:04:00) [1]
var
bm : TBookmark;
.....
With DBFDSet do
begin
try
bm := GetBookmark;
DisableControls;
First;
While not Eof do
begin
Application.ProcessMessages;
if Какой-то-флаг-условия then
Break;
........
Next;
end;
finally
GotoBookmark(bm);
EnableControls;
end;
end;
Наверх 
ЧАТ |
Орешник |
|
