Вниз
Скачать: CL | DM;

Как получить текущее время с точностью до миллисекунд?   Найти похожие ветки 

 
leonidus   (2004-03-27 21:24) [0]

Мастера подскажите подалуйста, при работе программы, в определенные промежутки времени мне надо знать точно текущее время с точностью до миллисекунд, я пробовал использовать функцию Time, но она выдает с точностью до секунды, может есть например API-функция? Заранее спасибо.


 
TButton ©   (2004-03-27 22:13) [1]

GetTickCount


 
Piter ©   (2004-03-27 22:21) [2]

Ну мне что-то не верится, что тебе нужно знать именно время с точностью до миллисекунд. А вот если тебе нужно засекать промежутки времени, то есть функция GetTickCount, возвращающая количество миллисекунд прошедших с момента запуска windows


 
leonidus   (2004-03-27 23:35) [3]

Всем большое спасибо, GetTickCount - как раз то что надо.


 
sniknik ©   (2004-03-27 23:56) [4]

> я пробовал использовать функцию Time, но она выдает с точностью до секунды
?
DateTimeToString(St, "n:ss:zzz", Time());
Label1.Caption:= St;


 
Piter ©   (2004-03-28 00:55) [5]

sniknik (27.03.04 23:56) [4]

хм, а разве в TDateTime есть место для хранения миллисекунд?


 
Игорь Шевченко ©   (2004-03-28 01:21) [6]

Piter ©   (28.03.04 00:55)

procedure DecodeTime(const DateTime: TDateTime; var Hour, Min, Sec, MSec: Word);
var
 MinCount, MSecCount: Word;
begin
 DivMod(DateTimeToTimeStamp(DateTime).Time, 60000, MinCount, MSecCount);
 DivMod(MinCount, 60, Hour, Min);
 DivMod(MSecCount, 1000, Sec, MSec);
end;


> а разве в TDateTime есть место для хранения миллисекунд?


Очевидно, есть


 
Германн ©   (2004-03-28 03:56) [7]

2 Piter ©   (28.03.04 00:55) [5]
> хм, а разве в TDateTime есть место для хранения миллисекунд?

Ну, поскольку TDateTime есть действительное число, то в нем есть место. Причем для хранения не только миллисекунд. Вопрос только в "точности" и "разрядности".


 
Anatoly Podgoretsky ©   (2004-03-28 12:45) [8]

Piter ©   (28.03.04 00:55) [5]
Есть и для наносекунд, точность пятнадцать знаков, под день уходит только пять, под дробную остается десять!!!
Другой вопрос а они там есть, также как и в GetTickCount, ну конечно есть но это как жизнь на Марсе.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.021 c
1-1080829790
Larra
2004-04-01 18:29
2004.04.18
Pascal - tpu


14-1080266587
vidiv
2004-03-26 05:03
2004.04.18
Использование *.dll (*.so) в php


6-1075888689
arhis
2004-02-04 12:58
2004.04.18
Вопрос по TCP/IP а может я вообще ничего не понимаю.


3-1079721909
Петруха
2004-03-19 21:45
2004.04.18
Можно ли на Delphi под Windows CE делать


14-1080331899
xman
2004-03-26 23:11
2004.04.18
и еще по ASM




   Наверх