Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.04.20;
Скачать: 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 вся ветка

Текущий архив: 2008.04.20;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.021 c
2-1206481954
Adios
2008-03-26 00:52
2008.04.20
можноли получить хэндлы всех программ свёрнутых в трей?


2-1206362346
redlinelab
2008-03-24 15:39
2008.04.20
Добавление полей через TADOTable в базу данных Access


3-1196142177
Ganda
2007-11-27 08:42
2008.04.20
SQL- запрос


15-1204619181
@!!ex
2008-03-04 11:26
2008.04.20
Windows XP 32 + AMD 64 глюк


2-1206612838
altatr
2008-03-27 13:13
2008.04.20
Как скопировать целиком строку в таблице.