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

Проблема с процессами   Найти похожие ветки 

← →
MMA   (2003-11-06 15:50) [0]

Добрый день.

Ситуация следующая:

Есть главное приложение, которое при запуске должно создавать два
процесса.
Первый процесс проигрывает, в цикле, несколько avi"шек и завершает цикл, только по сигналу от второго процесса.
Второй процесс в цикле опрашивает com-порт и завершает цикл, после принятия определенных данных из com-порта, выдавая при это
сигнал первому процессу.

Проблема в том, что мне не запустить оба процесса одновремено! :-( Один из них блокирует запуск другого. Или может я чего путаю.

Вот кусок кода, где я создаю процессы:

procedure TForm1.FormCreate(Sender: TObject);
begin
...
InitVideo;
TComThread.Create(False);
TAviThread.Create(False);
end;

Буду благодарен за любой дельный совет.

З.Ы. И еще, любой из этих процессов сильно грузят систему. Можно как-нибудь увеличить производительнось?


← →
Palladin ©   (2003-11-06 15:58) [1]

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


← →
MMA   (2003-11-06 16:07) [2]

Я так понял, что класс TThread, реализует именно процесс.
Подскажите, как создать именно отдельный процесс.


← →
Palladin ©   (2003-11-06 16:09) [3]

Что ты хочешь? Для твоей задачи хватит и потоков.


← →
Кот Бегемот ©   (2003-11-06 16:55) [4]

>Подскажите, как создать именно отдельный процесс.

Может CreateProcess() ??? - не пробовал, а...


← →
MMA   (2003-11-06 16:57) [5]

Мне нужно, чтобы после запуска приложения крутились авишки (в цикле ~5 штук) и в тоже время постоянно опрашивался com порт. После того, как com порт получает определенные данные, проигрывание авишек прекращется и дается возможность пользователю совершить некоторые действия. После совершения пользователем некоторых действий, процесс повторяется.

Как мне это можно реализовать?


← →
Кот Бегемот ©   (2003-11-06 17:04) [6]

Тю... так бы и сказал !

Засунь обработку com-порта в Thread
а в TAnimate выставь property Timers как тебе нужно
и на TAnimate.OnStop меняй авишку.



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

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



Память: 0.46 MB
Время: 0.016 c
1-56565
maxi
2003-11-06 13:12
2003.11.17
Как заставить TImageList не резать картинки на части ?


11-56553
Ash
2003-02-25 14:53
2003.11.17
TStrList


14-56861
Semas
2003-10-27 11:48
2003.11.17
basic интерпритация


11-56544
Gandalf
2003-02-01 11:54
2003.11.17
KOLIndy?


14-56907
Думкин
2003-10-25 05:58
2003.11.17
С днем рождения! 25 октября.




   Наверх