Как спрятать заголовок формы
|
|
Во-первых, перепишите у формы метод "CreateParams", объявив его в protected или public секции: procedure CreateParams(var Params: TCreateParams); override; Затем создайте сам код метода CreateParams(), выглядящий так: procedure TForm1.Createparams(var Params: TCreateParams); begin inherited CreateParams(Params); with Params do Style := (Style or WS_POPUP) and (not WS_DLGFRAME); end; Надо надеяться, что вы обеспечите некоторый UI-механизм для перемещения и закрытия окна. |