Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.01;
Скачать: CL | DM;

Вниз

Как убрать кнопочки что: крестик, развернуть и свернуть?   Найти похожие ветки 

 
Dark Programmer ©   (2002-06-18 12:22) [0]

Помогите пожалуйста!


 
Егоров Николай   (2002-06-18 12:31) [1]

Убрать все кнопки:
Form1.BorderIcons := [];

Если какая-то кнопка нужна, а остальные нет, то просто выставь в Object Inspector-е твоей формы BorderIcons в False;

А кнопку <закрыть> "убрать" можно так:

procedure TForm1.FormCreate(Sender: TObject);
var hMenuHandle:HMENU;
begin
hMenuHandle := GetSystemMenu(Handle, FALSE);
IF (hMenuHandle <> 0) THEN
DeleteMenu(hMenuHandle, SC_CLOSE, MF_BYCOMMAND);
end;




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

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

Наверх




Память: 0.46 MB
Время: 0.009 c
4-1251
Nimbus
2002-04-30 23:08
2002.07.01
Диалоговое окно


3-929
Tutov Roman
2002-06-07 13:42
2002.07.01
Почему зацикливается этот кусок кода ?


4-1241
Alexander
2002-05-02 14:57
2002.07.01
А как, по ID или Handle изменить шрифт у StaticText?


1-1077
Неизвестный
2002-06-17 12:11
2002.07.01
Hint для ComboBox


14-1194
Igor_thief
2002-05-31 15:17
2002.07.01
Компрессоры