Доброго времени суток!!!
Народ, может кто сталкивался с подобным subj.? У меня получилась такая ситуация... Есть ТВ-тюнер AVERMediaTV Studio 203 и соответственно пульт к нему... и есть код (когда-то был откудо-то взят):
Private Declare Function AVER_HWInit Lib "AVerTV2K" () As Long Private Declare Function AVER_GetRemoteData Lib "AVerTV2K" () As Long
Private Sub Form_Load() Dim a As Long a = AVER_HWInit() Timer1.Interval = 50 End Sub
Private Sub Timer1_Timer() Dim Button As Integer Button = AVER_GetRemoteData() Debug.Print Button End Sub
Всё работает на УРА!!!... Вот только одна оказия, ещё до начала нажатия кнопки на пульте, функция выбирает код предыдуще нажатой кнопки...
Т.е. при работе с приложением на входе оказывается код... И ни куда не пропадает до нажатия новой кнопки... Как можно обнулить этот буфер? Т.е. чтобы после отжатия кнопки пульта в буфере 0 был или другой код отличный от кодов пульта... Может кто сталкивался с подобным, знает?
Есть полный список функций вышеозначеной библиотеки... Вот только какие параметры передаются функции? Всё испробовал, и код обнуления писал, и использовал функцию AVER_SetRemoteData но хоть буфер и обнулялся но выдавалась ошибка №49 (кажется что-то связанное с не правильным вызовом DLL), только потом приходилось комп перегружать т.к. система переставала реагировать на пульт... Народ, помогите разобраться... Все возможные предложения на мыло (Lazy_caT@rambler.ru)... Если можно с примерами или объяснениями... Заранее спасибо...
Ответить
|