Проблема с потоками (парсинг всех ссылок сайта)

[evg_m]

1.

then CurLnk := Lnk else neeadSleep:=true;

if neeadsleep then sleep(1000);
neeadsleep:=false;

И думать где это поставить.

2. http://programmersforum.ru/showpost....93&postcount=4

3. Не поток должен управлять собой и всеми другими. (вот такого кода в потоке НЕ ДОЛЖНО быть).

     Inc(Lnk);
     if Form1.Memo_List.Lines.Count <> Form1.Memo_Ok.Lines.Count + Form1.Memo_Error.Lines.Count
     then CurLnk := Lnk else Work := false;

а главный поток должен знать (помнить о них) все свои рабочие потоки и чем они заняты и управлять ими. (xx.suspend zz.resume yy.terminate примеры управления).
А сами потоки общаются с главным и информируют его о своих действиях.
И соответственно поток должен иметь средство информирования главного (т. е. у потока должно быть одно и более событий). Одно у него уже есть OnTerminate.

[chex01]

Сообщение от evg_m

then CurLnk := Lnk else neeadSleep:=true;

if neeadsleep then sleep(1000);
neeadsleep:=false;

И думать где это поставить.

ИМХО - брЭд (по английски хлеб), т.к. после "сна" поток не имеет строки

Сообщение от evg_m

главный поток должен знать (помнить о них) все свои рабочие потоки и чем они заняты и управлять ими. (xx.suspend zz.resume yy.terminate примеры управления).
А сами потоки общаются с главным и информируют его о своих действиях.
И соответственно поток должен иметь средство информирования главного (т. е. у потока должно быть одно и более событий). Одно у него уже есть OnTerminate.

Очень интересная мысль. Нет ли реального примера?

Как вариант, вот такой костыль:

   CS.Enter;
     Inc(Lnk);
     if Form1.Memo_List.Lines[Lnk] = '' then Dec(Lnk);
...
   CS.Leave;

минус, сами понимаете, в том что N-ое количество раз прогоняем в потоках одну и ту же строку. (но "ОНО" работает)

[evg_m]

ИМХО - брЭд (по английски хлеб), т.к. после "сна" поток не имеет строки

И думать где это поставить.

А также как это применить.

(но "ОНО" работает)

А как только пытаемся изменить алгоритм работы СРАЗУ плывем.

[evg_m]

ИМХО - брЭд (по английски хлеб), т.к. после "сна" поток не имеет строки

И думать где это поставить.

А также как это применить. что надо добавить чтобы не было (см. цитату).

(но "ОНО" работает)

А как только пытаемся изменить алгоритм работы СРАЗУ плывем.

Очень интересная мысль. Нет ли реального примера?

насчет реального не скажу. Но на форуме была иллюстрация данного подхода,с комментариями.(поищи в моих сообщениях).