Форум: "Основная";
Текущий архив: 2003.11.27;
Скачать: [xml.tar.bz2];
Вниз
Временные интервалы Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c
