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

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

Как потушить монитор?

Костик ©   (2008-07-16 12:42:00) 

Скажите пожалуйста как можно выключить монитор, естественно программным путем из приложения)))

---

Костик   (2008-07-16 13:39:00) [1]

> Anatoly Podgoretsky ©   (16.07.08 12:43) [1]
> Еще горит, тогда звони 01.

Специально ж написал:

> естественно программным путем из приложения)))


> matriza   (16.07.08 12:44) [3]
> const
>  MONITOR_ON = -1;
>  MONITOR_OFF = 2;
> . . .
>
>  SendMessage(frmMain.Handle, WM_SYSCOMMAND, SC_MONITORPOWER,
>  MONITOR_OFF);
>
>  SendMessage(frmMain.Handle, WM_SYSCOMMAND, SC_MONITORPOWER,
>  MONITOR_ON);

Благодарю

---

DVM   (2008-07-16 12:46:00) [2]

> Как потушить монитор?

Выключить заставку с нарисованным огнём, вероятно. :)

---

oldman   (2008-07-16 12:44:00) [3]

if getmonitorstatus() then monitorstatus := false ;

---

matriza   (2008-07-16 12:44:00) [4]

const
 MONITOR_ON = -1;
 MONITOR_OFF = 2;
. . .

 SendMessage(frmMain.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, MONITOR_OFF);

 SendMessage(frmMain.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, MONITOR_ON);

---

Anatoly Podgoretsky   (2008-07-16 12:43:00) [5]

Еще горит, тогда звони 01.

---

Наверх