Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Вопросы по Thread


starter ©   (2004-09-27 22:22:00) 

Вешаю на кнопку длительный расчет. Должна быть возможность остановки расчета, соответственно для доступности кнопки останова - расчет в отдельный thread. Кидаю на форму MCK компонент TKOLThread, сам расчет - в OnExecute, в OnClick стартовой кнопки - Thread1.Execute. Запускаю - пока идет расчет ни форма, ни одна кнопка на ней не реагируют. Applet.ProcessMessages не помог. С каждым новым расчетом память по 16К утекает, если AutoFree:= true; то кнопка запуска расчета становится одноразовой.

Если же делать без MCK компонента

procedure TForm1.BitBtn1Click(Sender: PObj);
var thr: PThread;
begin
thr:= NewThread;
thr.OnExecute:= Raschet;
thr.Resume;
end;

то кнопочки на форме доступны, но память все равно по 16К утекает.

Ну и вопросы собсно такие: почему МСК-овский Thread так себя ведет и как правильно освобождать память после использования Thread, куда вставлять thr.Free.


Paha   (2005-03-09 12:19:00) [1]

>> Speller
Большое спасибо за помощь. За 20 баков мне в одном месте про потоки разжуют и в рот положат.


SPeller   (2005-03-09 11:30:00) [2]

Paha   (09.03.05 2:35) [4]
20 баксов.


Paha   (2005-03-09 02:35:00) [3]

Дайте, пожалуйста, пример реализиции Thread.
Задача такая: в Label1 и Label2 с интервалом 50мс генерится число Random(100).
Так вот хочется, чтобы генерация и показ этих чисел в лебелах был разделен в потоках Thread1 и Thread2 соответствено. Напишите плз рабочую реализацию.


SPeller   (2004-09-28 14:34:00) [4]

После отработки твоей процедуры надо вернуться в её начало и вызвать Suspend, потому что поток автоматически (виндовой объект) уничтожается после выхода из процедуры. AutoFree же указывает уничтожать ли объект типа TThread после завершения потока.


starter   (2004-09-28 12:11:00) [5]

На счет утечки памяти очень извиняюсь, оно в самом деле у меня происходит.

Замена Execute на Resume дала положительный результат, но кнопка запуска стала одноразовой, второй раз запустить расчет невозможно, AutoFree выставлен в false.


SPeller   (2004-09-28 09:47:00) [6]

В случае с MCK тоже вызывай Resume вместо Execute. На счет утечки памяти - это у тебя твой метод утечки даёт. Попробуй сделать пустой метод OnExecute и посмотри, будет ли утекать в этом случае.


Наверх

Титульная страница Поиск, карта сайта Написать письмо