Mega Code Archive
Remove titlebar of MDI child form
<![CDATA[
Title: Remove titlebar of MDI child form
Question: Remove titlebar of MDI child form
Answer:
Quoted from Unknown (tnomad@digital.net) and Andy McFarland (amcfarl@ndlc.occ.uky.edu):
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:
type
... = class(TForm)
{ other stuff above }
procedure CreateParams(var Params: TCreateParams); override;
{ other stuff below }
end;
...
Procedure tMdiChildForm.CreateParams( var Params : tCreateParams ) ;
Begin
Inherited CreateParams( Params ) ;
Params.Style := Params.Style and (not WS_CAPTION) ;
End ;
]]>