Главная страница
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.022 c
14-90069
sniknik
2003-11-05 14:54
2003.11.27
Прикол, возможно старый но я его вижу впервые...


1-89964
Saturn
2003-11-17 11:32
2003.11.27
Мат. Формулы


7-90152
Dark Elf
2003-09-18 11:07
2003.11.27
Реестр и пароль


1-89856
Артем
2003-11-16 14:08
2003.11.27
Несовместимость типов


14-90068
Style
2003-11-04 12:28
2003.11.27
Усе! Я открыл сайт!! Ура!