ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как заставить Timer срабатывать когда идет выполение for? (+)
2 сообщений из 2, страница 1 из 1
Как заставить Timer срабатывать когда идет выполение for? (+)
    #33046561
Вредный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вредный
Гость
Помучался и пришел к выводу, что на время выполения цикла
стоящий на форме Timer отключается - событие Timer не вызывается.
Можно как-нибудь его заставить отрабатывать как обычно?
Поискал по форуму, кое-где пишут про Doevents, но он видимо только
на клаву реагирует :(
...
Рейтинг: 0 / 0
03.05.2005, 16:33:17
| Ответить | Цитировать | Написать  
Как заставить Timer срабатывать когда идет выполение for? (+)
    #33046617
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
В модуле:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Public Declare Function SetTimer Lib "user32" (ByVal hwnd As Long, ByVal nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerFunc As Long) As Long
Public Declare Function KillTimer Lib "user32" (ByVal hwnd As Long, ByVal nIDEvent As Long) As Long

Public hTimer as Long

Public Sub Timer1()
'процедура таймера
End Sub
В форме
Код: plaintext
1.
2.
3.
hTimer = SetTimer( 0 ,  0 ,  50 , AddressOf Timer1)

KillTimer hTimer,  0

И вообще, почитай MSDN по поводу SetTimer, там все доступно описано.
...
Рейтинг: 0 / 0
03.05.2005, 16:51:43
| Ответить | Цитировать | Написать  
2 сообщений из 2, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как заставить Timer срабатывать когда идет выполение for? (+)
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&gotonew=1&tid=2167862]:
 0ms
get settings:
 6ms
get forum list:
 14ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 56ms
get topic data:
 8ms
get first new msg:
 4ms
get forum data:
 2ms
get page messages:
 29ms
get tp. blocked users:
 1ms
others: 218ms
total:  342ms
созд. / загр.: 342ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]