Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c