Есть-ли аналог VB-таймеру?

[Шурик]

Допустим я работаю с графикой перемещаю спрайт соответстенно через таймер, но он как-то тупо работает!!! То чуть быстрее, то чуть медленее...
Может есть более точный или скажем менее глючный аналог таймера???

[hCORe]

GetTickCount API:

Код: Выделить всё

Private Declare Function GetTickCount Lib "kernel32.dll" () As Long

[A.A.Z.]

Timer VB:

Код: Выделить всё

T = Timer

[hCORe]

A.A.Z, таймер VB обнуляется в полночь, что негативно сказывается на производительности труда

[Шурик]

Спасиб!!! Попробую!!

[eteP]

VB Timer шлет сообщения.
Если нужен имено таймер, то можно использовать API.

Код: Выделить всё

'Timer function
Public Declare Function SetTimer& Lib "user32" _
                                    ( _
                                      ByVal hWnd As Long, _
                                      ByVal nIDEvent As Long, _
                                      ByVal uElapse As Long, _
                                      ByVal lpTimerFunc As Long _
                                    )
                                   
Public Declare Function KillTimer& Lib "user32" _
                                    ( _
                                      ByVal hWnd As Long, _
                                      ByVal nIDEvent As Long _
                                    )


[A.A.Z.]

A.A.Z, таймер VB обнуляется в полночь, что негативно сказывается на производительности труда