Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Система";
Текущий архив: 2004.05.23;
Скачать: [xml.tar.bz2];

Вниз

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

 
Andrew999 ©   (2004-04-09 20:51) [0]

Как узнать сколько времени включен компьютер


 
Юрий Зотов ©   (2004-04-09 21:02) [1]

GetTickCount.


 
Verg ©   (2004-04-09 21:13) [2]


> Юрий Зотов ©   (09.04.04 21:02) [1]


По модулю ~50 дней?


 
Юрий Зотов ©   (2004-04-09 21:22) [3]

> Verg ©   (09.04.04 21:13) [2]

Угу. А если надо больше, то несложно и сообразить внешний счетчик.


 
Gero ©   (2004-04-09 22:52) [4]

При загрузке компа запоминаете время и дату.
Потом сравниваете текущее время с тем, что было.


 
Юрий Зотов ©   (2004-04-10 08:01) [5]

> Gero ©   (09.04.04 22:52) [4]

То есть, программа обязана стартовать вместе с компом?


 
Gero ©   (2004-04-10 08:09) [6]


> Юрий Зотов ©   (10.04.04 08:01)

Стартовать может маленькая программка, которая всего то и делает, что запишет показатели времени и даты в файл.
А основная программа будет из него считавать при необходимости.


 
Юрий Зотов ©   (2004-04-10 08:37) [7]

> Gero ©   (10.04.04 08:09) [6]

Теперь понятно. Спасибо.


 
TButton ©   (2004-04-10 08:50) [8]

тогда программу нужно воткнуть в авторан, чтоб она грузилась ваще самой первой.


 
Anatoly Podgoretsky ©   (2004-04-10 09:19) [9]

Тоже касается и GetTickCount программа должна быть в памяти иначе переход не поймать. Но не обязательно в автозагрузку, это может быть сервис.
Очень удобно для мониторинга использования компьютера, мне пришлось делать такую систему, поскольку операторы ходили на другие компьютеры в ночное время и играли, лазили по порно сайтам, хотя это было запрещено. Также видны все перезагрузки.


 
Владислав ©   (2004-04-10 10:21) [10]

Интересно... может, если конечно процессор позволяет, воспользоваться RDTS (на вскидку не помню мнемонику, но вроде так) или QueryPerformanceCounter. Там будет больше, чем "~50 дней".


 
Anatoly Podgoretsky ©   (2004-04-10 10:49) [11]

2^64*F в общем конца не увидать


 
Mim1   (2004-04-10 12:09) [12]

Anatoly Podgoretsky ©   (10.04.04 09:19) [9]

Заставили негоров работать? :)


 
Verg ©   (2004-04-10 12:20) [13]

А можно ли получить последнюю запись в EventLog-ге, источником которого является сам EventLog, а код 6009?


 
Владислав ©   (2004-04-10 15:44) [14]

> Anatoly Podgoretsky ©   (10.04.04 10:49) [11]

Ага, только автору, видать, это уже не надо :)


 
Songoku ©   (2004-04-10 16:26) [15]

Я вот так делал!!!

function GetWindowsWorkedTime:String; // Max 49 days 17 hours 20 min 17 sec
var h,m,s:DWORD;
begin
h:=GetTickCount div $36EE80;
m:=(GetTickCount div $EA60)-(h*$3C);
s:=(GetTickCount div $3E8)-((m*$3C)+(h*$E10));
Result:=IntToStr(h);
if m<10 then Result:=Result+":0"+IntToStr(m) else Result:=Result+":"+IntToStr(m);
if s<10 then Result:=Result+":0"+IntToStr(s) else Result:=Result+":"+IntToStr(s);
end;


 
Polevi ©   (2004-04-10 21:50) [16]

кошмар


 
Gero ©   (2004-04-10 22:22) [17]


> кошмар

Не то слово.


 
Kerk ©   (2004-04-11 11:53) [18]

rdtsc :)



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

Форум: "Система";
Текущий архив: 2004.05.23;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.48 MB
Время: 0.057 c
1-1083847776
pavel_guzhanov
2004-05-06 16:49
2004.05.23
Можно ли обратиться к компоненту на форме по его номеру?


14-1083334776
avk02
2004-04-30 18:19
2004.05.23
В каком порядке сортируются по имени файлы в Windows?


14-1083249941
Piter
2004-04-29 18:45
2004.05.23
Как правильно читается слово "Inherited" ?


14-1083259839
Soft
2004-04-29 21:30
2004.05.23
Наконец, кто-то в костюме цыплёнка сделает то, что вы хотите


14-1083385642
RealRascal
2004-05-01 08:27
2004.05.23
icq





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский