
08.07.2007, 13:59
|
|
Постоянный
Регистрация: 08.05.2006
Сообщений: 816
Провел на форуме: 1845671
Репутация:
1338
|
|
infernal-team
Два пути:
1) В настройках формы, раскрывай BorderIcons и видешь
biSystemMenu - наличие системного меню (слева у значка)
biMinimize - свернуть
biMaximize - развернуть
biHelp - помощь
Тебе нужно будет поставить все параметре в FALSE (Можешь biSystemMenu оставить TRUE)
2) Написать код
procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.BorderIcons := [biSystemMenu];
end;
|
|
|