Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: WinAPI и системное программирование > Как программно вызвать отключение дисплея?

Автор: Данкинг 20.3.2009, 23:14

Т.е. вот это:
http://ipicture.ru/
smile

Автор: THandle 20.3.2009, 23:44

Код


ShellExecute(Handle, 'open', 'rundll32.exe','shell32.dll Control_RunDLL powercfg.cpl', Nil, SW_SHOWNORMAL);

Автор: Данкинг 20.3.2009, 23:47

THandle, нет, мне не окошко нужно, а чтобы именно монитор отключился.

Автор: THandle 20.3.2009, 23:54

Данкинг, а как через это вручную то дисплей выключить? Там же вроде только время можно изменять? Можно попробовать погуглить по фразам типа "powercfg.cpl parameters"...

Автор: Данкинг 20.3.2009, 23:58

Цитата(THandle @ 20.3.2009, 23:54

)

Данкинг, а как через это вручную то дисплей выключить?

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

Код


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

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

Автор: Shtorm 21.3.2009, 00:42

Отключить вот так

Код


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

включить

Код


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

Автор: Данкинг 21.3.2009, 00:48

Shtorm, да, так вот работает. smile

Автор: Dmi3ev 22.3.2009, 21:00

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

Автор: Данкинг 22.3.2009, 21:03

Dmi3ev, о, Билдеровская ДРКБ. smile

Спасибо

Автор: Dmi3ev 22.3.2009, 21:26

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

Автор: MetalFan 22.3.2009, 22:17

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

Автор: Dmi3ev 22.3.2009, 23:36

Цитата

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

По-моему довольно полезная ссылка... smile

Выбор за читателем топика: Не нужна, не кликай, нужна кликай... smile