Вниз
Скачать: CL | DM;

вопрос по потокам   Найти похожие ветки 

← →
tim   (2008-03-25 17:51) [0]

Всем привет! у меня такой вопрос:
есть некоторые входные данные, которые нужно обработать. этим занимаются 10 процедур,друг от друга не зависящие.
т.е. по button.click
procedure_1;
procedure_2;
...
procedure_9;
procedure_10;
разумеется хотелось чтобы они просчитывались сразу, как я понимаю для этого сущ-ют потоки.

создаю поток прямо в проекте(мне так удобней нежели создавать отделный файл pas,хотя может я не прав в выборе).
TFunc_get_1 = class(TThread)
private
 procedure Get_1;
protected
 procedure execute; override;
end;

...
var
...  
get1:TFunc_get_1;

...
procedure TFunc_get_1.Get_1;
begin
...
end;

procedure TFunc_get_1.execute;
begin
 synchronize(Get_1);
end;

потом в button
if CheckBox9.Checked then
begin
 get1 := TFunc_get_1.create(true);
 get1.resume;
end;


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


← →
Игорь Шевченко ©   (2008-03-25 17:52) [1]


> procedure TFunc_get_1.execute;
> begin
>  synchronize(Get_1);
> end;


Дети Архангельского, блин. Удавить.


← →
Palladin ©   (2008-03-25 17:54) [2]

песец... опять оно... вот пример правильного построения работы потока...
http://www.delphimaster.ru/articles/panov/index.html

и прочитай про synchronize, зачем оно нужно, и почему его не нужно пихать в каждую дырку


← →
tim   (2008-03-25 17:56) [3]


> Игорь Шевченко


кажется твой ответ не является ответом или советом на мой вопрос.


← →
tim   (2008-03-25 17:56) [4]

Palladin, спасибо!


← →
Сергей М. ©   (2008-03-25 20:15) [5]


> tim   (25.03.08 17:56) [3]


Тебе, пробегающему мимо, просто неведомо, как затрахали эти "дети" тех, кто задержался здесь чуть дольше чем ты)


← →
Игорь Шевченко ©   (2008-03-25 20:28) [6]


> кажется твой ответ не является ответом или советом на мой
> вопрос.


Я так понимаю, что совет почитать нормальную книгу уже безнадежно опоздал. Тогда только удавить.



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

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



Память: 0.46 MB
Время: 0.011 c
15-1204729774
Галинка
2008-03-05 18:09
2008.04.20
Кто что знает про DB2


15-1204686710
Slider007
2008-03-05 06:11
2008.04.20
С днем рождения ! 5 марта 2008 среда


2-1206474840
delphinub
2008-03-25 22:54
2008.04.20
Transaction приводит в исключению


15-1204872820
ANB
2008-03-07 09:53
2008.04.20
Отправить почту через MS Exchange


2-1206706569
oleg_teacher
2008-03-28 15:16
2008.04.20
помогите с кодировкой




   Наверх