Измерение времени между событиями
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 5
• Страница 1 из 1
- Aq1982
- Начинающий
- Сообщения: 15
- Зарегистрирован: 03.01.2005 (Пн) 9:38
Измерение времени между событиями
Aq1982 » 26.01.2005 (Ср) 7:04
А кто-нибуть может подсказать как мне получить время в милисекудах? Скажем, если необходимо измерить время между двумя событиями.
- Vovik
- Постоялец
-
- Сообщения: 643
- Зарегистрирован: 02.08.2003 (Сб) 15:14
- Откуда: Belarus, Minsk
Vovik » 26.01.2005 (Ср) 8:22
А вот так будет получше: 
Declare Function GetTickCount Lib "kernel32.dll" () As Long
dim t as long
t=GetTickCount()
' код
t=GetTickCount-t ' в миллисекундах
p.s. еще лучше юзать timeGetTime(Declare Function timeGetTime Lib "winmm.dll" () As Long), а само точно - Declare Function QueryPerformanceFrequency Lib "kernel32" (lpFrequency As Long) As Long
Declare Function GetTickCount Lib "kernel32.dll" () As Long
dim t as long
t=GetTickCount()
' код
t=GetTickCount-t ' в миллисекундах
p.s. еще лучше юзать timeGetTime(Declare Function timeGetTime Lib "winmm.dll" () As Long), а само точно - Declare Function QueryPerformanceFrequency Lib "kernel32" (lpFrequency As Long) As Long
Причём аргумент QueryPerfomanceCounter() - адрес int64 (8-байтного целого) кажеца
Сообщений: 5
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 12