как на форме кнопку CLOSE (крестик) сделать неактивной?

← →
Olegas (2002-06-13 18:58) [0]

Помогите пожалуйста, очень нужно сделать кнопку CLOSE (крестик) неактивной (но не убирать)!!! Подскажите, может кто знает!!!

← →
Song © (2002-06-13 19:23) [1]

DeleteMenu()

← →
Dennn_is (2002-06-14 13:10) [2]

Следующий текст убирает команду закрыть из системного меню
и одновременно делает серой кнопку закрыть в заголовке
формы:

procedure TForm1.FormCreate(Sender: TObject); var hMenuHandle:HMENU; begin hMenuHandle := GetSystemMenu(Handle, FALSE); IF (hMenuHandle <> 0) THEN DeleteMenu(hMenuHandle, SC_CLOSE, MF_BYCOMMAND); end;

как на форме кнопку CLOSE (крестик) сделать неактивной? Найти похожие ветки