Delphi, вызываем окно завершение работы Windows
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