|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
30.01.2008, 10:54 | #1 |
Пользователь
Регистрация: 30.01.2008
Сообщений: 25
|
Время работы WINDOWS
Помогите чайнику!
Нужно в простенькую программу, которая показывает время работы WINDOWS добавить функцию записи в файл времени каждого включения и выключения компа. И еще вопрос: какое максимальное время может показать программа? Программа на Delphi Заранее благодарю. Последний раз редактировалось В_И_К_Т_О_Р; 30.01.2008 в 11:04. |
30.01.2008, 11:13 | #2 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Ну дык что не получается?
Цитата:
I'm learning to live...
|
|
30.01.2008, 11:46 | #3 |
Пользователь
Регистрация: 30.01.2008
Сообщений: 25
|
Мне надо знать максимальное время не в часах и минутах за одни сутки, а в днях месяцах и годах. Я просто где то читал про такого рода программу и у нее максимальное время отсчета - 49 дней, а затем счетчик обнуляется.
|
30.01.2008, 12:00 | #4 |
Новичок
Джуниор
Регистрация: 18.01.2008
Сообщений: 1,720
|
Функция GetTickCount() возвращает количество миллисекунд, прошедших с момента старта системы. Возвращается значение DWORD размером 32 бита - отсюдa видим, что максимум - немного более четырех миллионов секунд или примерно полтора месяца.
|
30.01.2008, 12:18 | #5 |
Реанимируюсь...
Участник клуба
Регистрация: 19.07.2007
Сообщений: 1,445
|
В cmd забиваешь команду systeminfo.
Получаешь кучу разной инфы о системе. Чтобы сохранить эту информацию в файл, запускаешь systeminfo >c:\info.txt. Нужные данные находятся (Дата установки, Время работы системы) на 10 и 11 строчках текста. Дальше открываешь файл и выбираешь из него то, что тебе нужно.
Пишите код так, как будто сопровождать его будет склонный к насилию психопат, который знает, где вы живёте.
Правила форума => Правила раздела => Для общего развития => Помощь студентам => Перед тем, как создавать тему, скачайте себе... P.S.: форум не песочница (с)
название статьи на сайте MS: "Отмена принудительного отключения автоматического запуска в реестре Windows" |
30.01.2008, 12:18 | #6 |
Форумчанин
Регистрация: 08.10.2007
Сообщений: 125
|
какое время работает Windows:
procedure TForm1.Button3Click(Sender: TObject); var ndays: double; ticks: LongInt; btime: TDateTime; begin {Функция GetTickCount получает количество миллисекунд, прошедших с момента старта Windows} ticks := GetTickCount; {Чтобы получить дни, необходимо разделить на количество миллисекунд в дне, 24*60*60*1000=86400000} ndays := ticks/86400000; {теперь вычитаем из текущей даты полученное количество дней работы Windows} bTime := now-ndays; {показываем диалоговое окошко с сообщением} ShowMessage( FormatDateTime('"Windows started on" dddd, mmmm d, yyyy, ' + '"at" hh:nn:ss AM/PM', bTime) + #10#13 + 'Its been up for ' + IntToStr(Trunc(nDays)) + ' days,' + FormatDateTime(' h "hours," n "minutes," s "seconds"',ndays)); end; |
30.01.2008, 12:26 | #7 |
Новичок
Джуниор
Регистрация: 18.01.2008
Сообщений: 1,720
|
Нашел у себя махонький исходничек:
Код:
|
30.01.2008, 12:32 | #8 |
Пользователь
Регистрация: 30.01.2008
Сообщений: 25
|
Вопрос в том, что мне надо чтобы программа фиксировала в файле каждое включение и выключение компьютере и считала общее время работы за большой период (год и более)
|
30.01.2008, 12:42 | #9 | |
Новичок
Джуниор
Регистрация: 18.01.2008
Сообщений: 1,720
|
Цитата:
Код:
Код:
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Сохранить внутрь себя во время работы | Олвин | Помощь студентам | 6 | 29.08.2008 20:13 |
Создание обьектов во время работы программы | Rusl92 | Общие вопросы Delphi | 4 | 11.08.2008 17:03 |
События, выполняемые во время работы созданной компоненты | Denager | Общие вопросы Delphi | 13 | 22.04.2008 16:48 |
Создание компонентов во время работы программы | Rusl92 | Компоненты Delphi | 23 | 05.04.2008 08:38 |
Время работы сортировок | Боня | Помощь студентам | 1 | 10.02.2007 17:53 |