Показать сообщение отдельно

  #2  
Старый 08.07.2007, 13:59
GlOFF
Постоянный
Регистрация: 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;
 
Ответить с цитированием