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

Вниз

Убрать кнопку максимизации!   Найти похожие ветки 

 
Дремучий ©   (2003-11-05 22:19) [0]

форма имеет кнопку закрыть и минимизировать. Тем не менее кнопка максимизации тоже присутствует, хотя и не доступна. Как ее убрать?
Пробовал вот так:

procedure TfmMain.CreateParams(var Params: TCreateParams);
begin
with Params do Style:= Style and not WS_MAXIMIZEBOX;
inherited CreateParams(Params);
end;


не получается... :((


 
Дремучий ©   (2003-11-05 22:51) [1]

меню убирается без проблем...

procedure TfmMain.WMNCCreate(var Message: TWMNCCreate);
var
SysMenu: HMENU;
begin
inherited;
SysMenu := GetSystemMenu(Handle, False);
DeleteMenu(SysMenu, SC_MAXIMIZE, MF_BYCOMMAND);
end;

а кпнопка...


 
Игорь Шевченко ©   (2003-11-05 23:55) [2]

А кнопка остается. By design


 
Дремучий ©   (2003-11-06 00:04) [3]


> Игорь Шевченко ©

:))

ну а по сабжу? как убрать-то?


 
OlegGashev ©   (2003-11-06 03:02) [4]

procedure TForm1.FormCreate(Sender: TObject);
begin
BorderIcons:=[];
end;


 
Игорь Шевченко ©   (2003-11-06 10:45) [5]

Дремучий © (06.11.03 00:04)

1) Рисовать Caption своими руками
2) Смириться с тем, что есть



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

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

Наверх




Память: 0.47 MB
Время: 0.061 c
3-25263
3LoBit
2003-12-08 14:30
2004.01.09
Странное выполнение OnCalcFields в TSQLQuery


4-25668
Gilk
2003-11-05 16:31
2004.01.09
Как узнать открыт/используется ли документ


3-25217
k_len
2003-12-11 14:35
2004.01.09
Создавать таблицы или нет


14-25553
vajo
2003-12-18 17:37
2004.01.09
Объясните пожалуйста такую ситуацию.


7-25626
Данила
2003-10-27 13:18
2004.01.09
C, D, E ... сколько их.