Главная страница
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.017 c
1-79025
Jiurasdg45
2003-11-13 22:14
2003.11.24
А как сделать прокручиваемую картинку?


1-78916
killer
2003-11-12 16:10
2003.11.24
Где можно скачать RXLib для Delphi7


11-78865
Oduvan
2002-07-29 18:32
2003.11.24
Как убрать кнопку с панели задачь в KOL приложении?


6-79098
Wizard_1
2003-09-29 22:45
2003.11.24
FTP


4-79229
Ich Hasse
2003-09-28 19:30
2003.11.24
реакция на help