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

Вниз

Как запретить кнопку   Найти похожие ветки 

← →
Димка   (2002-04-25 18:45) [0]

Подскажите, пожалуйста, как запретить кнопку "развернуть" в заголовке окна.
Спасибо.

---

← →
DeN_IS   (2002-04-25 22:55) [1]

Form1.BorderIcons := Form1.BorderIcons - [biMinimize]; - для запрета минимизации

Form1.BorderIcons := Form1.BorderIcons - [biMaxsimise]; - для запрета максимизации

Form1.BorderIcons := Form1.BorderIcons - [biMinimize,[biMaxsimise]; - для запрета того и другого

---

← →
DeN_IS   (2002-04-25 22:57) [2]

Form1.BorderIcons := Form1.BorderIcons - biMinimize, biMaxsimise]; - так будет правильно

---

← →
Atrem   (2002-04-25 22:59) [3]

вроде так работает:

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 смотри,там этого навалом

---

← →
Atrem   (2002-04-25 23:06) [4]

или sc_restore

---

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

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

Наверх

Память: 0.44 MB
Время: 0.005 c