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

Вниз

Текущее время   Найти похожие ветки 

 
Влад   (2007-01-05 23:15) [0]

Как узнать текущее время с точностью до миллисекунд?


 
Плохиш ©   (2007-01-05 23:16) [1]

time


 
Влад   (2007-01-05 23:26) [2]

А как его в миллисекунды переделать?


 
try   (2007-01-05 23:30) [3]

*24*60*60*1000


 
Влад   (2007-01-05 23:40) [4]

Спасибо


 
kaZaNoVa ©   (2007-01-05 23:55) [5]

GetTickCount ?


 
trubin ©   (2007-01-06 00:19) [6]

GetLocalTime

Его кстати и использует ф-я Time


 
palva ©   (2007-01-06 01:52) [7]

> Как узнать текущее время с точностью до миллисекунд?

На некоторых процессорах никак. Всего точнее использовать GetTickCount, но это значение не будет меняться с единичным шагом.

{$APPTYPE CONSOLE}

uses
 Windows, SysUtils;
var
 nn, dd, dif: DWORD;
begin
 nn := 0;
 dd := GetTickCount();
 repeat
   inc(nn);
   dif := GetTickCount() - dd;
 until dif > 0;
 WriteLn(nn);  // 246684
 WriteLn(dif); // 16
end.

Ну вот, видно, что меняется с шагом 16, а у меня Pentium-4. На более слабых процессорах шаг будет еще больше.


 
vertal ©   (2007-01-06 02:59) [8]

> palva ©   (06.01.07 01:52) [7]

Что характерно - сейчас проверил - GetSystemTimeAsFileTime работает с тем же дискретом (на моей машине - 10 мс), даром что дискрет формата возвращаемого значения - аж 100 наносекунд.

Хотя я думаю, что производительность процессора тут не при чем, а дело в системном таймере и способе обновления системного времени



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

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

Наверх




Память: 0.48 MB
Время: 0.054 c
2-1167936503
PaZDoP
2007-01-04 21:48
2007.01.21
Delphi7


2-1167234829
Johny
2006-12-27 18:53
2007.01.21
Поиск в ListBox


15-1167337972
Expell
2006-12-28 23:32
2007.01.21
Наверно, баян


2-1167323023
Kostafey
2006-12-28 19:23
2007.01.21
Null в SQL и Delphi


15-1167335892
Palladin
2006-12-28 22:58
2007.01.21
Ну емае... куда девался старый добрый рейв...