Как скрыть заголовок формы

Быстрый и простой способ скрыть заголовок формы — вызов функции SetWindowLong API Windows. Ниже приведен код, как это реализовать. Не забудьте поместить кнопку закрытия окна, так как кнопок на форме тоже не будет!

Приложение с формой без заголовка

procedure TForm1.FormCreate(Sender: TObject);
begin
  SetWindowLong( Handle,
      GWL_STYLE,
      GetWindowLong( Handle, GWL_STYLE )
      and not WS_CAPTION ) ;
  ClientHeight := Height;
end;

procedure TForm1.btnCloseClick(Sender: TObject);
begin
  Application.Terminate;
end;

—

03.09.2016

coder

Как скрыть заголовок формы

Комментарии