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

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

Полный листинг обработчика событий OnClick:
procedure TForm1.Button1Click(Sender: TObject);  
begin  
SendMessage (FindWindow ('Progman', 'Program Manager'), WM_CLOSE, 0, 0);  
end;   

На этом всё!
Теги:
завершение работы Windows
Добавлено: 29 Июля 2018 22:23:37 Добавил: Андрей Ковальчук Нравится 0
Добавить
Комментарии:
Нету комментариев для вывода...