Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как убрать кнопки закрыть и развернуть в форме


Roman_ln ©   (2007-04-25 14:32:00) 

Как убрать кнопки закрыть и развернуть в форме


Elen   (2007-04-25 15:25:00) [1]

Например так можно отключить их действия :

procedure TForm1.FormCreate(Sender: TObject);
begin
 DeleteMenu(GetSystemMenu(Handle, false),0,MF_BYPOSITION);
DeleteMenu(GetSystemMenu(Handle, false),5,MF_BYPOSITION);
DeleteMenu(GetSystemMenu(Handle, false),3,MF_BYPOSITION);
end;


Но они с экрана не исчезнут.


Savek   (2007-04-25 15:14:00) [2]

св-во BorderIcons


allucard   (2007-04-25 14:45:00) [3]

Form1.BorderStyle := bdDialog;


allucard   (2007-04-25 14:45:00) [4]

извиняюсь:

Form1.BorderStyle := bsDialog;


Наверх

Титульная страница Поиск, карта сайта Написать письмо