Как сделать форму без caption?

Delphi , Программа и Интерфейс , Заголовок формы

Как сделать форму без caption?

Обычная форма:

Code:

TForm.Style:=bsNone

Автор: Song

Взято с Vingrad.ru http://forum.vingrad.ru

MDIChild форма:

Code:

setWindowLong (handle,GWL_STYLE,getWindowLong(handle,  GWL_STYLE) and not WS_CAPTION);

        width:=width+1;

        width:=width-1;

Автор ответа: rhf

Взято с Vingrad.ru http://forum.vingrad.ru

Code:

{  Private Declaration } 

        procedure CreateParams(var Params : TCreateParams);  override; 

         

        ... 

         

        procedure TForm1.CreateParams(var Params : TCreateParams); 

         

        begin 

        inherited Createparams(Params); 

        with Params do 

        Style :=  (Style or WS_POPUP) and not WS_DLGFRAME; 

        end;

Взято из http://forum.sources.ru

Статья Как сделать форму без caption? раздела Программа и Интерфейс Заголовок формы может быть полезна для разработчиков на Delphi и FreePascal.

Комментарии и вопросы

Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.

:: Главная :: Заголовок формы ::

20.04.2024 16:26:52/0.0031721591949463/2