![]() |
|
Модераторы: Poseidon, Snowy, bems, MetalFan |
![]()
|
|
| Dph |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 15 Регистрация: 18.3.2004 Репутация: нет Всего: нет |
Чо за API ---> QueryPerformanceFrequency,
---> QueryPerformanceCounter ???????? |
|||
|
||||
| cot |
|
|||
![]() Шустрый ![]() Профиль Группа: Участник Сообщений: 69 Регистрация: 4.6.2003 Репутация: нет Всего: нет |
Осуществляет выборку текущего значения высокоточного счетчика производительности, если он есть.
Примет на С другого нету: LRESULT CALLBACK WndProc( HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam ) { switch( uMsg ) { case WM_COMMAND : switch( LOWORD( wParam ) ) { case IDM_TEST: { // Получить данные из счетчика производительности. // Отобразить эти данные в окне сообщения. //.............................. TCHAR szBuffer[128]; LARGE_INTEGER liPerfFreq = {0, 0}; LARGE_INTEGER liPerfCount = {0, 0}; if ( QueryPerformanceCounter( &liPerfCount ) ) { TCHAR szCounter[64]; double dCounter = (double) liPerfCount.LowPart + (double) liPerfCount.HighPart * (double) 0xFFFFFFFFFFFFFFFF; // Получить данные частоты обновления счетчика // производительности. //................... QueryPerformanceFrequency( &liPerfFreq ); wsprintf( szBuffer, "Count: %s, Resolution: %lu", gcvt( dCounter, 40, szCounter ), liPerfFreq.LowPart ); } else lstrcpy( szBuffer, "No high-resolution performance counter." ); MessageBox( hWnd, szBuffer, "Performance Counter Report", MB_OK | MB_ICONINFORMATION ); } break; . . . |
|||
|
||||
| p0s0l |
|
|||
![]() Г-н Посол ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 3668 Регистрация: 13.7.2003 Где: 58°38' с.ш. 4 9°41' в.д. Репутация: 58 Всего: 112 |
QueryPerformanceFrequency выдает частоту таймера
QueryPerformanceCounter выдает текущее значение таймера (единица измерения зависит от частоты таймера) -------------------- С уважением, г-н Посол. |
|||
|
||||
![]()
|
| Правила форума "Delphi: Общие вопросы" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |