Помощь - Поиск - Пользователи - Календарь
Полная версия: Перехват нажатия кнопки Close
Форум «Всё о Паскале» > Delphi, Assembler и другие языки. > Delphi
Altair
требуется отловить нажатие, и не дать окну закрыться...
в DRKB не нашел... или плохо искал...
Altair
нашел.. DRKB
Цитата
Перехват нажатия на системные кнопки формы (закрытие , минимизация окна и т.д.)

но это для своего окна,а для чужого ?
volvo
Цитата(Oleg_Z @ 14.06.05 21:43)
а для чужого ?
Цитата(DRKB)
Как перехватывать события, посланные другим приложениям?
Altair
ну хорошо, это изврат, а можно кнопочку закрыть в окне каком-то чужом заблокировать\сделать неактивным?
что бы только кнопка свернуть осталась и развернуть..
volvo
 procedure TForm1.Button1Click (Sender: TObject);
var
hwndHandle : THANDLE;
hMenuHandle : HMENU;
begin
hwndHandle := FindWindow(nil, 'Untitled - Notepad'); { Здесь - нужный тебе заголовок }
if (hwndHandle <> 0) then begin
hMenuHandle := GetSystemMenu(hwndHandle, FALSE);
if (hMenuHandle <> 0) then DeleteMenu(hMenuHandle, SC_CLOSE, MF_BYCOMMAND);
end;
end;
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.