Убрать кнопку закрытия с Caption Bar, и не удалить при этом иконку

[Winexcel]

Сообственно ответ на вопрос был бы простым,

borderIcons->biSystemMenu->False

Если так сделать, то пропадает иконка приложения, как сделать так чтобы кнопка закрытия ушла но иконка осталась? А вот для чего это надо: я хочу рисовать в caption bar свою кнопку закрытия приложения.

[northener]

Ну тогда и иконку сам рисуй.

[northener]

Ну раз никто больше не высказался, то добавлю.
Мне лично представляется что в эпоху массового использования тем в Виндовс очень странно слышать желание отставить отрисовку заголовка окна на совести самой системы, а кнопку закрытия рисовать самому. Да к тому же наверняка без учета темы. Я даже не говорю о том будет ли это красиво глядеться. Я говорю о том, что это может в большинстве случаев выглядеть просто ужасно.

[FaTaL]

Да ему не надо ничего отрисововать, а просто убрать крестик как я понял.
Убрать не знаю как, а вот этот код делает кнопку недоступной

procedure TForm1.FormCreate(Sender: TObject);
var
  SysMenu: HMenu;
begin
  SysMenu := GetSystemMenu( Handle, false );
  Windows.EnableMenuItem( SysMenu, SC_CLOSE, MF_DISABLED or MF_GRAYED );
  GetSystemMenu( Handle, false );
  Perform( WM_NCPAINT, Handle, 0 );
end;

[Stilet]

А я думаю что стоит все убрать. И заголовок и иконку и кнопки, а вверху окна поставить панель, на которой рисовать уже свое.
Это конечно если делать по старинке