![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как убрать кнопки закрыть и развернуть в форме
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;