|
Вызвать диалог завершения работы с Windows
|
По окончании инсталляции программ Microsoft очень часто можно
прочесть -
"Мы долго и трудно работали. Наслаждайтесь!"
После работы с некоторыми программами Microsoft хочется
изменить эту надпись таким образом:
"Мы долго и трудно работали. Теперь... ваша очередь!"
|
procedure TForm1.Button1Click(Sender: TObject);
begin
SendMessage(FindWindow('Progman', 'Program Manager'), WM_CLOSE, 0, 0);
end;
|
|
