Delphi, вызываем окно завершение работы Windows

Опубиковано: 14.07.2008 г., автор: , просмотров: 27332

Delphi вызываем окно Завершение работы

В данном микроскопическом уроке я покажу вам как программно можно вызвать окно Завершение работы Windows.
Я надеюсь Delphi у вас уже открыт, поэтому кидаем на форму компонент Button с закладки Standart, создаем на нем обработчик событий OnClick.

Полный листинг обработчика событий OnClick:

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

На этом всё!
До связи, DelphiExpert.ru

P.S. Не забываем подписываться на бесплатную мультимедийную рассылку.
Форма для подписки расположена с права и с лева.



Похожие материалы

Последние из рубрики

Константин 12 Dec 2010 в 00:00 #
Ребят, у вас ХРЕНОВАЯ система комментариев.
Хотел показать человеку, как можно выключить сразу
безо всяких диалогов (функция) и что-же у меня получилось:

Ошибка
Ошибка в тексте записи!

никуда не годится...
Канат 06 Nov 2010 в 00:00 #
Спасибо большое ))
Евгений Шепарнёв 02 Oct 2010 в 00:00 #
Крутая вещь!
Алексей 09 Jun 2010 в 00:00 #
здравствуйте! я не очень разбираюсь в Delfi, поэтому пожалуйста подскажите возможно ли эту программку разместить на рабочий стол, и уже от туда например нажав ее выкл. компьютер???
Марат 14 Dec 2009 в 00:00 #
Спасибо Вам, самый лучший саит. Понятно описано, простым языком :-)

ОтменитьДобавить комментарий