Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

точное отслеживание времени


Страницы:   1 2

tickler ©   (2006-04-30 21:24:00) 

Как организовать точное слежение за временем?  Таймер дает заметную задержку уже через несколько секунд. Нужно знать сколько прошло милисекунд с момента запуска программы.


Юрий Зотов   (2006-05-01 02:11:00) [21]

> DevilDevil ©   (01.05.06 01:40) [5]
> функция возвращает время работы приложения в миллисекундах

ЭТА функция возвращает время работы СИСТЕМЫ с момента старта приложения.

Само же приложение за все это время могло ни разу не получить процессорного времени. То есть, все это время оно могло не работать.


DevilDevil   (2006-05-01 01:40:00) [22]

var
  StartTickCount : integer;

// OnCreate
StartTickCount := GetTickCount;
...

// функция возвращает время работы приложения в миллисекундах
function GetWorkTime : integer;
begin
 Result := GetTickCount - StartTickCount;
end;


Anatoly Podgoretsky   (2006-04-30 23:24:00) [23]

Таймер не для отслеживания времени, а для получения интервалов с той или другой погрешностью.
Для точного отслеживания времени используй GetPerformanceCounter или в крайнем случае GetTickCount


tickler   (2006-04-30 21:44:00) [24]

спасибо =)


Юрий Зотов   (2006-04-30 21:42:00) [25]

Cм. ф-ции Date, Time, GetTickCount. При запуске вызываем и запоминаем результат. Потом снова вызываем и вычисляем искомое.


Zeqfreed   (2006-04-30 21:39:00) [26]

Now()


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо