Текущий архив: 2007.07.08;
Скачать: CL | DM;

Вниз

Базы данных, работа с компонентами   Найти похожие ветки 

← →
SunriseGirl   (2007-06-14 14:33) [0]

У меня есть набор данных в ADODataSet. Он отображается в DBGrid.
Когда я делаю навигацию по набору данных, я делаю это с помощью
 while (DBFDSet.Eof = False) do
   ......
   DBFDSet.Next;
 end;
и во время выполнения этих команд все компоненты формы неактивны. А что если я хочу прервать цикл While либо сделать паузу или хочу пока выполнить какие-либо другие действия. Как это сделать?

---

← →
Ega23 ©   (2007-06-14 15:04) [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;

---

Страницы: 1 вся ветка

Текущий архив: 2007.07.08;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.02 c