![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Здравствуйте, скажите как отключить кнопки "свернуть", "свернуть в окно" и "закрыть" в заголовке у формы. Напишите коды пожалуйста и путь, чтобы знать куда это все записывать. Мне у 40 форм надо это сделать.
Последний раз редактировалось Dimasian, 22.04.2010 в 13:59. Причина: так надо |
#2
|
|||
|
|||
![]() выдели свои 40 форм и дай свойстве borberstyle значение bsNone или их нужно именно отключить?)
|
#3
|
|||
|
|||
![]() Ну в общем хотелось бы узнать и как их отключить, не только заблкировать. Мне главное чтобы во время работы программы они не были активны, т.е при нажатии на них ничего не сворачивалось, не закрывалось.
|
#4
|
|||
|
|||
![]() можешь вот так еще сделать
Код:
procedure TForm1.Button1Click(Sender: TObject); begin {Disable} Form1.BorderIcons := Form1.BorderIcons - [biSystemMenu, biMinimize, biMaximize]; end; procedure TForm1.Button2Click(Sender: TObject); begin {Enable} Form1.BorderIcons := Form1.BorderIcons + [biSystemMenu, biMinimize, biMaximize]; end; подо6ие предыдушего варианта, только шапка останется |
#5
|
|||
|
|||
![]() А что, у формы свойство BorderIcons уже отменили?
|