| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Убрать кнопку максимизации!
Дремучий © (2003-11-05 22:19:00)
форма имеет кнопку закрыть и минимизировать. Тем не менее кнопка максимизации тоже присутствует, хотя и не доступна. Как ее убрать?
Пробовал вот так:
procedure TfmMain.CreateParams(var Params: TCreateParams);
begin
with Params do Style:= Style and not WS_MAXIMIZEBOX;
inherited CreateParams(Params);
end;
не получается... :((
Игорь Шевченко (2003-11-06 10:45:00) [1]
Дремучий © (06.11.03 00:04)
1) Рисовать Caption своими руками
2) Смириться с тем, что есть
OlegGashev (2003-11-06 03:02:00) [2]
procedure TForm1.FormCreate(Sender: TObject);
begin
BorderIcons:=[];
end;
Дремучий (2003-11-06 00:04:00) [3]
> Игорь Шевченко ©
:))
ну а по сабжу? как убрать-то?
Игорь Шевченко (2003-11-05 23:55:00) [4]
А кнопка остается. By design
Дремучий (2003-11-05 22:51:00) [5]
меню убирается без проблем...
procedure TfmMain.WMNCCreate(var Message: TWMNCCreate);
var
SysMenu: HMENU;
begin
inherited;
SysMenu := GetSystemMenu(Handle, False);
DeleteMenu(SysMenu, SC_MAXIMIZE, MF_BYCOMMAND);
end;
а кпнопка...
| |
