|
|
|
Как задействовать timer в консольном приложении?
|
|||
|---|---|---|---|
|
#18+
Дописываю чужое консольное приложение (точнее терминальное, работает на терминалах, через WaveLink), пишу на VB6 SP6 Ранее приложение работало в одном потоке, линейно. Но теперь возникла необходимость опрашивать параллельно внешний контроллер и дальнейший ход программы уже зависит от этого опроса. Грубо говоря - программа работает, если рубильник включили и останавливается с просьбой включить, если его выключили. Для этого в цикле While идет постоянный опрос его состояния. Однако на время этого опроса нет никакой возможности выйти из задачи, кроме как включить рубильник, а нужно, чтобы пользователь мог нажать "отмену". Но WaveLink не позволяет работать с клавишами, кроме как ожидая ввода, при этом цикл останавливается и получается, что пользователь должно постоянно нажимать клавиши на терминале, чтобы программа "жила". Для решения этой проблемы, я решил задействовать таймер, но никак не могу понять как его подключить и использовать в VB. Помогите кусочком кода, пожалуйста... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.03.2009, 17:08 |
|
||
|
Как задействовать timer в консольном приложении?
|
|||
|---|---|---|---|
|
#18+
Не знаю... помогу-ли я Вам, но таки вот: A Thread to Visual Basic: Multi-Threading In VB5 and VB6 и если "заюзать" .Net Using Background Threads with Visual Basic 6 Удачи! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.03.2009, 23:02 |
|
||
|
Как задействовать timer в консольном приложении?
|
|||
|---|---|---|---|
|
#18+
Да ишо по Thread на этом форуме поищите... это один из результатов ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.03.2009, 23:37 |
|
||
|
|

start [/forum/topic.php?fid=60&gotonew=1&tid=2161280]: |
0ms |
get settings: |
9ms |
get forum list: |
11ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
42ms |
get topic data: |
7ms |
get first new msg: |
4ms |
get forum data: |
2ms |
get page messages: |
32ms |
get tp. blocked users: |
2ms |
| others: | 208ms |
| total: | 321ms |

| 0 / 0 |
