FreeBasic
Главная
Вход
Регистрация
Пятница, 19.04.2024, 19:13Приветствую Вас Гость | RSS
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Форум » Freebasic » Исходники » Перезагрузка и выключение Windows (Перезагрузка и выключение Windows)
Перезагрузка и выключение Windows
haavДата: Воскресенье, 07.10.2012, 07:52 | Сообщение # 1
Генералиссимус
Группа: Администраторы
Сообщений: 1361
Репутация: 49
Статус: Offline
Перезагрузка Windows

Code

#Include "windows.bi"
#Include "win/shellapi.bi"

ShellExecute(0, 0,"shutdown"," -r -t 00","", SW_SHOWNORMAL)


Выключение Windows

Code

#Include "windows.bi"
#Include "win/shellapi.bi"

ShellExecute(0, 0,"shutdown"," -s -t 00","", SW_SHOWNORMAL)


Вы сохраняете власть над людьми покуда оставляете им что-то…Отберите у человека все, и этот человек уже будет неподвластен вам…
 
ShadExДата: Понедельник, 08.10.2012, 00:28 | Сообщение # 2
Лейтенант
Группа: Проверенные
Сообщений: 51
Репутация: 1
Статус: Offline
Также сюда засуну хибернейт и саспенд:

Code

#include "windows.bi"
#include "win/powrprof.bi"

var result = SetSuspendState( _ ' возвращаемое значение <> 0 при успешном завершении функции, иначе - 0
    FALSE, _ ' [Hibernate], если TRUE - режим "hibernate", если FALSE - режим "suspended"
    TRUE, _  ' [ForceCritical], судя по документации в MSDN этот параметр не учитывается, хотя на winXP и win2003 если установлен FALSE, то система отсылает окнам сообщение PBT_APMQUERYSUSPEND
    FALSE _ ' [DisableWakeEvent], если TRUE - отключает события пробуждения, если FALSE - включает
)

Print result
Sleep


Сообщение отредактировал ShadEx - Понедельник, 08.10.2012, 00:32
 
Форум » Freebasic » Исходники » Перезагрузка и выключение Windows (Перезагрузка и выключение Windows)
  • Страница 1 из 1
  • 1
Поиск: