VPF::запустить параллельно два процесса

baltaero

Дата 26.1.2007, 18:06 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 30.8.2005

Репутация: нет
Всего: нет

ВСем привет! Вопрос такой:
Есть два значения Интервал1 (пауза, сек) и Интервал2. Отсчитывается, например, 5 с (Интервал1) и выполняется некая процедура, параллельно отсчитывается 8 с (Интервал2) и тоже выполняется процедура. Дальше значения интервалов обновляются и все по новой.
Как это можно реализовать, в смысле чтобы у меня одновременно программа отсчитывала два разных интервала после чего выполнялсь процедуры???будто две разных программки,но значения интервалов берут из одной базы. smile

Akina

Дата 26.1.2007, 18:53 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454

ну на форму 2 разных таймера, каждому свою процедуру.
или один таймер и 2 счетчика:

Код


Private Sub Timer1_Timer
Static Counter1 as Integer
Static Counter2 as Integer
Counter1 = (Counter1 + 1) MOD 5
Counter2 = (Counter2 + 1) MOD 8
If Not Counter1 Then Call Proc1
If Not Counter2 Then Call Proc2
End Sub

Хотя по уму, конечно, надо не секунды таймером считать, а дергать системное время.

--------------------

О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB6 \| Следующая тема »