Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Время включения ПК [D6, WinXP]


VAmpiro$ ©   (2004-06-24 15:42:00) 

Как узнать когда был включен компютер, или когда зашол юзер,
я знаю что Win-XP гдето ето все записивает.. но где???


MIGUR   (2004-06-25 00:54:00) [1]

Держи код который показывает сколько времени запущена виндаю

var
 ndays: double;
 ticks: LongInt;
 btime: TDateTime;
begin
 {Функция GetTickCount получает количество миллисекунд,
 прошедших с момента старта Windows}
 ticks := GetTickCount;

 {Чтобы получить дни, необходимо разделить на количество
 миллисекунд в дне, 24*60*60*1000=86400000}
 ndays := ticks/86400000;

 {теперь вычитаем из текущей даты полученное количество
 дней работы Windows}
 bTime := now-ndays;

 {показываем диалоговое окошко с сообщением}
 startwin.Caption:=(
 FormatDateTime(' h "hours," n "minutes," s "seconds"',ndays));

end;


VMcL   (2004-06-24 15:57:00) [2]

>когда был включен компютер

RDTSC


Reindeer Moss Eater   (2004-06-24 15:55:00) [3]

Remarks

The elapsed time is stored as a DWORD value. Therefore, the time will wrap around to zero if Windows is run continuously for 49.7 days.
Windows NT: To obtain the time elapsed since the computer was started, look up the System Up Time counter in the performance data in the registry key HKEY_PERFORMANCE_DATA. The value returned is an 8 byte value.


Reindeer Moss Eater   (2004-06-24 15:54:00) [4]

DWORD GetTickCount(VOID)


begin...end   (2004-06-24 15:52:00) [5]

GetTickCount ?


Reindeer Moss Eater   (2004-06-24 15:52:00) [6]

В журнале событий. где где.


Наверх

Титульная страница Поиск, карта сайта Написать письмо