Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.24;
Скачать: CL | DM;

Вниз

Не могу убрать лишнюю кнопку в заголовке окна!   Найти похожие ветки 

 
lext ©   (2003-11-14 21:00) [0]

Здравствуйте уважаемые мастера! Помогите, не могу справиться с этой задачей. В общем нужно исключить из заголовка окна кнопочку максимизации (т.е. мне нужно чтоб остались только "_" и "Х" кнопки. Нашел в инете много чего по этому вопросу и вписал такой код:
procedure TForm2.FormActivate(Sender: TObject);
var hMenuHandle: hMenu;
begin
hMenuHandle:=GetSystemMenu(Form2.Handle, False);
if (hMenuHandle <> 0) then
DeleteMenu(hMenuHandle, SC_MINIMIZE, MF_BYCOMMAND);
DeleteMenu(hMenuHandle, SC_RESTORE, MF_BYCOMMAND);
DeleteMenu(hMenuHandle, SC_MAXIMIZE, MF_BYCOMMAND);
end;
но это не помагает. Могу убрать все кнопки, кроме этой. А по закону подлости именно ее и нужно :)
Может кто сталкивался с такой проблемой?


 
Eagle Owl ©   (2003-11-14 21:37) [1]

В свойствах формы кнопки убираются...


 
WithOut Any ... ©   (2003-11-14 21:51) [2]

>Eagle Owl © (14.11.03 21:37) [1]
В общем то сомневаюсь.
lext © (14.11.03 21:00)
А что так сильно портит дизайн. Мне кажется проще на BorderIcons установить False на любую желаемую кнопку


 
lext ©   (2003-11-14 21:56) [3]

Да не все так просто, в свойствах формы кнопки убираются, но не эта. А вопрос не в дизайне, а в требованиях к программе. Типа защиты от вездесущих пользователей :) В общем это действительно требуется.


 
WithOut Any ... ©   (2003-11-14 22:06) [4]

Я что-то не очень понял. В свойствах формы
BorderIcons (кликнуть на "+")
и на biMaximize выставляешь False.
Никакой пользователь не сможет ее максимизировать.
Иначе я не понимаю вопроса


 
ChecheNeC ©   (2003-11-14 22:19) [5]

короче на form1.create
прописываешь что то типа
form1.bordericons(biMinimize, biSystemMenu);
мне помогло:)



Страницы: 1 вся ветка

Текущий архив: 2003.11.24;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.032 c
3-78784
Islander
2003-11-05 15:25
2003.11.24
Как проверить данные перед посылкой в БД, работая через ADO


4-79247
o2
2003-09-28 08:57
2003.11.24
String vs PAnsiChar


14-79160
Pat
2003-10-31 12:49
2003.11.24
Клиент чата Мастеров by easy


1-78930
Zheks
2003-11-12 10:14
2003.11.24
из байта в текст


3-78856
Liavik
2003-11-03 16:59
2003.11.24
Проверка