Меню сайта
Мини-чат
Чтобы добавить сообщение, необходимо авторизоваться.
Главная » Статьи » Delphi » Примеры на Delphi7

Программно открыть окно выключение компа

Код который надо вписать в буттон:

procedure TForm1.Button1Click(Sender: TObject);
begin
SendMessage (FindWindow ('Progman', 'Program Manager'), WM_CLOSE, 0, 0);
end;


Жмем на кнопочку, и наслаждаемся результатом)))

Категория: Примеры на Delphi7 | Добавил: DelphiAiX (19.03.2011)
Просмотров: 738 | Рейтинг: 0.0/0
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]