type TForm2 = class(TForm) { other stuff above } procedure CreateParams(var Params: TCreateParams); override; { other stuff below } end; procedure TForm2.CreateParams(var Params: TCreateParams); begin inherited CreateParams(Params); Params.Style := Params.Style and not WS_OVERLAPPEDWINDOW or WS_BORDER end; For an MDI child form, setting the BorderStyle to bsNone does NOT remove the title bar. (This is mentioned in the help). This does it: Procedure tMdiChildForm.CreateParams( var Params : tCreateParams ) ; Begin Inherited CreateParams( Params ) ; Params.Style := Params.Style and (not WS_CAPTION) ; End ;