Модераторы: Snowy, bartram, MetalFan, bems, Poseidon, Riply
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как программно вызвать отключение дисплея? 
V
    Опции темы
Данкинг
Дата 20.3.2009, 23:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: нет
Всего: 130
Т.е. вот это:
user posted image
 smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
THandle
Дата 20.3.2009, 23:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Хранитель Клуба
Group Icon
Награды: 1



Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 7
Всего: 372
Код

ShellExecute(Handle, 'open', 'rundll32.exe','shell32.dll Control_RunDLL powercfg.cpl', Nil, SW_SHOWNORMAL);
PM   Вверх
Данкинг
Дата 20.3.2009, 23:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: нет
Всего: 130
THandle, нет, мне не окошко нужно, а чтобы именно монитор отключился.


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
THandle
Дата 20.3.2009, 23:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Хранитель Клуба
Group Icon
Награды: 1



Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 7
Всего: 372
Данкинг, а как через это вручную то дисплей выключить? Там же вроде только время можно изменять? Можно попробовать погуглить по фразам типа "powercfg.cpl parameters"...
PM   Вверх
Данкинг
Дата 20.3.2009, 23:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: нет
Всего: 130
Цитата(THandle @  20.3.2009,  23:54 Найти цитируемый пост)
Данкинг, а как через это вручную то дисплей выключить?

В Delphi World есть пример, но у меня он не работает (вообще ничего не происходит):
Код

SendMessage(Application.Handle, wm_SysCommand, SC_MonitorPower, 0);

Я думал, может быть, ещё есть какие-то способы.



--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Shtorm
Дата 21.3.2009, 00:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 46
Регистрация: 23.2.2009
Где: Таганрог

Репутация: 1
Всего: 1
Отключить вот так 
Код

SendMessage(Application.Handle,WM_SYSCOMMAND,SC_MONITORPOWER,1);

включить
Код

SendMessage(Application.Handle,WM_SYSCOMMAND,SC_MONITORPOWER,0);
PM MAIL ICQ   Вверх
Данкинг
Дата 21.3.2009, 00:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: нет
Всего: 130
Shtorm, да, так вот работает. smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Dmi3ev
Дата 22.3.2009, 21:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1698
Регистрация: 28.11.2007

Репутация: нет
Всего: 41
вот тебе ссылка
http://licrym.org/samouch/7/03/091.html
а вот тебе ссылка на подобные вещи
-выключить комп
-дисководом играться
и многое другое
тут для Бормана, но я думаю сможешь применить, тем более АПИ и в африке АПИ, а стрелочки на точечки поменять...


--------------------
PM MAIL   Вверх
Данкинг
Дата 22.3.2009, 21:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: нет
Всего: 130
Dmi3ev, о, Билдеровская ДРКБ. smile Спасибо smile  smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Dmi3ev
Дата 22.3.2009, 21:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1698
Регистрация: 28.11.2007

Репутация: нет
Всего: 41
http://licrym.org/samouch/7/03/index.html
вот кстати ссылка
а то я написал, а ссылку не дал  smile 


--------------------
PM MAIL   Вверх
MetalFan
Дата 22.3.2009, 22:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 16
Всего: 128
Dmi3ev, зачем давать ссылки на сторонние ресурсы, если и здесь есть информация. да и ответ уже дали...


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
Dmi3ev
Дата 22.3.2009, 23:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1698
Регистрация: 28.11.2007

Репутация: нет
Всего: 41
 smile 
Цитата

Dmi3ev, зачем давать ссылки на сторонние ресурсы, если и здесь есть информация. да и ответ уже дали... 

По-моему довольно полезная ссылка...  smile 
Выбор за читателем топика: Не нужна, не кликай, нужна кликай...  smile 


--------------------
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: WinAPI и системное программирование"
Snowybartram
MetalFanbems
PoseidonRrader
Riply

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • 99% ответов по WinAPI можно найти в MSDN Library, оставшиеся 1% здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, bartram, MetalFan, bems, Poseidon, Rrader, Riply.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: WinAPI и системное программирование | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0810 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.