Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.27;
Скачать: CL | DM;

Вниз

Временные интервалы   Найти похожие ветки 

 
Radik   (2003-11-17 13:58) [0]

Здравствуйте уважаемые эксперты !

Помогите решить следующую проблему
есть консольное приложение, надо мерить
временные интервалы как больше секунды,
так и меньше секунды. Использую тип
TDateTime. Больше секунды мерить получается,
а вот меньше никак.
Дельфи 3.
Буду рад куску программы.
Заранее спасибо.
Радик.
Приложение.
Вот кусок моей программы:
// временная задержка заданной длины
f:=False;
OldT:=Time;
repeat
NewT:=Time;
if (NewT-OldT) >= 0.000015 //1.5 second
then Break;
until f = True;


 
PVitaliy ©   (2003-11-17 14:51) [1]

Используй функцию GetTickCount (возвращает время работы винды в милисекундах)
f:=False;
OldT:=GetTickCount;
repeat
NewT:=GetTickCount;
if (NewT-OldT) >= 1500 //1.5 second
then Break;
until f = True;


 
Fay   (2003-11-17 15:04) [2]

Это не то же самое?
OldT:=GetTickCount;
repeat
NewT:=GetTickCount;
until (NewT-OldT) >= 1500;


 
Radionov Alexey ©   (2003-11-17 15:10) [3]

Насколько я понял, цель - реализовать паузу?
Тогда выгоднее sleep, единственно, что время реального "сна" будет очень приблизительным



Страницы: 1 вся ветка

Текущий архив: 2003.11.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.017 c
3-89734
jonni
2003-11-09 04:11
2003.11.27
получить зуначения


1-89961
TUser
2003-11-17 17:33
2003.11.27
Canvas


4-90170
NailMan
2003-10-01 12:19
2003.11.27
Типа передача данных первой копии программы от второй


1-89894
Кен
2003-11-12 07:04
2003.11.27
Почему массивы Boolean сохраняются на диск как одно


4-90171
Lord Warlock
2003-09-18 09:29
2003.11.27
WM_QUERYENDSESSION