[Помогите!] Зависаем при потоках lol

[[Na`Vi]DendI]

Я такой кароче решил вернуться в делфи, тк. скоро XE3
Написал такой многопоток бла б.
И тут ставлю я больше 10 потоков как форма зависает к чертям пока не пройдет всю работу,только после окончания работы форма отвисает и показываются результаты
Помнится мне что раньше такого не было...
Тут сразу вопрос ШОЗАНАХ ?
Спасибо.

[Sinyss]

Цитата: Сообщение от [Na`Vi]DendI Я такой кароче решил вернуться в делфи, тк. скоро XE3 Написал такой многопоток бла б. И тут ставлю я больше 10 потоков как форма зависает к чертям пока не пройдет всю работу,только после окончания работы форма отвисает и показываются результаты Помнится мне что раньше такого не было... Тут сразу вопрос ШОЗАНАХ ? Спасибо.

2 года назад я бы сказал: "ну это же делфи..."
1 год назад я бы сказал: " ты тупица, вот ссылка в гугле"
а сейчас просто скажу что тебе надо почитать мануалы или как минимум выложить хотя бы схематично код который не работает...

[[Na`Vi]DendI]

Цитата: Сообщение от Sinyss 2 года назад я бы сказал: "ну это же делфи..." 1 год назад я бы сказал: " ты тупица, вот ссылка в гугле" а сейчас просто скажу что тебе надо почитать мануалы или как минимум выложить хотя бы схематично код который не работает...

Гугл я смотрел первым делом.
Манулы читал штук 20.
Запуск потока => крит секция => синхронизация

[VeTaL_UA]

а потому что нефиг инфу напрямую из контролов формы читать с потока, тогда смысла с потоков вообще нету

[[Na`Vi]DendI]

Цитата: Сообщение от VeTaL_UA а потому что нефиг инфу напрямую из контролов формы читать с потока, тогда смысла с потоков вообще нету

Да я вообще к форме не обращаюсь в потоке.

[Sinyss]

Цитата: Сообщение от [Na`Vi]DendI Запуск потока => крит секция => синхронизация

не ну не настолько абстрактно, кодом, надо знать, какая область видимости у переменных, как у тебя крит. секция выглядит и тд.

Цитата: Сообщение от [Na`Vi]DendI Да я вообще к форме не обращаюсь в потоке.

переменные которые ты считаешь глобальными тоже относятся к форме, ООП же...
Если бы ты выложил код, мы бы сейчас не разгадывали что ты бы ты там мог написать что бы оно не работало....

[[Na`Vi]DendI]

Цитата: Сообщение от Sinyss переменные которые ты считаешь глобальными тоже относятся к форме, ООП же... Если бы ты выложил код, мы бы сейчас не разгадывали что ты бы ты там мог написать что бы оно не работало....

Думаю так понятнее будет

 try
    begin
 while Work do
  begin
   CS.Enter;
   Inc(Acc);
   if Acc<Accounts.Count then CurAcc:=Acc else Work:=false;
   CS.Leave;
    http:=thttpsend.Create();
    http.UserAgent:='Mozilla/5.0 (Windows NT 6.1; rv:15.0) Gecko/20100101 Firefox/15.0.1';
    http.MimeType:='application/x-www-form-urlencoded';
    if work then
    begin
    http.HTTPMethod('GET','ssylko');
    if lololo <> llololo then rez:=-1 else rez:=1;
      end;
      Synchronize(Sync);
      http.Free;
     end;
 dec(Thread);
 end;
 except
 end;
 end;

А в синхронайзе уже инфа выводится

[Sinyss]

Цитата: Сообщение от [Na`Vi]DendI CurAcc:=Acc

тут присваивание индекса или значения? если значения то все ок, иначе ты возможно дальше обращаешься к значению вне крит. секции...

Цитата: Сообщение от [Na`Vi]DendI lololo <> llololo

[[Na`Vi]DendI]

Цитата: Сообщение от Sinyss тут присваивание индекса или значения? если значения то все ок, иначе ты возможно дальше обращаешься к значению вне крит. секции...

Роли не играет,раньше этот код работал.
Индекс списка.

[Sinyss]

Цитата: Сообщение от [Na`Vi]DendI Роли не играет,раньше этот код работал. Индекс списка.

Очевидно что то то поменялось....
Индекс списка, который находится на форме, идет обращение к форме и мы получаем зависшую форму...

[[Na`Vi]DendI]

Цитата: Сообщение от Sinyss Очевидно что то то поменялось.... Индекс списка, который находится на форме, идет обращение к форме и мы получаем зависшую форму...

Я вас не могу понять,там нет обращения к форме.

[Sinyss]

Цитата: Сообщение от [Na`Vi]DendI Я вас не могу понять,там нет обращения к форме.

список существует только внутри потока?

[[Na`Vi]DendI]

Цитата: Сообщение от Sinyss список существует только внутри потока?

Нет.

[MastaDan]

Такая же хрень была, пока не посоветовали впиндюрить

Цитата: Application.ProcessMessages;

и о боги, форма виснуть перестала
Лучше погугли про Application.ProcessMessages много интересного пишут

[Роспотребнадзор]

Еще не забудь про IdAntiFreeze.
Он выносит синхронные операции в рабочий фоновый поток, позволяя в это время главному потоку обрабатывать сообщения. Проще говоря, меньше подвисаний