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

Вниз

TThread и таймер внутри него   Найти похожие ветки 

← →
ИМХО ©   (2004-07-29 20:10) [0]

Здравствуйте, назрел такой вопрос.
В программе нужно создать поток, который будет каждые 100 миллисекунд мониторить главную часть программы.

Подозреваю, что нужно сделать что-то вроде:

TMyThread = class(TThread)
Timer1: TTimer;
procedure Execute; override;
procedure Timer1Timer(Sender: TObject);
end;

Или есть другие решения?

---

← →
Palladin ©   (2004-07-29 20:13) [1]

Sleep

---

← →
ИМХО ©   (2004-07-29 20:15) [2]

Куда Sleep вставлять?

---

← →
Palladin ©   (2004-07-29 20:21) [3]

что нибудь на подобие

while not terminated do
try
 монитор
finally
 sleep(100)
end;

---

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

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

Наверх

Память: 0.47 MB
Время: 0.022 c