![]() |
|
Модераторы: Snowy, bartram, MetalFan, bems, Poseidon, Riply |
![]()
|
|
| Kesh |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Эксперт Сообщений: 2488 Регистрация: 31.7.2002 Где: Германия, Saarbrü cken Репутация: нет Всего: 54 |
Собственно сабж... Программа должна знать когда Windows переходит в режим блокировки, и когда выходит из него... - и соответственно выполнять некоторое действие...
Объясните, пожалуйста, как это сделать... Просто никогда не работал с системными событиями... Очень прошу потратить немного времени и объяснить подробно, ибо соображаю я туго... -------------------- ![]() |
|||
|
||||
| _hunter |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 8564 Регистрация: 24.6.2003 Где: Europe::Ukraine:: Kiev Репутация: 9 Всего: 98 |
-------------------- Tempora mutantur, et nos mutamur in illis... |
|||
|
||||
| Kesh |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Эксперт Сообщений: 2488 Регистрация: 31.7.2002 Где: Германия, Saarbrü cken Репутация: нет Всего: 54 |
_hunter Что-то тяжело мне... Мне не нужно влазить в саму систему... Просто из программы в определенный момент мне нужно узнать заблокирована рабочая станция или нет...
-------------------- ![]() |
|||
|
||||
| _hunter |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 8564 Регистрация: 24.6.2003 Где: Europe::Ukraine:: Kiev Репутация: 9 Всего: 98 |
тогда ( если система ХР ( также должны быть запущены Terminal Services ) ) просто if ( WTSRegisterSessionNotification(hWnd, NOTIFY_FOR_ALL_SESSIONS) ) ( или NOTIFY_FOR_THIS_SESSION )
и ловим WM_WTSSESSION_CHANGE смотрим wParam на предмет WTS_SESSION_LOCK/WTS_SESSION_UNLOCK -------------------- Tempora mutantur, et nos mutamur in illis... |
|||
|
||||
| Kesh |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Эксперт Сообщений: 2488 Регистрация: 31.7.2002 Где: Германия, Saarbrü cken Репутация: нет Всего: 54 |
_hunter Прошу прощения за свою непорходимую глупость, но действительно никогда не занимался работой с системой, поэтому я не знаю, ни как ловить, ни как получать... Можно пример кода?
-------------------- ![]() |
|||
|
||||
| _hunter |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 8564 Регистрация: 24.6.2003 Где: Europe::Ukraine:: Kiev Репутация: 9 Всего: 98 |
самый простой способ:
вешаем на форму TApplicationEvents два тыка мышой по OnMessage в его обработчике пишем
-------------------- Tempora mutantur, et nos mutamur in illis... |
|||
|
||||
| Kesh |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Эксперт Сообщений: 2488 Регистрация: 31.7.2002 Где: Германия, Saarbrü cken Репутация: нет Всего: 54 |
_hunter Спасибо за пример, но он не работает... При событии Lock|Unlock я пытаюсь сменить wallpaper... Но он не меняется... В чем может быть проблема?..
-------------------- ![]() |
|||
|
||||
| _hunter |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 8564 Регистрация: 24.6.2003 Где: Europe::Ukraine:: Kiev Репутация: 9 Всего: 98 |
что именно не работает? как проверял? ( проверка сменой обоев -- не есть верное решение -- создай где-нить файл и пиши в него действия или при открытии/закрытии создавай по файлу )
сообщения вообще приходят? что WTSRegisterSessionNotification() возвращает? -------------------- Tempora mutantur, et nos mutamur in illis... |
|||
|
||||
| Kesh |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Эксперт Сообщений: 2488 Регистрация: 31.7.2002 Где: Германия, Saarbrü cken Репутация: нет Всего: 54 |
_hunter Все, разобрался... Спасибо тебе огромное...
-------------------- ![]() |
|||
|
||||
| _hunter |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 8564 Регистрация: 24.6.2003 Где: Europe::Ukraine:: Kiev Репутация: 9 Всего: 98 |
всегда пожалуйста
-------------------- Tempora mutantur, et nos mutamur in illis... |
|||
|
||||
![]()
|
| Правила форума "Delphi: WinAPI и системное программирование" | |
|
|
Запрещено: 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, bartram, MetalFan, bems, Poseidon, Rrader, Riply. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: WinAPI и системное программирование | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |