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

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

Как контролировать время ? [D6, WinXP]


MorfeyCool ©   (2003-02-20 13:30:00) 

Проблема в следующем, пишу прогу. Программа контролирует работу пользователя за компьютером, отведя ему только то время которое ему необходимо (не путайте, это программа не для компьютерного зала, а для моих детей). Пользователю ничего не мешает изменить время , Как обмануть такого пользователя ?
Заранее спасибо.


Anatoly Podgoretsky   (2003-02-20 14:07:00) [1]

сказать SetTimer (MyForm.Handle, 1, сколько нужно и не опаршивать, nil);

Я только не понял речь про интервал или длительность


Игорь Шевченко   (2003-02-20 13:59:00) [2]

Но ремень или иное словесное внушение, IMHO, надежнее.


Игорь Шевченко   (2003-02-20 13:57:00) [3]

MorfeyCool (20.02.03 13:46)

При старте программы спросить GetTickCount, запомнить значение.
сказать SetTimer (MyForm.Handle, 1, 1000, nil);

В окне обрабатывать сообщение WM_TIMER, где спрашивать GetTickCount, сравнивать разницу между текущим значением и значением, запомненным при старте. Разница в миллисекундах. Если разница больше заданной, то вызывать ExitWindowsEx



MorfeyCool   (2003-02-20 13:46:00) [4]

Если можно то чуть проще можно, Игорь. Без драйвера "ремня" как хоть приблизительно это должно выглядеть ?


Игорь Шевченко   (2003-02-20 13:38:00) [5]

1) Запретить установку времени в Policies.
2) Для детей очень хорошо подходит драйвер ремень.sys (ремень.vxd для Win9x)
3) Запустить при старте сеанса програмку, которая считает тики с момента запуска (по WM_TIMER) и по достижении нужного количества тиков завершает сеанс.
4) CreateWaitableTimer


Anatoly Podgoretsky   (2003-02-20 13:37:00) [6]

Твоя программа должна запускаться первой, лкчше это оформить сервисом


Наверх

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