| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как запретить кнопку
Димка © (2002-04-25 18:45:00)Подскажите, пожалуйста, как запретить кнопку "развернуть" в заголовке окна.
Спасибо.
Atrem (2002-04-25 23:06:00) [1]или sc_restore
Atrem (2002-04-25 22:59:00) [2]вроде так работает:
procedure TForm1.FormCreate(Sender: TObject);
var h:Cardinal;
begin
h:=GetSystemMenu(Handle,false);
if h<32 then exit;
DeleteMenu(h,SC_MAXIMIZE ,MF_BYCOMMAND);
end;
А вообще FAQ смотри,там этого навалом
DeN_IS (2002-04-25 22:57:00) [3]Form1.BorderIcons := Form1.BorderIcons - biMinimize, biMaxsimise]; - так будет правильно
DeN_IS (2002-04-25 22:55:00) [4]
Form1.BorderIcons := Form1.BorderIcons - [biMinimize]; - для запрета минимизации
Form1.BorderIcons := Form1.BorderIcons - [biMaxsimise];- для запрета максимизации
Form1.BorderIcons := Form1.BorderIcons - [biMinimize,[biMaxsimise];- для запрета того и другого
| |
