Страница: 1 |
Страница: 1 |
Вопрос: API Timer в ActiveX control....
Добавлено: 04.11.04 22:47
Автор вопроса: Surok
Проблема вот в чем:
Declare Function SetTimer Lib "user32"......
Private TimerID As Long
Private Sub MyTimer(hwnd As Long, msg As Long, idTimer As Long, dwTime As Long)
Static i As Integer
i = i + 1
......
......
End Sub
Public sub timer()
TimerID = SetTimer(0, 0, 10, AddressOf MyTimer)
End sub
Ругается на AddressOf MyTimer ...как получить адрес етой процедуры в ActiveXControl?(В модуле все работает - почему?)
Ответы
Всего ответов: 2
Номер ответа: 1
Автор ответа:
cresta
Вопросов: 117
Ответов: 1538
Профиль | | #1
Добавлено: 04.11.04 23:01
AddressOf применима только к процедурам, расположенным в модуле. По-моему так. Попробуй в свой ActiveX проект добавить модуль и вынести в него ф-цию таймера. И безусловно сделай её Public
Номер ответа: 2
Автор ответа:
sne
Разработчик Offline Client
ICQ: 233286456
Вопросов: 34
Ответов: 5445
Web-сайт:
Профиль | | #2
Добавлено: 04.11.04 23:29
Или можно написать ассемблерную процедуру, и с пом. VarPtr вызывать ее... тоже помогает...