![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
как убрать кнопку "закрыть" из заголовка окна и системного меню?
tchn © (2004-10-29 01:36:00)убрать кнопку "закрыть" из заголовка окна и системного меню? ну, и чтобы по ctrl+f4 окно не закрывалось тоже
tchn (2004-10-29 12:54:00) [1]все понятно :-D
-=SS=- (2004-10-29 12:19:00) [2]Можно но только придется еще и Minimize и Maximize кнопки убирать
tchn (2004-10-29 10:46:00) [3]
> -=SS=- © (29.10.04 10:25) [6]
хорошо. убрали Close из меню, запретили кнопку Close в заголовке. а УБРАТЬ СОВСЕМ эту кнопку можно?
> -=SS=- © (29.10.04 10:38) [7]
>
> > и чтобы по ctrl+f4 окно
>
> А оно и не закроется :)))))
насчет Ctrl-F4 это я, конечно, хватил. сорри :-)
Гаврила (2004-10-29 10:44:00) [4]Убери все кнопки, потом нарисуй минимайз и максимайз руками
-=SS=- (2004-10-29 10:38:00) [5]
> и чтобы по ctrl+f4 окно
А оно и не закроется :)))))
а если по <Alt+F4> то
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
Canclose:=False;
end;
-=SS=- (2004-10-29 10:25:00) [6]
procedure TForm1.FormCreate(Sender: TObject);
var
hMenuHandle:THandle;
begin
hMenuHandle := GetSystemMenu(Handle, FALSE);
if (hMenuHandle <> 0) then
DeleteMenu(hMenuHandle, SC_CLOSE, MF_BYCOMMAND);
BillyJeans (2004-10-29 10:16:00) [7]Обрабатывай сообщение WM_CLOSE
tchn (2004-10-29 09:25:00) [8]
> Германн © (29.10.04 02:47) [3]
> 2 Решай через OnClose.
как это? запретить закрытие окна можно через OnCloseQuery, но мне нужно СОВСЕМ кнопку
Германн (2004-10-29 02:47:00) [9]2 Решай через OnClose.
tchn (2004-10-29 01:43:00) [10]мне нужно оставить кнопки minimize и maximize, а убрать тока close. то свойство так сделать не позволяет.
а западло/не западло -- это уже другой вопрос
Гаврила (2004-10-29 01:38:00) [11]У формы есть в инспекторе св-во по поводу показа кнопок. А вообще не давать закрывать - это заподло ,все равно через процессы сорвут