как убрать кнопку "закрыть" из заголовка окна и системного меню?

← →
tchn (2004-10-29 01:36) [0]

убрать кнопку "закрыть" из заголовка окна и системного меню? ну, и чтобы по ctrl+f4 окно не закрывалось тоже

← →
Гаврила © (2004-10-29 01:38) [1]

У формы есть в инспекторе св-во по поводу показа кнопок. А вообще не давать закрывать - это заподло ,все равно через процессы сорвут

← →
tchn (2004-10-29 01:43) [2]

мне нужно оставить кнопки minimize и maximize, а убрать тока close. то свойство так сделать не позволяет.
а западло/не западло -- это уже другой вопрос

← →
Германн © (2004-10-29 02:47) [3]

2 Решай через OnClose.

← →
tchn (2004-10-29 09:25) [4]

> Германн © (29.10.04 02:47) [3]
> 2 Решай через OnClose.

как это? запретить закрытие окна можно через OnCloseQuery, но мне нужно СОВСЕМ кнопку

← →
BillyJeans (2004-10-29 10:16) [5]

Обрабатывай сообщение WM_CLOSE

← →
-=SS=- © (2004-10-29 10:25) [6]

procedure TForm1.FormCreate(Sender: TObject); var hMenuHandle:THandle; begin hMenuHandle := GetSystemMenu(Handle, FALSE); if (hMenuHandle <> 0) then DeleteMenu(hMenuHandle, SC_CLOSE, MF_BYCOMMAND);

← →
-=SS=- © (2004-10-29 10:38) [7]

> и чтобы по ctrl+f4 окно

А оно и не закроется :)))))
а если по <Alt+F4> то
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean); begin Canclose:=False; end;

← →
Гаврила © (2004-10-29 10:44) [8]

Убери все кнопки, потом нарисуй минимайз и максимайз руками

← →
tchn (2004-10-29 10:46) [9]

> -=SS=- © (29.10.04 10:25) [6]

хорошо. убрали Close из меню, запретили кнопку Close в заголовке. а УБРАТЬ СОВСЕМ эту кнопку можно?

> -=SS=- © (29.10.04 10:38) [7]
>
> > и чтобы по ctrl+f4 окно
>
> А оно и не закроется :)))))

насчет Ctrl-F4 это я, конечно, хватил. сорри :-)

Можно но только придется еще и Minimize и Maximize кнопки убирать

← →
tchn (2004-10-29 12:54) [11]

все понятно :-D

как убрать кнопку "закрыть" из заголовка окна и системного меню? Найти похожие ветки