Скачать: CL | DM;

Помогите разобраться с алгоритмом!!!   Найти похожие ветки 

← →
dimonf ©   (2002-12-12 21:56) [0]

Объясните дурню, сам не могу понять :(
Как мне организовать цикл из которого я могу обрабатывать события других компанентов.
Грубо говоря у меня есть база данных по которой я "пробегабсь":
repeat
...
until
В данном цикле я хочу обрабатывать событие другого компанента,
в данном случае определяю DNS SMTP сервера OnRequestDone.
Как мне приостановить цикл до тех пор пока у меня не сработает OnRequestDone. А потом продолжить цикл дальше?
У меня есть мысль по созданию потока:
...
CreateThread(nil, 0, @aaa, nil, 0, id);
...
function aaa(p: integer): integer;
begin
...
Result := 0;
end;
...
но я не уверен, что мысль правильная. Как быть, посоветуйте Гурру!!!

---

← →
Song ©   (2002-12-12 22:16) [1]

Application.ProcessMessages

---

← →
Моджахед   (2002-12-12 22:18) [2]

Вероятно, плохо продумана структура, коли понадобилось такое...
Но если надо, то надо. Внешний флаг ставь в обработчике события и в цикле своем


Repeat
Until Flag<>True;


---

← →
dimonf ©   (2002-12-12 22:18) [3]

Application.ProcessMessages пробовал не помогает :(

---

← →
False_Delirium ©   (2002-12-13 03:56) [4]

repeat

while (not RequestIsDone) do Application.ProcessMessages ;

until (...) ;

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c